diff --git a/.gitignore b/.gitignore index cb4a18e..8eaa62d 100644 --- a/.gitignore +++ b/.gitignore @@ -2,3 +2,20 @@ # Project-level settings /.tgitconfig +# Archivos temporales +*.tmp +*.bak +*.swp +*.log + +# Archivos de integración continua +/.settings/ +/.project +/.classpath +/.factorypath + +# Carpetas +.data/ +.git/ +System/ + diff --git a/Pom.xml b/Pom.xml new file mode 100644 index 0000000..e69de29 diff --git a/SocketAdapterUtilMgmtSvc-Config/README.txt b/SocketAdapterUtilMgmtSvc-Config/README.txt new file mode 100644 index 0000000..2035296 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc-Config/README.txt @@ -0,0 +1 @@ +Este es el README de la carpeta 'SocketAdapterUtilMgmtSvc-Config' diff --git a/SocketAdapterUtilMgmtSvc-Document/README.txt b/SocketAdapterUtilMgmtSvc-Document/README.txt new file mode 100644 index 0000000..3ecf8bf --- /dev/null +++ b/SocketAdapterUtilMgmtSvc-Document/README.txt @@ -0,0 +1 @@ +Este es el README de la carpeta 'SocketAdapterUtilMgmtSvc-Document' diff --git a/SocketAdapterUtilMgmtSvc-testing/README.txt b/SocketAdapterUtilMgmtSvc-testing/README.txt new file mode 100644 index 0000000..ba72739 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc-testing/README.txt @@ -0,0 +1 @@ +Este es el README de la carpeta 'SocketAdapterUtilMgmtSvc-testing' diff --git a/SocketAdapterUtilMgmtSvc.jws b/SocketAdapterUtilMgmtSvc.jws new file mode 100644 index 0000000..b74348d --- /dev/null +++ b/SocketAdapterUtilMgmtSvc.jws @@ -0,0 +1,51 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/SocketAdapterUtilMgmtSvc/SocketAdapterUtilMgmtSvc.jpr b/SocketAdapterUtilMgmtSvc/SocketAdapterUtilMgmtSvc.jpr new file mode 100644 index 0000000..ae175d6 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/SocketAdapterUtilMgmtSvc.jpr @@ -0,0 +1,198 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/SocketAdapterUtilMgmtSvc/business/SocketAdapter_default.bix b/SocketAdapterUtilMgmtSvc/business/SocketAdapter_default.bix new file mode 100644 index 0000000..11a8e51 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/business/SocketAdapter_default.bix @@ -0,0 +1,68 @@ + + + + This business implements the JCA Socket connection for Default channel. + + + + SocketReply_ptt-binding + http://xmlns.oracle.com/pcbpel/adapter/socket/SocketService + + + + + full + 10000 + + + 10 + 5000 + 30000 + + + true + + + no-policies + + + 1.0 + + + + jca + false + + jca://eis/socket/default + + + round-robin + 0 + 30 + false + + + + SocketPrueba + SOCKET + true + managed + false + + + SocketReply + + + Xslt + xsl/invokeSocket.xsl + + + TransMode + XSLT + + + + + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapter.dvm b/SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapter.dvm new file mode 100644 index 0000000..7030788 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapter.dvm @@ -0,0 +1,85 @@ + + Definicion de los JNDI para cada servicio segun el canal + + + + + + + BanolAffiliationOutAppSvc + jca://eis/socket/Generic + + + IVRCreditCardOutAppSvc + jca://eis/socket/Generic + + + IVRCustomer360ViewOutAppSvc + jca://eis/socket/Generic + + + IVRCustomerOutAppSvc + jca://eis/socket/Generic + + + IVRFinancialAccountOutAppSvc + jca://eis/socket/Generic + + + IVRSecurityOutAppSvc + jca://eis/socket/Generic + + + SAMFAffiliationOutAppSvc + jca://eis/socket/Generic + + + SAMFFinancialAccountOutAppSvc + jca://eis/socket/Generic + + + SAMFPaymentOutAppSvc + jca://eis/socket/Generic + + + PortalAGSCustomer360ViewOutAppSvc + jca://eis/socket/PortalAGSCustomer360View + + + PortalAGSLegalCustomerOutAppSvc + jca://eis/socket/PortalAGSLegalCustomer + + + PortalAGSNaturalCustomerOutAppSvc + jca://eis/socket/PortalAGSNaturalCustomer + + + PortalPaymentRiskRatingOutAppSvc + jca://eis/socket/Generic + + + PortalPaymentFinancialAccountOutAppSvc + jca://eis/socket/Generic + + + ParserNaturalCustomerOutAppSvc + jca://eis/socket/ParserNaturalCustomer + + + APICustomer360ViewOutAppSvc + jca://eis/socket/Generic + + + APIFinancialAccountOutAppSvc + jca://eis/socket/Generic + + + APIRiskRatingOutAppSvc + jca://eis/socket/Generic + + + TesoreriaOutAppSvc + jca://eis/socket/Tesoreria + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapterBNET.dvm b/SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapterBNET.dvm new file mode 100644 index 0000000..5b92da0 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapterBNET.dvm @@ -0,0 +1,67 @@ + + + + Permite las conexiones por el canal BNET + + + + + + + 0802 + jca://eis/socket/BNET/Financial + + + 7194 + jca://eis/socket/BNET/Financial + + + 8760 + jca://eis/socket/BNET/Movements + + + 8714 + jca://eis/socket/BNET/Movements + + + 6768 + jca://eis/socket/BNET/Generic + + + 6122 + jca://eis/socket/BNET/Financial + + + 8741 + jca://eis/socket/BNET/Generic + + + 6255 + jca://eis/socket/BNET/Generic + + + 8428 + jca://eis/socket/BNET/Generic + + + 0003 + jca://eis/socket/BNET/Movements + + + 7721 + jca://eis/socket/BNET/Generic + + + 7723 + jca://eis/socket/BNET/Generic + + + 6133 + jca://eis/socket/BNET/Movements + + + 8797 + jca://eis/socket/BNET/Movements + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapterCRMTT.dvm b/SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapterCRMTT.dvm new file mode 100644 index 0000000..f008602 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapterCRMTT.dvm @@ -0,0 +1,59 @@ + + + + Permite las conexiones por el canal CRMTT + + + + + + + 6333 + jca://eis/socket/CRMTT/Financial + + + 6348 + jca://eis/socket/CRMTT/Financial + + + 0704 + jca://eis/socket/CRMTT/Financial + + + 7805 + jca://eis/socket/CRMTT/Transactions + + + 6363 + jca://eis/socket/CRMTT/Financial + + + 6659 + jca://eis/socket/CRMTT/Generic + + + 6646 + jca://eis/socket/CRMTT/Financial + + + 6661 + jca://eis/socket/CRMTT/Generic + + + 6873 + jca://eis/socket/CRMTT/Financial + + + 6658 + jca://eis/socket/CRMTT/Financial + + + 6674 + jca://eis/socket/CRMTT/Generic + + + 7126 + jca://eis/socket/CRMTT/Generic + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/SocketAdapter_default.jca b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/SocketAdapter_default.jca new file mode 100644 index 0000000..2d39a5b --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/SocketAdapter_default.jca @@ -0,0 +1,10 @@ + + + + + + + + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/wsdl/ParserAS400.wsdl b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/wsdl/ParserAS400.wsdl new file mode 100644 index 0000000..f82527e --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/wsdl/ParserAS400.wsdl @@ -0,0 +1,31 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/wsdl/SocketAdapter.wsdl b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/wsdl/SocketAdapter.wsdl new file mode 100644 index 0000000..18c3cb4 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/wsdl/SocketAdapter.wsdl @@ -0,0 +1,24 @@ + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/wsdl/SocketAdapter_default-concrete.wsdl b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/wsdl/SocketAdapter_default-concrete.wsdl new file mode 100644 index 0000000..e4442fa --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/wsdl/SocketAdapter_default-concrete.wsdl @@ -0,0 +1,15 @@ + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/xsd/ParserAS400.xsd b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/xsd/ParserAS400.xsd new file mode 100644 index 0000000..8166234 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/xsd/ParserAS400.xsd @@ -0,0 +1,17 @@ + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/xsl/invokeSocket.xsl b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/xsl/invokeSocket.xsl new file mode 100644 index 0000000..c5c3a65 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/jca/SocketAdapter/xsl/invokeSocket.xsl @@ -0,0 +1,26 @@ + + + + + + + + + + + + + + + + + + + + + + + </soap:Envelope> + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/operations/CallVBAny/proxy/SocketAdapterUtilMgmtSvc_CallVBAny.pipeline b/SocketAdapterUtilMgmtSvc/operations/CallVBAny/proxy/SocketAdapterUtilMgmtSvc_CallVBAny.pipeline new file mode 100644 index 0000000..1eab6e4 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/operations/CallVBAny/proxy/SocketAdapterUtilMgmtSvc_CallVBAny.pipeline @@ -0,0 +1,226 @@ + + + + This pipeline implements CallVBAny method. + + + + SocketServicePortBinding + http://Obi_Wan/EjecutaTRX + + + + + + + 1.0 + + + + + + + + + + + + _ActionId-N3f579cff.35c5fd5c.0.1570a5e64da.N7ffe + + par:ParserAS400ProcessResponse + body + + ./adapter:ParserAS400ProcessResponse + + + + + + + + + + + + _ActionId-a7c046f.3ad80125.0.1570d46ced1.N7ffe + + . + + + fn-bea:inlinedXML($body/adapter:ParserAS400ProcessResponse/result/text())/soap-env:Envelope/soap-env:Body/ejec:EjecutaTRXResponse + + + + + + + + + + + _ActionId-N3f57c7ff.2208e8ab.0.1566fe4977d.N7f2c + + 'Node: NOT-DEFINED Stage: NOT-DEFINED' + + + + _ActionId-N3f57c7ff.2208e8ab.0.1566fe4977d.N7f2b + + + exists($fault/ctx:location) + + + + _ActionId-N3f57c7ff.2208e8ab.0.1566fe4977d.N7f29 + + concat("Node: ", data($fault/ctx:location/ctx:node), " Stage: ",data($fault/ctx:location/ctx:stage)) + + + + + + + _ActionId-N3f57c7ff.2208e8ab.0.1566fe4977d.N7f28 + error + + fn:concat('[',fn:current-dateTime(),'][MessageID : ',$messageID,'][Global Error Handler][',fn:tokenize($inbound/@name,'\$')[last()],'/',$operation,'- message : ',$message,' - fault: ',fn-bea:serialize($fault),' - body : ',fn-bea:serialize($backupBody/*),'][Global Error Handler]') + + Global Error + + + _ActionId-N3f57c7ff.2208e8ab.0.1566fe4977d.N7f27 + + Banesco: Oracle Service Bus Error + fatal + + fn:concat('[',fn:current-dateTime(),'][MessageID : ',$messageID,'][Global Error Handler][',fn:tokenize($inbound/@name,'\$')[last()],'/',$operation,'- message : ',$message,' - fault: ',fn-bea:serialize($fault),' - body : ',fn-bea:serialize($backupBody/*),'][Global Error Handler]') + + + + _ActionId-N3f57c7ff.2208e8ab.0.1566fe4977d.N7f26 + + . + + + + + + $inbound + + + $fault + + + + + + _ActionId-N3f57c7ff.2208e8ab.0.1566fe4977d.N7f22 + + + + + + + + + + _ActionId-a7c0476.6efecabb.0.15a8fddb462.N7fca + + let $uriProxy := fn:tokenize($proxyName, '\$') +return + $uriProxy[2] + + + + _ActionId-a96189c.N63b4b16e.0.15e9ac0f352.N7ff6 + + dvm:lookup('SocketAdapterUtilMgmtSvc/dvm/JNDISocketAdapter', 'CHANNEL', $serviceName, 'JNDI', 'jca://eis/socket/default') + + + + + + + true + + + _ActionId-N56015f30.7f264938.0.15a951a94ef.N7ff8 + error + + fn:concat('urlJNDI: ', $urlJNDI, ' - serviceName: ', $serviceName) + + VARIABLES JNDI + + + + + + + + + + _ActionId-a7c0466.48e6c3c.0.1570be1443d.N7f92 + + . + + + + + + $body/ejec:EjecutaTRX + + + + + + + + + + + + + + _ActionId-N3f579cff.N49999f53.0.1570a3dfaf7.N7fb3 + + par:ParserAS400Process + body + + ./adapter:ParserAS400Process + + + + + + + + request-N3f57c7ff.2208e8ab.0.1566fe4977d.N7eef + response-N3f57c7ff.2208e8ab.0.1566fe4977d.N7eee + + + + + + _ActionId-a7c0466.48e6c3c.0.1570be1443d.N7f99 + + SocketReply + + + _ActionId-a7c0466.48e6c3c.0.1570be1443d.N7f96 + + $urlJNDI + + + + + + + + + + proxyNameInt + proxyName + + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/operations/CallVBAny/xq/SocketAdapterUtilMgmtSvc_CallVBAny_UtilToAdapter.xqy b/SocketAdapterUtilMgmtSvc/operations/CallVBAny/xq/SocketAdapterUtilMgmtSvc_CallVBAny_UtilToAdapter.xqy new file mode 100644 index 0000000..66691fe --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/operations/CallVBAny/xq/SocketAdapterUtilMgmtSvc_CallVBAny_UtilToAdapter.xqy @@ -0,0 +1,31 @@ +xquery version "1.0" encoding "utf-8"; + +(:: OracleAnnotationVersion "1.0" ::) + +declare namespace ns2="http://Obi_Wan/EjecutaTRX"; +(:: import schema at "../../../../BanescoCommonArtifacts/xsd/infrastructureApplications/VBAny.xsd" ::) +declare namespace ns1="http://xmlns.oracle.com/ParserAS400/"; +(:: import schema at "../../../jca/SocketAdapter/xsd/ParserAS400.xsd" ::) + +declare namespace xf = "http://tempuri.org/SocketAdapterUtilMgmtSvc/operations/CallVBAny/xq/SocketAdapterUtilMgmtSvc_CallVBAny_UtilToAdapter/"; + +import module namespace xqu="http://xmlns.banesco.com/xquey-functions" at "../../../../BanescoCommonArtifacts/xq/libraries/xmlUtil.xqy"; + +declare variable $request as element() (:: schema-element(ns2:EjecutaTRX) ::) external; + + +declare function xf:SocketAdapterUtilMgmtSvc_CallVBAny_UtilToAdapter($request as element() (:: schema-element(ns2:EjecutaTRX) ::)) as element() (:: schema-element(ns1:ParserAS400Process) ::) { + + + + <soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"><soap:Body> + { + fn-bea:serialize(xqu:add-attributes(xqu:change-element-ns-deep($request, '',''), xs:QName('ns'),'http://Obi_Wan/EjecutaTRX')) + } + </soap:Body></soap:Envelope> + + +}; + + +xf:SocketAdapterUtilMgmtSvc_CallVBAny_UtilToAdapter($request) \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/pom.xml b/SocketAdapterUtilMgmtSvc/pom.xml new file mode 100644 index 0000000..d90b4de --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/pom.xml @@ -0,0 +1,20 @@ + + + + 4.0.0 + + + com.oracle.servicebus + sbar-project-common + 12.2.1-5-0 + + + SocketAdapterUtilMgmtSvc + SocketAdapterUtilMgmtSvc + 1.0-SNAPSHOT + + sbar + + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/proxy/SocketAdapterUtilMgmtSvc.pipeline b/SocketAdapterUtilMgmtSvc/proxy/SocketAdapterUtilMgmtSvc.pipeline new file mode 100644 index 0000000..75a3eb1 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/proxy/SocketAdapterUtilMgmtSvc.pipeline @@ -0,0 +1,137 @@ + + + + This pipeline implements the following methods: +1.- CallVBAny + + + + SocketServicePortBinding + http://Obi_Wan/EjecutaTRX + + + + + + + 1.0 + + + + + + + + + _ActionId-N3f5776ff.4607c340.0.1566c1d8b70.N7cd1 + + concat("Node: ", data($fault/ctx:location/ctx:node), " Stage: ",data($fault/ctx:location/ctx:stage)) + + + + _ActionId-N3f5776ff.4607c340.0.1566c1d8b70.N7cd0 + error + + fn:concat('[',fn:current-dateTime(),'][MessageID : ',$messageID,'][Global Error Handler][',fn:tokenize($inbound/@name,'\$')[last()],'/',$operation,'- message : ',$message,' - fault: ',fn-bea:serialize($fault),' - body : ',fn-bea:serialize($backupBody/*),'][Global Error Handler]') + + Global Error + + + _ActionId-N3f5776ff.4607c340.0.1566c1d8b70.N7ccf + + Banesco: Oracle Service Bus Error + fatal + + fn:concat('[',fn:current-dateTime(),'][MessageID : ',$messageID,'][Global Error Handler][',fn:tokenize($inbound/@name,'\$')[last()],'/',$operation,'- message : ',$message,' - fault: ',fn-bea:serialize($fault),' - body : ',fn-bea:serialize($backupBody/*),'][Global Error Handler]') + + + + _ActionId-N3f5776ff.4607c340.0.1566c1d8b70.N7cce + + . + + + + + + $inbound + + + $fault + + + + + + _ActionId-N3f5776ff.4607c340.0.1566c1d8b70.N7cca + + + + + + + + + + + _ActionId-N3f5776ff.4607c340.0.1566c1d8b70.N7e49 + + $header + + + + _ActionId-N3f5776ff.4607c340.0.1566c1d8b70.N7e48 + + $body + + + + + + + + request-N3f5776ff.4607c340.0.1566c1d8b70.N7e4b + response-N3f5776ff.4607c340.0.1566c1d8b70.N7e47 + + + + + + + + _ActionId-a954aaf.671fff6.0.1992f62f267.N7f96 + + + dvm:lookup('SocketAdapterUtilParser/dvm/MigrationParserVBs','CODTRN',$body/ejec:EjecutaTRX/ejec:TRXS/ejec:ListaTrxs/ejec:TRX/@CODTRN ,'STATUS',dvm:lookup('SocketAdapterUtilParser/dvm/ControllerParser','SVC','PARSER_VBS','STATUS','')) += +dvm:lookup('SocketAdapterUtilParser/dvm/ControllerParser','SVC','PARSER_OSB','STATUS','DPO') + + + + _ActionId-a954aaf.671fff6.0.1992f62f267.N7f92 + + CallVBAny + + + + + + + + _ActionId-a954aaf.671fff6.0.1992f62f267.N7f8f + + + {fn:concat("SocketAdapterUtilMgmtSvc/operations/",$operation,"/proxy/SocketAdapterUtilMgmtSvc_",$operation)} + {data($operation)} +]]> + + + + + + + + + + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/proxy/SocketAdapterUtilMgmtSvc.proxy b/SocketAdapterUtilMgmtSvc/proxy/SocketAdapterUtilMgmtSvc.proxy new file mode 100644 index 0000000..9568cea --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/proxy/SocketAdapterUtilMgmtSvc.proxy @@ -0,0 +1,36 @@ + + + + + + + + + + SocketServicePortBinding + http://Obi_Wan/EjecutaTRX + + + + + + full + 20000 + + + + + no-policies + + + + 1.0 + + + + local + true + + true + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/servicebus.sboverview b/SocketAdapterUtilMgmtSvc/servicebus.sboverview new file mode 100644 index 0000000..842e781 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/servicebus.sboverview @@ -0,0 +1,2 @@ + + \ No newline at end of file diff --git a/SocketAdapterUtilMgmtSvc/xq/SocketAdapterUtilMgmtSvc_ErrorToApplication.xqy b/SocketAdapterUtilMgmtSvc/xq/SocketAdapterUtilMgmtSvc_ErrorToApplication.xqy new file mode 100644 index 0000000..49b7e51 --- /dev/null +++ b/SocketAdapterUtilMgmtSvc/xq/SocketAdapterUtilMgmtSvc_ErrorToApplication.xqy @@ -0,0 +1,32 @@ +xquery version "1.0" encoding "utf-8"; + +(:: OracleAnnotationVersion "1.0" ::) + +declare namespace ns1="http://Obi_Wan/EjecutaTRX"; +(:: import schema at "../../BanescoCommonArtifacts/xsd/infrastructureApplications/VBAny.xsd" ::) + +declare namespace xf="http://tempuri.org/SocketAdapterUtilMgmtSvc/xq/SocketAdapterUtilMgmtSvc_ErrorToApplication/"; +declare namespace con = "http://www.bea.com/wli/sb/context"; +declare variable $fault as element()* external; +declare variable $inbound as element()* external; + +declare function xf:SocketAdapterUtilMgmtSvc_ErrorToApplication($fault as element()*, + $inbound as element()*) + as element() (:: schema-element(ns1:EjecutaTRXResponse) ::) { + + + + + + {fn:substring-before($fault, ',')} + {fn:data($fault/con:errorCode)} + 00000000 + {data($inbound/con:service/con:operation)} + + + + + +}; + +xf:SocketAdapterUtilMgmtSvc_ErrorToApplication($fault, $inbound) \ No newline at end of file