Example #1
0
 public override void webExecute( )
 {
    context.SetDefaultTheme("WorkWithPlusTheme");
    initialize();
    Gxm2rootcol = new GXBaseCollection<GeneXus.Programs.wwpbaseobjects.SdtHomeSampleData_HomeSampleDataItem>( context, "HomeSampleDataItem", "DataAnalysisPlatform") ;
    if ( ! context.isAjaxRequest( ) )
    {
       GXSoapHTTPResponse.AppendHeader("Content-type", "text/xml;charset=utf-8");
    }
    if ( StringUtil.StrCmp(StringUtil.Lower( GXSoapHTTPRequest.Method), "get") == 0 )
    {
       if ( StringUtil.StrCmp(StringUtil.Lower( GXSoapHTTPRequest.QueryString), "wsdl") == 0 )
       {
          GXSoapXMLWriter.OpenResponse(GXSoapHTTPResponse);
          GXSoapXMLWriter.WriteStartDocument("utf-8", 0);
          GXSoapXMLWriter.WriteStartElement("definitions");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.GetHomeSampleData");
          GXSoapXMLWriter.WriteAttribute("targetNamespace", "DataAnalysisPlatform");
          GXSoapXMLWriter.WriteAttribute("xmlns:wsdlns", "DataAnalysisPlatform");
          GXSoapXMLWriter.WriteAttribute("xmlns:soap", "http://schemas.xmlsoap.org/wsdl/soap/");
          GXSoapXMLWriter.WriteAttribute("xmlns:xsd", "http://www.w3.org/2001/XMLSchema");
          GXSoapXMLWriter.WriteAttribute("xmlns", "http://schemas.xmlsoap.org/wsdl/");
          GXSoapXMLWriter.WriteAttribute("xmlns:tns", "DataAnalysisPlatform");
          GXSoapXMLWriter.WriteStartElement("types");
          GXSoapXMLWriter.WriteStartElement("schema");
          GXSoapXMLWriter.WriteAttribute("targetNamespace", "DataAnalysisPlatform");
          GXSoapXMLWriter.WriteAttribute("xmlns", "http://www.w3.org/2001/XMLSchema");
          GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENC", "http://schemas.xmlsoap.org/soap/encoding/");
          GXSoapXMLWriter.WriteAttribute("elementFormDefault", "qualified");
          GXSoapXMLWriter.WriteStartElement("complexType");
          GXSoapXMLWriter.WriteAttribute("name", "HomeSampleData");
          GXSoapXMLWriter.WriteStartElement("sequence");
          GXSoapXMLWriter.WriteStartElement("element");
          GXSoapXMLWriter.WriteAttribute("minOccurs", "0");
          GXSoapXMLWriter.WriteAttribute("maxOccurs", "unbounded");
          GXSoapXMLWriter.WriteAttribute("name", "HomeSampleDataItem");
          GXSoapXMLWriter.WriteAttribute("type", "tns:WWPBaseObjects.HomeSampleData.HomeSampleDataItem");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("complexType");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.HomeSampleData.HomeSampleDataItem");
          GXSoapXMLWriter.WriteStartElement("sequence");
          GXSoapXMLWriter.WriteStartElement("element");
          GXSoapXMLWriter.WriteAttribute("name", "ProductName");
          GXSoapXMLWriter.WriteAttribute("type", "xsd:string");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("element");
          GXSoapXMLWriter.WriteAttribute("name", "ProductPrice");
          GXSoapXMLWriter.WriteAttribute("type", "xsd:double");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("element");
          GXSoapXMLWriter.WriteAttribute("name", "ProductWeight");
          GXSoapXMLWriter.WriteAttribute("type", "xsd:double");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("element");
          GXSoapXMLWriter.WriteAttribute("name", "ProductVolume");
          GXSoapXMLWriter.WriteAttribute("type", "xsd:double");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("element");
          GXSoapXMLWriter.WriteAttribute("name", "ProductDiscount");
          GXSoapXMLWriter.WriteAttribute("type", "xsd:double");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("element");
          GXSoapXMLWriter.WriteAttribute("name", "ProductStatus");
          GXSoapXMLWriter.WriteAttribute("type", "xsd:byte");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("element");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.GetHomeSampleData.Execute");
          GXSoapXMLWriter.WriteStartElement("complexType");
          GXSoapXMLWriter.WriteStartElement("sequence");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("element");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.GetHomeSampleData.ExecuteResponse");
          GXSoapXMLWriter.WriteStartElement("complexType");
          GXSoapXMLWriter.WriteStartElement("sequence");
          GXSoapXMLWriter.WriteElement("element", "");
          GXSoapXMLWriter.WriteAttribute("minOccurs", "1");
          GXSoapXMLWriter.WriteAttribute("maxOccurs", "1");
          GXSoapXMLWriter.WriteAttribute("name", "ReturnValue");
          GXSoapXMLWriter.WriteAttribute("type", "tns:HomeSampleData");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("message");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.GetHomeSampleData.ExecuteSoapIn");
          GXSoapXMLWriter.WriteElement("part", "");
          GXSoapXMLWriter.WriteAttribute("name", "parameters");
          GXSoapXMLWriter.WriteAttribute("element", "tns:WWPBaseObjects.GetHomeSampleData.Execute");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("message");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.GetHomeSampleData.ExecuteSoapOut");
          GXSoapXMLWriter.WriteElement("part", "");
          GXSoapXMLWriter.WriteAttribute("name", "parameters");
          GXSoapXMLWriter.WriteAttribute("element", "tns:WWPBaseObjects.GetHomeSampleData.ExecuteResponse");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("portType");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.GetHomeSampleDataSoapPort");
          GXSoapXMLWriter.WriteStartElement("operation");
          GXSoapXMLWriter.WriteAttribute("name", "Execute");
          GXSoapXMLWriter.WriteElement("input", "");
          GXSoapXMLWriter.WriteAttribute("message", "wsdlns:"+"WWPBaseObjects.GetHomeSampleData.ExecuteSoapIn");
          GXSoapXMLWriter.WriteElement("output", "");
          GXSoapXMLWriter.WriteAttribute("message", "wsdlns:"+"WWPBaseObjects.GetHomeSampleData.ExecuteSoapOut");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("binding");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.GetHomeSampleDataSoapBinding");
          GXSoapXMLWriter.WriteAttribute("type", "wsdlns:"+"WWPBaseObjects.GetHomeSampleDataSoapPort");
          GXSoapXMLWriter.WriteElement("soap:binding", "");
          GXSoapXMLWriter.WriteAttribute("style", "document");
          GXSoapXMLWriter.WriteAttribute("transport", "http://schemas.xmlsoap.org/soap/http");
          GXSoapXMLWriter.WriteStartElement("operation");
          GXSoapXMLWriter.WriteAttribute("name", "Execute");
          GXSoapXMLWriter.WriteElement("soap:operation", "");
          GXSoapXMLWriter.WriteAttribute("soapAction", "DataAnalysisPlatformaction/"+"wwpbaseobjects.AGETHOMESAMPLEDATA.Execute");
          GXSoapXMLWriter.WriteStartElement("input");
          GXSoapXMLWriter.WriteElement("soap:body", "");
          GXSoapXMLWriter.WriteAttribute("use", "literal");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("output");
          GXSoapXMLWriter.WriteElement("soap:body", "");
          GXSoapXMLWriter.WriteAttribute("use", "literal");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteStartElement("service");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.GetHomeSampleData");
          GXSoapXMLWriter.WriteStartElement("port");
          GXSoapXMLWriter.WriteAttribute("name", "WWPBaseObjects.GetHomeSampleDataSoapPort");
          GXSoapXMLWriter.WriteAttribute("binding", "wsdlns:"+"WWPBaseObjects.GetHomeSampleDataSoapBinding");
          GXSoapXMLWriter.WriteElement("soap:address", "");
          GXSoapXMLWriter.WriteAttribute("location", "http://"+context.GetServerName( )+((context.GetServerPort( )>0)&&(context.GetServerPort( )!=80)&&(context.GetServerPort( )!=443) ? ":"+StringUtil.LTrim( StringUtil.Str( (decimal)(context.GetServerPort( )), 6, 0)) : "")+context.GetScriptPath( )+"wwpbaseobjects.gethomesampledata.aspx");
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.WriteEndElement();
          GXSoapXMLWriter.Close();
          return  ;
       }
       else
       {
          currSoapErr = (short)(-20000);
          currSoapErrmsg = "No SOAP request found. Call " + "http://" + context.GetServerName( ) + ((context.GetServerPort( )>0)&&(context.GetServerPort( )!=80)&&(context.GetServerPort( )!=443) ? ":"+StringUtil.LTrim( StringUtil.Str( (decimal)(context.GetServerPort( )), 6, 0)) : "") + context.GetScriptPath( ) + "wwpbaseobjects.gethomesampledata.aspx" + "?wsdl to get the WSDL.";
       }
    }
    if ( currSoapErr == 0 )
    {
       GXSoapXMLReader.OpenRequest(GXSoapHTTPRequest);
       GXSoapXMLReader.ReadExternalEntities = 0;
       GXSoapXMLReader.IgnoreComments = 1;
       GXSoapError = GXSoapXMLReader.Read();
       while ( GXSoapError > 0 )
       {
          this.SetPrefixesFromReader( GXSoapXMLReader);
          if ( StringUtil.StringSearch( GXSoapXMLReader.Name, "Body", 1) > 0 )
          {
             if (true) break;
          }
          GXSoapError = GXSoapXMLReader.Read();
       }
       if ( GXSoapError > 0 )
       {
          GXSoapError = GXSoapXMLReader.Read();
          if ( GXSoapError > 0 )
          {
             this.SetPrefixesFromReader( GXSoapXMLReader);
             currMethod = GXSoapXMLReader.Name;
             if ( ( StringUtil.StringSearch( currMethod+"&", "Execute&", 1) > 0 ) || ( currSoapErr != 0 ) )
             {
                if ( currSoapErr == 0 )
                {
                   Gxm2rootcol = new GXBaseCollection<GeneXus.Programs.wwpbaseobjects.SdtHomeSampleData_HomeSampleDataItem>( context, "HomeSampleDataItem", "DataAnalysisPlatform");
                }
             }
             else
             {
                currSoapErr = (short)(-20002);
                currSoapErrmsg = "Wrong method called. Expected method: " + "Execute";
             }
          }
       }
       GXSoapXMLReader.Close();
    }
    if ( currSoapErr == 0 )
    {
       if ( GXSoapError < 0 )
       {
          currSoapErr = (short)(GXSoapError*-1);
          currSoapErrmsg = context.sSOAPErrMsg;
       }
       else
       {
          if ( GXSoapXMLReader.ErrCode > 0 )
          {
             currSoapErr = (short)(GXSoapXMLReader.ErrCode*-1);
             currSoapErrmsg = GXSoapXMLReader.ErrDescription;
          }
          else
          {
             if ( GXSoapError == 0 )
             {
                currSoapErr = (short)(-20001);
                currSoapErrmsg = "Malformed SOAP message.";
             }
             else
             {
                currSoapErr = 0;
                currSoapErrmsg = "No error.";
             }
          }
       }
    }
    if ( currSoapErr == 0 )
    {
       executePrivate();
    }
    context.CloseConnections() ;
    GXSoapXMLWriter.OpenResponse(GXSoapHTTPResponse);
    GXSoapXMLWriter.WriteStartDocument("utf-8", 0);
    GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Envelope");
    GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENV", "http://schemas.xmlsoap.org/soap/envelope/");
    GXSoapXMLWriter.WriteAttribute("xmlns:xsd", "http://www.w3.org/2001/XMLSchema");
    GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENC", "http://schemas.xmlsoap.org/soap/encoding/");
    GXSoapXMLWriter.WriteAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance");
    if ( ( StringUtil.StringSearch( currMethod+"&", "Execute&", 1) > 0 ) || ( currSoapErr != 0 ) )
    {
       GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Body");
       GXSoapXMLWriter.WriteStartElement("WWPBaseObjects.GetHomeSampleData.ExecuteResponse");
       GXSoapXMLWriter.WriteAttribute("xmlns", "DataAnalysisPlatform");
       if ( currSoapErr == 0 )
       {
          if ( Gxm2rootcol != null )
          {
             Gxm2rootcol.writexmlcollection(GXSoapXMLWriter, "ReturnValue", "DataAnalysisPlatform", "HomeSampleDataItem", "DataAnalysisPlatform");
          }
       }
       else
       {
          GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Fault");
          GXSoapXMLWriter.WriteElement("faultcode", "SOAP-ENV:Client");
          GXSoapXMLWriter.WriteElement("faultstring", currSoapErrmsg);
          GXSoapXMLWriter.WriteElement("detail", StringUtil.Trim( StringUtil.Str( (decimal)(currSoapErr), 10, 0)));
          GXSoapXMLWriter.WriteEndElement();
       }
       GXSoapXMLWriter.WriteEndElement();
       GXSoapXMLWriter.WriteEndElement();
    }
    GXSoapXMLWriter.WriteEndElement();
    GXSoapXMLWriter.Close();
    cleanup();
 }
 public override void webExecute( )
 {
     context.SetDefaultTheme("Flat");
     initialize();
     if (!context.isAjaxRequest( ))
     {
         GXSoapHTTPResponse.AppendHeader("Content-type", "text/xml;charset=utf-8");
     }
     if (StringUtil.StrCmp(StringUtil.Lower(GXSoapHTTPRequest.Method), "get") == 0)
     {
         if (StringUtil.StrCmp(StringUtil.Lower(GXSoapHTTPRequest.QueryString), "wsdl") == 0)
         {
             GXSoapXMLWriter.OpenResponse(GXSoapHTTPResponse);
             GXSoapXMLWriter.WriteStartDocument("utf-8", 0);
             GXSoapXMLWriter.WriteStartElement("definitions");
             GXSoapXMLWriter.WriteAttribute("name", "wscalcularquimiqueros");
             GXSoapXMLWriter.WriteAttribute("targetNamespace", "CalcularPeajes");
             GXSoapXMLWriter.WriteAttribute("xmlns:wsdlns", "CalcularPeajes");
             GXSoapXMLWriter.WriteAttribute("xmlns:soap", "http://schemas.xmlsoap.org/wsdl/soap/");
             GXSoapXMLWriter.WriteAttribute("xmlns:xsd", "http://www.w3.org/2001/XMLSchema");
             GXSoapXMLWriter.WriteAttribute("xmlns", "http://schemas.xmlsoap.org/wsdl/");
             GXSoapXMLWriter.WriteAttribute("xmlns:tns", "CalcularPeajes");
             GXSoapXMLWriter.WriteStartElement("types");
             GXSoapXMLWriter.WriteStartElement("schema");
             GXSoapXMLWriter.WriteAttribute("targetNamespace", "CalcularPeajes");
             GXSoapXMLWriter.WriteAttribute("xmlns", "http://www.w3.org/2001/XMLSchema");
             GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENC", "http://schemas.xmlsoap.org/soap/encoding/");
             GXSoapXMLWriter.WriteAttribute("elementFormDefault", "qualified");
             GXSoapXMLWriter.WriteStartElement("element");
             GXSoapXMLWriter.WriteAttribute("name", "wscalcularquimiqueros.Execute");
             GXSoapXMLWriter.WriteStartElement("complexType");
             GXSoapXMLWriter.WriteStartElement("sequence");
             GXSoapXMLWriter.WriteElement("element", "");
             GXSoapXMLWriter.WriteAttribute("minOccurs", "1");
             GXSoapXMLWriter.WriteAttribute("maxOccurs", "1");
             GXSoapXMLWriter.WriteAttribute("name", "Quimiquerosbandacpsuab");
             GXSoapXMLWriter.WriteAttribute("type", "xsd:long");
             GXSoapXMLWriter.WriteElement("element", "");
             GXSoapXMLWriter.WriteAttribute("minOccurs", "1");
             GXSoapXMLWriter.WriteAttribute("maxOccurs", "1");
             GXSoapXMLWriter.WriteAttribute("name", "Dominioimo");
             GXSoapXMLWriter.WriteAttribute("type", "xsd:string");
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteStartElement("element");
             GXSoapXMLWriter.WriteAttribute("name", "wscalcularquimiqueros.ExecuteResponse");
             GXSoapXMLWriter.WriteStartElement("complexType");
             GXSoapXMLWriter.WriteStartElement("sequence");
             GXSoapXMLWriter.WriteElement("element", "");
             GXSoapXMLWriter.WriteAttribute("minOccurs", "1");
             GXSoapXMLWriter.WriteAttribute("maxOccurs", "1");
             GXSoapXMLWriter.WriteAttribute("name", "Dominioimo");
             GXSoapXMLWriter.WriteAttribute("type", "xsd:string");
             GXSoapXMLWriter.WriteElement("element", "");
             GXSoapXMLWriter.WriteAttribute("minOccurs", "1");
             GXSoapXMLWriter.WriteAttribute("maxOccurs", "1");
             GXSoapXMLWriter.WriteAttribute("name", "Resultado");
             GXSoapXMLWriter.WriteAttribute("type", "xsd:string");
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteStartElement("message");
             GXSoapXMLWriter.WriteAttribute("name", "wscalcularquimiqueros.ExecuteSoapIn");
             GXSoapXMLWriter.WriteElement("part", "");
             GXSoapXMLWriter.WriteAttribute("name", "parameters");
             GXSoapXMLWriter.WriteAttribute("element", "tns:wscalcularquimiqueros.Execute");
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteStartElement("message");
             GXSoapXMLWriter.WriteAttribute("name", "wscalcularquimiqueros.ExecuteSoapOut");
             GXSoapXMLWriter.WriteElement("part", "");
             GXSoapXMLWriter.WriteAttribute("name", "parameters");
             GXSoapXMLWriter.WriteAttribute("element", "tns:wscalcularquimiqueros.ExecuteResponse");
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteStartElement("portType");
             GXSoapXMLWriter.WriteAttribute("name", "wscalcularquimiquerosSoapPort");
             GXSoapXMLWriter.WriteStartElement("operation");
             GXSoapXMLWriter.WriteAttribute("name", "Execute");
             GXSoapXMLWriter.WriteElement("input", "");
             GXSoapXMLWriter.WriteAttribute("message", "wsdlns:" + "wscalcularquimiqueros.ExecuteSoapIn");
             GXSoapXMLWriter.WriteElement("output", "");
             GXSoapXMLWriter.WriteAttribute("message", "wsdlns:" + "wscalcularquimiqueros.ExecuteSoapOut");
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteStartElement("binding");
             GXSoapXMLWriter.WriteAttribute("name", "wscalcularquimiquerosSoapBinding");
             GXSoapXMLWriter.WriteAttribute("type", "wsdlns:" + "wscalcularquimiquerosSoapPort");
             GXSoapXMLWriter.WriteElement("soap:binding", "");
             GXSoapXMLWriter.WriteAttribute("style", "document");
             GXSoapXMLWriter.WriteAttribute("transport", "http://schemas.xmlsoap.org/soap/http");
             GXSoapXMLWriter.WriteStartElement("operation");
             GXSoapXMLWriter.WriteAttribute("name", "Execute");
             GXSoapXMLWriter.WriteElement("soap:operation", "");
             GXSoapXMLWriter.WriteAttribute("soapAction", "CalcularPeajesaction/" + "AWSCALCULARQUIMIQUEROS.Execute");
             GXSoapXMLWriter.WriteStartElement("input");
             GXSoapXMLWriter.WriteElement("soap:body", "");
             GXSoapXMLWriter.WriteAttribute("use", "literal");
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteStartElement("output");
             GXSoapXMLWriter.WriteElement("soap:body", "");
             GXSoapXMLWriter.WriteAttribute("use", "literal");
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteStartElement("service");
             GXSoapXMLWriter.WriteAttribute("name", "wscalcularquimiqueros");
             GXSoapXMLWriter.WriteStartElement("port");
             GXSoapXMLWriter.WriteAttribute("name", "wscalcularquimiquerosSoapPort");
             GXSoapXMLWriter.WriteAttribute("binding", "wsdlns:" + "wscalcularquimiquerosSoapBinding");
             GXSoapXMLWriter.WriteElement("soap:address", "");
             GXSoapXMLWriter.WriteAttribute("location", "http://" + context.GetServerName( ) + ((context.GetServerPort( ) > 0) && (context.GetServerPort( ) != 80) && (context.GetServerPort( ) != 443) ? ":" + StringUtil.LTrim(StringUtil.Str((decimal)(context.GetServerPort( )), 6, 0)) : "") + context.GetScriptPath( ) + "awscalcularquimiqueros.aspx");
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.WriteEndElement();
             GXSoapXMLWriter.Close();
             return;
         }
         else
         {
             currSoapErr    = (short)(-20000);
             currSoapErrmsg = "No SOAP request found. Call " + "http://" + context.GetServerName( ) + ((context.GetServerPort( ) > 0) && (context.GetServerPort( ) != 80) && (context.GetServerPort( ) != 443) ? ":" + StringUtil.LTrim(StringUtil.Str((decimal)(context.GetServerPort( )), 6, 0)) : "") + context.GetScriptPath( ) + "awscalcularquimiqueros.aspx" + "?wsdl to get the WSDL.";
         }
     }
     if (currSoapErr == 0)
     {
         GXSoapXMLReader.OpenRequest(GXSoapHTTPRequest);
         GXSoapError = GXSoapXMLReader.Read();
         while (GXSoapError > 0)
         {
             if (StringUtil.StringSearch(GXSoapXMLReader.Name, "Body", 1) > 0)
             {
                 if (true)
                 {
                     break;
                 }
             }
             GXSoapError = GXSoapXMLReader.Read();
         }
         if (GXSoapError > 0)
         {
             GXSoapError = GXSoapXMLReader.Read();
             if (GXSoapError > 0)
             {
                 currMethod = GXSoapXMLReader.Name;
                 if (StringUtil.StringSearch(currMethod + "&", "Execute&", 1) > 0)
                 {
                     if (currSoapErr == 0)
                     {
                         sTagName = GXSoapXMLReader.Name;
                         if (GXSoapXMLReader.IsSimple == 0)
                         {
                             GXSoapError   = GXSoapXMLReader.Read();
                             nOutParmCount = 0;
                             while (((StringUtil.StrCmp(GXSoapXMLReader.Name, sTagName) != 0) || (GXSoapXMLReader.NodeType == 1)) && (GXSoapError > 0))
                             {
                                 readOk = 0;
                                 if (StringUtil.StrCmp2(GXSoapXMLReader.LocalName, "Quimiquerosbandacpsuab") && (GXSoapXMLReader.NodeType != 2) && (StringUtil.StrCmp(GXSoapXMLReader.NamespaceURI, "CalcularPeajes") == 0))
                                 {
                                     AV9QuimiquerosBandaCPSUAB = (long)(NumberUtil.Val(GXSoapXMLReader.Value, "."));
                                     if (GXSoapError > 0)
                                     {
                                         readOk = 1;
                                     }
                                     GXSoapError = GXSoapXMLReader.Read();
                                 }
                                 if (StringUtil.StrCmp2(GXSoapXMLReader.LocalName, "Dominioimo") && (GXSoapXMLReader.NodeType != 2) && (StringUtil.StrCmp(GXSoapXMLReader.NamespaceURI, "CalcularPeajes") == 0))
                                 {
                                     AV16DominioIMO = GXSoapXMLReader.Value;
                                     if (GXSoapError > 0)
                                     {
                                         readOk = 1;
                                     }
                                     GXSoapError = GXSoapXMLReader.Read();
                                 }
                                 nOutParmCount = (short)(nOutParmCount + 1);
                                 if (readOk == 0)
                                 {
                                     context.sSOAPErrMsg = context.sSOAPErrMsg + "Error reading " + sTagName + StringUtil.NewLine( );
                                     context.sSOAPErrMsg = context.sSOAPErrMsg + "Message: " + GXSoapXMLReader.ReadRawXML();
                                     GXSoapError         = (short)(nOutParmCount * -1);
                                 }
                             }
                         }
                     }
                 }
                 else
                 {
                     currSoapErr    = (short)(-20002);
                     currSoapErrmsg = "Wrong method called. Expected method: " + "Execute";
                 }
             }
         }
         GXSoapXMLReader.Close();
     }
     if (currSoapErr == 0)
     {
         if (GXSoapError < 0)
         {
             currSoapErr    = (short)(GXSoapError * -1);
             currSoapErrmsg = context.sSOAPErrMsg;
         }
         else
         {
             if (GXSoapXMLReader.ErrCode > 0)
             {
                 currSoapErr    = (short)(GXSoapXMLReader.ErrCode * -1);
                 currSoapErrmsg = GXSoapXMLReader.ErrDescription;
             }
             else
             {
                 if (GXSoapError == 0)
                 {
                     currSoapErr    = (short)(-20001);
                     currSoapErrmsg = "Malformed SOAP message.";
                 }
                 else
                 {
                     currSoapErr    = 0;
                     currSoapErrmsg = "No error.";
                 }
             }
         }
     }
     if (currSoapErr == 0)
     {
         executePrivate();
     }
     context.CloseConnections();
     GXSoapXMLWriter.OpenResponse(GXSoapHTTPResponse);
     GXSoapXMLWriter.WriteStartDocument("utf-8", 0);
     GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Envelope");
     GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENV", "http://schemas.xmlsoap.org/soap/envelope/");
     GXSoapXMLWriter.WriteAttribute("xmlns:xsd", "http://www.w3.org/2001/XMLSchema");
     GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENC", "http://schemas.xmlsoap.org/soap/encoding/");
     GXSoapXMLWriter.WriteAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance");
     if (StringUtil.StringSearch(currMethod + "&", "Execute&", 1) > 0)
     {
         GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Body");
         GXSoapXMLWriter.WriteStartElement("wscalcularquimiqueros.ExecuteResponse");
         GXSoapXMLWriter.WriteAttribute("xmlns", "CalcularPeajes");
         if (currSoapErr == 0)
         {
             GXSoapXMLWriter.WriteElement("Dominioimo", StringUtil.RTrim(AV16DominioIMO));
             GXSoapXMLWriter.WriteAttribute("xmlns", "CalcularPeajes");
             GXSoapXMLWriter.WriteElement("Resultado", StringUtil.RTrim(AV17Resultado));
             GXSoapXMLWriter.WriteAttribute("xmlns", "CalcularPeajes");
         }
         else
         {
             GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Fault");
             GXSoapXMLWriter.WriteElement("faultcode", "SOAP-ENV:Client");
             GXSoapXMLWriter.WriteElement("faultstring", currSoapErrmsg);
             GXSoapXMLWriter.WriteElement("detail", StringUtil.Trim(StringUtil.Str((decimal)(currSoapErr), 10, 0)));
             GXSoapXMLWriter.WriteEndElement();
         }
         GXSoapXMLWriter.WriteEndElement();
         GXSoapXMLWriter.WriteEndElement();
     }
     GXSoapXMLWriter.WriteEndElement();
     GXSoapXMLWriter.Close();
     cleanup();
 }
