Bom dia para todos os membros da comunidade.
Estou com um problema em me comunicar com o WEB server da Prefeitura de Itajai - SC,
mando o Protheus gerar o WEB SERVER, Client e ele retorna o metado de envio de NFEs desta maneira.
Client
--------------------------------------------------
WSMETHOD RecepcionarLoteRps WSSEND cXML WSRECEIVE creturn WSCLIENT WSServicesService
Local cSoap := "" , oXmlRet
BEGIN WSMETHOD
cSoap += '<q1:RecepcionarLoteRps xmlns:q1="http://www.w3.org/2001/XMLSchema">'
cSoap += WSSoapValue("XML", ::cXML, cXML , "string", .T. , .T. , 0 , NIL, .F.)
cSoap += "</q1:RecepcionarLoteRps>"
oXmlRet := SvcSoapCall( Self,cSoap,;
"",;
"RPCX","http://service.nfse.integracao.ws.publica/",,,;
"http://nfse.itajai.sc.gov.br:8080/nfse_integracao/Services")
::Init()
::creturn := WSAdvValue( oXmlRet,"_RETURN","string",NIL,NIL,NIL,"S",NIL,NIL)
END WSMETHOD
oXmlRet := NIL
Return .T.
Chamada do Metado:
----------------------------------------------------------------------------------------
oObj:_URL := "http://nfse.itajai.sc.gov.br/nfse_integracao/Services?wsdl"
lRet := oObj:RecepcionarLoteRps (cXmlNfs)
If lRet Retorno sempre NIL
Nao estou conseguindo ter um retorno, será que alguem poderia me auxiliar.
Obrigado.
Att.
Rafael Tapia
Estou com um problema em me comunicar com o WEB server da Prefeitura de Itajai - SC,
mando o Protheus gerar o WEB SERVER, Client e ele retorna o metado de envio de NFEs desta maneira.
Client
--------------------------------------------------
WSMETHOD RecepcionarLoteRps WSSEND cXML WSRECEIVE creturn WSCLIENT WSServicesService
Local cSoap := "" , oXmlRet
BEGIN WSMETHOD
cSoap += '<q1:RecepcionarLoteRps xmlns:q1="http://www.w3.org/2001/XMLSchema">'
cSoap += WSSoapValue("XML", ::cXML, cXML , "string", .T. , .T. , 0 , NIL, .F.)
cSoap += "</q1:RecepcionarLoteRps>"
oXmlRet := SvcSoapCall( Self,cSoap,;
"",;
"RPCX","http://service.nfse.integracao.ws.publica/",,,;
"http://nfse.itajai.sc.gov.br:8080/nfse_integracao/Services")
::Init()
::creturn := WSAdvValue( oXmlRet,"_RETURN","string",NIL,NIL,NIL,"S",NIL,NIL)
END WSMETHOD
oXmlRet := NIL
Return .T.
Chamada do Metado:
----------------------------------------------------------------------------------------
oObj:_URL := "http://nfse.itajai.sc.gov.br/nfse_integracao/Services?wsdl"
lRet := oObj:RecepcionarLoteRps (cXmlNfs)
If lRet Retorno sempre NIL
Nao estou conseguindo ter um retorno, será que alguem poderia me auxiliar.
Obrigado.
Att.
Rafael Tapia