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(); }
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); }