Example #3
0
 void executePrivate( )
 {
     /* GeneXus formulas */
     /* Output device settings */
     context.nSOAPErr         = 0;
     context.sSOAPErrMsg      = "";
     GXSoapHTTPClient.Host    = context.GetServerName( );
     GXSoapHTTPClient.Port    = context.GetServerPort( );
     GXSoapHTTPClient.BaseURL = context.GetScriptPath( );
     SoapParm.AssignLocationProperties(context, "AwsCalcularPasajeros", GXSoapHTTPClient);
     GXSoapHTTPClient.AddHeader("Content-type", "text/xml;charset=utf-8");
     GXSoapHTTPClient.AddHeader("SOAPAction", "CalcularPeajesaction/" + "AWSCALCULARPASAJEROS.Execute");
     GXSoapXMLWriter.OpenRequest(GXSoapHTTPClient);
     GXSoapXMLWriter.WriteStartDocument("utf-8", 0);
     GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Envelope");
     GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENV", "http://schemas.xmlsoap.org/soap/envelope/");
     GXSoapXMLWriter.WriteAttribute("xmlns:xsd", "http://www.w3.org/2001/XMLSchema");
     GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENC", "http://schemas.xmlsoap.org/soap/encoding/");
     GXSoapXMLWriter.WriteAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance");
     GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Body");
     GXSoapXMLWriter.WriteStartElement("Execute");
     GXSoapXMLWriter.WriteAttribute("xmlns", "CalcularPeajes");
     GXSoapXMLWriter.WriteElement("Paxitc", StringUtil.Trim(StringUtil.Str((decimal)(AV2PAXITC), 10, 0)));
     GXSoapXMLWriter.WriteAttribute("xmlns", "http://tempuri.org/");
     GXSoapXMLWriter.WriteElement("Trb", StringUtil.Trim(StringUtil.Str((decimal)(AV3TRB), 10, 0)));
     GXSoapXMLWriter.WriteAttribute("xmlns", "http://tempuri.org/");
     GXSoapXMLWriter.WriteElement("Cpsuab", StringUtil.Trim(StringUtil.Str((decimal)(AV4CPSUAB), 10, 0)));
     GXSoapXMLWriter.WriteAttribute("xmlns", "http://tempuri.org/");
     GXSoapXMLWriter.WriteEndElement();
     GXSoapXMLWriter.WriteEndElement();
     GXSoapXMLWriter.WriteEndElement();
     GXSoapXMLWriter.Close();
     GXSoapHTTPClient.Execute("POST", "awscalcularpasajeros.aspx");
     if (GXSoapHTTPClient.ErrCode != 0)
     {
         currSoapErr    = (short)(GXSoapHTTPClient.ErrCode * -1 - 10000);
         currSoapErrmsg = GXSoapHTTPClient.ErrDescription;
     }
     GXSoapXMLReader.OpenResponse(GXSoapHTTPClient);
     GXSoapError = GXSoapXMLReader.Read();
     while (GXSoapError > 0)
     {
         if (StringUtil.StringSearch(GXSoapXMLReader.Name, "Body", 1) > 0)
         {
             if (true)
             {
                 break;
             }
         }
         GXSoapError = GXSoapXMLReader.Read();
     }
     if (GXSoapError > 0)
     {
         GXSoapError = GXSoapXMLReader.Read();
         if ((GXSoapError > 0) && (StringUtil.StrCmp(GXSoapXMLReader.LocalName, "Fault") == 0))
         {
             soapFault = 1;
         }
     }
     sTagName = GXSoapXMLReader.Name;
     if (GXSoapXMLReader.IsSimple == 0)
     {
         if (soapFault == 0)
         {
             GXSoapError = GXSoapXMLReader.Read();
             if ((GXSoapError > 0) && (StringUtil.StrCmp(GXSoapXMLReader.LocalName, "Fault") == 0))
             {
                 soapFault = 1;
             }
         }
         if (soapFault == 1)
         {
             GXSoapXMLReader.Read();
             while (!((StringUtil.StrCmp(GXSoapXMLReader.LocalName, "Fault") == 0) && (GXSoapXMLReader.NodeType == 2)))
             {
                 if (StringUtil.StrCmp(StringUtil.Lower(GXSoapXMLReader.Name), "faultcode") == 0)
                 {
                     sFaultCode = GXSoapXMLReader.Value;
                 }
                 else if (StringUtil.StrCmp(StringUtil.Lower(GXSoapXMLReader.Name), "faultstring") == 0)
                 {
                     sFaultString = GXSoapXMLReader.Value;
                 }
                 else if (StringUtil.StrCmp(StringUtil.Lower(GXSoapXMLReader.Name), "detail") == 0)
                 {
                     if (GXSoapXMLReader.IsSimple == 0)
                     {
                         GXSoapXMLReader.Read();
                         sDetail = GXSoapXMLReader.ReadRawXML();
                     }
                     else
                     {
                         sDetail = GXSoapXMLReader.Value;
                     }
                 }
                 GXSoapXMLReader.Read();
             }
             if (StringUtil.StringSearch(StringUtil.Lower(sFaultCode), "client", 1) > 0)
             {
                 currSoapErr    = (short)(-20004);
                 currSoapErrmsg = currSoapErrmsg + "SOAP Fault: Error in client request." + StringUtil.NewLine( ) + "Message: " + sFaultString + StringUtil.NewLine( ) + "Detail: " + sDetail;
             }
             else if (StringUtil.StringSearch(StringUtil.Lower(sFaultCode), "server", 1) > 0)
             {
                 currSoapErr    = (short)(-20005);
                 currSoapErrmsg = currSoapErrmsg + "SOAP Fault: Error in server execution." + StringUtil.NewLine( ) + "Message: " + sFaultString + StringUtil.NewLine( ) + "Detail: " + sDetail;
             }
             else
             {
                 currSoapErr    = (short)(-20006);
                 currSoapErrmsg = currSoapErrmsg + "Unknown error: " + sFaultCode + StringUtil.NewLine( ) + "Message: " + sFaultString + StringUtil.NewLine( ) + "Detail: " + sDetail;
             }
         }
         else
         {
             nOutParmCount = 0;
             while (((StringUtil.StrCmp(GXSoapXMLReader.Name, sTagName) != 0) || (GXSoapXMLReader.NodeType == 1)) && (GXSoapError > 0))
             {
                 readOk = 0;
                 if (StringUtil.StrCmp2(GXSoapXMLReader.LocalName, "Resultado") && (GXSoapXMLReader.NodeType != 2) && (StringUtil.StrCmp(GXSoapXMLReader.NamespaceURI, "http://tempuri.org/") == 0))
                 {
                     AV5Resultado = GXSoapXMLReader.Value;
                     if (GXSoapError > 0)
                     {
                         readOk = 1;
                     }
                     GXSoapError = GXSoapXMLReader.Read();
                 }
                 nOutParmCount = (short)(nOutParmCount + 1);
                 if (readOk == 0)
                 {
                     context.sSOAPErrMsg = context.sSOAPErrMsg + "Error reading " + sTagName + StringUtil.NewLine( );
                     context.sSOAPErrMsg = context.sSOAPErrMsg + "Message: " + GXSoapXMLReader.ReadRawXML();
                     GXSoapError         = (short)(nOutParmCount * -1);
                 }
             }
         }
     }
     GXSoapXMLReader.Close();
     if (currSoapErr == 0)
     {
         if (GXSoapError < 0)
         {
             currSoapErr    = (short)(GXSoapError * -1);
             currSoapErrmsg = context.sSOAPErrMsg;
         }
         else
         {
             if (GXSoapXMLReader.ErrCode > 0)
             {
                 currSoapErr    = (short)(GXSoapXMLReader.ErrCode * -1);
                 currSoapErrmsg = GXSoapXMLReader.ErrDescription;
             }
             else
             {
                 if (GXSoapError == 0)
                 {
                     currSoapErr    = (short)(-20001);
                     currSoapErrmsg = "Malformed SOAP message.";
                 }
                 else
                 {
                     currSoapErr    = 0;
                     currSoapErrmsg = "No error.";
                 }
             }
         }
     }
     if (currSoapErr != 0)
     {
         oLocation = SoapParm.getlocation(context, "AwsCalcularPasajeros");
         if (oLocation.CancelOnError == 1)
         {
             throw new Exception(currSoapErrmsg + "(" + StringUtil.LTrim(StringUtil.NToC((decimal)(currSoapErr), 6, 0, ".", "")) + ")");
         }
     }
     context.nSOAPErr    = currSoapErr;
     context.sSOAPErrMsg = currSoapErrmsg;
     this.cleanup();
 }
        public String execute( )
        {
            String returnexecute;

            returnexecute            = "";
            context.nSOAPErr         = 0;
            context.sSOAPErrMsg      = "";
            GXSoapHTTPClient.Host    = "tise-wks-345508.canal.acp";
            GXSoapHTTPClient.Port    = 80;
            GXSoapHTTPClient.BaseURL = "/CalcularPeajes.NetEnvironment/";
            SoapParm.AssignLocationProperties(context, "wsrest_services", GXSoapHTTPClient);
            if (StringUtil.StrCmp(defaultExecute, "") == 0)
            {
                targetResourceName = (String)(SoapParm.GetResourceName(context, "wsrest_services"));
                if (StringUtil.StrCmp(targetResourceName, "") == 0)
                {
                    execName = "wsrest.svc";
                }
                else
                {
                    execName = targetResourceName;
                }
            }
            else
            {
                execName = defaultExecute;
            }
            GXSoapHTTPClient.AddHeader("Content-type", "text/xml;charset=utf-8");
            GXSoapHTTPClient.AddHeader("SOAPAction", "GeneXus.Programs.wsrest_services/wsrest_services/execute");
            GXSoapXMLWriter.OpenRequest(GXSoapHTTPClient);
            GXSoapXMLWriter.WriteStartDocument("utf-8", 0);
            GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Envelope");
            GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENV", "http://schemas.xmlsoap.org/soap/envelope/");
            GXSoapXMLWriter.WriteAttribute("xmlns:xsd", "http://www.w3.org/2001/XMLSchema");
            GXSoapXMLWriter.WriteAttribute("xmlns:SOAP-ENC", "http://schemas.xmlsoap.org/soap/encoding/");
            GXSoapXMLWriter.WriteAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance");
            if (!(soapHeaders == null))
            {
                if (soapHeaders.Count > 0)
                {
                    soapHeaders.writexml(GXSoapXMLWriter, "SOAP-ENV:Header", "");
                }
            }
            else
            {
                if (!(String.IsNullOrEmpty(StringUtil.RTrim(soapHeadersRaw))))
                {
                    GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Header");
                    GXSoapXMLWriter.WriteRawText(soapHeadersRaw);
                    GXSoapXMLWriter.WriteEndElement();
                }
            }
            GXSoapXMLWriter.WriteStartElement("SOAP-ENV:Body");
            GXSoapXMLWriter.WriteElement("execute", "");
            GXSoapXMLWriter.WriteAttribute("xmlns", "GeneXus.Programs.wsrest_services");
            GXSoapXMLWriter.WriteEndElement();
            GXSoapXMLWriter.WriteEndElement();
            GXSoapXMLWriter.Close();
            GXSoapHTTPClient.Execute("POST", execName);
            if (GXSoapHTTPClient.ErrCode != 0)
            {
                currSoapErr    = (short)(GXSoapHTTPClient.ErrCode * -1 - 10000);
                currSoapErrmsg = GXSoapHTTPClient.ErrDescription;
            }
            GXSoapXMLReader.OpenResponse(GXSoapHTTPClient);
            GXSoapError = GXSoapXMLReader.Read();
            while (GXSoapError > 0)
            {
                if (StringUtil.StringSearch(GXSoapXMLReader.Name, "Body", 1) > 0)
                {
                    if (true)
                    {
                        break;
                    }
                }
                GXSoapError = GXSoapXMLReader.Read();
            }
            if (GXSoapError > 0)
            {
                GXSoapError = GXSoapXMLReader.Read();
                if ((GXSoapError > 0) && (StringUtil.StrCmp(GXSoapXMLReader.LocalName, "Fault") == 0))
                {
                    soapFault = 1;
                }
            }
            sTagName = GXSoapXMLReader.Name;
            if (GXSoapXMLReader.IsSimple == 0)
            {
                if (soapFault == 0)
                {
                    GXSoapError = GXSoapXMLReader.Read();
                    if ((GXSoapError > 0) && (StringUtil.StrCmp(GXSoapXMLReader.LocalName, "Fault") == 0))
                    {
                        soapFault = 1;
                    }
                }
                if (soapFault == 1)
                {
                    soapFaultHandling( );
                }
                else
                {
                    nOutParmCount = 0;
                    while (((StringUtil.StrCmp(GXSoapXMLReader.Name, sTagName) != 0) || (GXSoapXMLReader.NodeType == 1)) && (GXSoapError > 0))
                    {
                        readOk = 0;
                        if (StringUtil.StrCmp2(GXSoapXMLReader.LocalName, "Resultado") && (GXSoapXMLReader.NodeType != 2) && (StringUtil.StrCmp(GXSoapXMLReader.NamespaceURI, "GeneXus.Programs.wsrest_services") == 0))
                        {
                            returnexecute = GXSoapXMLReader.Value;
                            if (GXSoapError > 0)
                            {
                                readOk = 1;
                            }
                            GXSoapError = GXSoapXMLReader.Read();
                        }
                        nOutParmCount = (short)(nOutParmCount + 1);
                        if (readOk == 0)
                        {
                            context.sSOAPErrMsg = context.sSOAPErrMsg + "Error reading " + sTagName + StringUtil.NewLine( );
                            context.sSOAPErrMsg = context.sSOAPErrMsg + "Message: " + GXSoapXMLReader.ReadRawXML();
                            GXSoapError         = (short)(nOutParmCount * -1);
                        }
                    }
                }
            }
            GXSoapXMLReader.Close();
            if (currSoapErr == 0)
            {
                if (GXSoapError < 0)
                {
                    currSoapErr    = (short)(GXSoapError * -1);
                    currSoapErrmsg = context.sSOAPErrMsg;
                }
                else
                {
                    if (GXSoapXMLReader.ErrCode > 0)
                    {
                        currSoapErr    = (short)(GXSoapXMLReader.ErrCode * -1);
                        currSoapErrmsg = GXSoapXMLReader.ErrDescription;
                    }
                    else
                    {
                        if (GXSoapError == 0)
                        {
                            currSoapErr    = (short)(-20001);
                            currSoapErrmsg = "Malformed SOAP message.";
                        }
                        else
                        {
                            currSoapErr    = 0;
                            currSoapErrmsg = "No error.";
                        }
                    }
                }
            }
            if (currSoapErr != 0)
            {
                oLocation = SoapParm.getlocation(context, "wsrest_services");
                if ((oLocation.CancelOnError == 0) || (oLocation.CancelOnError == 1))
                {
                    throw new Exception(currSoapErrmsg + "(" + StringUtil.LTrim(StringUtil.NToC((decimal)(currSoapErr), 6, 0, ".", "")) + ")");
                }
            }
            context.nSOAPErr    = currSoapErr;
            context.sSOAPErrMsg = currSoapErrmsg;
            return(returnexecute);
        }