Jump to content
Fivewin Brasil

Sat-CFe erro 09099 erro desconhecido


mkyx

Recommended Posts

Será que alguém já conseguiu fazer funcionar o sat, uso o elgin

mas, ao fazer o teste-fim-a-fim, dá esse erro.

consulta sat e consulta status operacional, não dá problema, mas teste fim a fim, sim.

hdllSAT:=LoadLibrary( "DLLSAT.dll" ) // carrega a dll do sat

N_SESSAO:=INT(NRANDOM(999999)+1) //gera o número da sessão

RETORNO:=SATConsultar(N_SESSAO) // esse comando funciona bem

retorno:=CSO_sat(n_sessao, "1478963258") // esse comando tb funciona legal

mas, o comando testefimafim, não

Conteúdo xml: onde tem * (asterísco coloquei de propósito para não expor os dados verdadeiros)

<?xml version='1.0' encoding='UTF-8'?>
<CFe>
<infCFe versaoDadosEnt="0.06">
<ide>
<CNPJ>**************</CNPJ>
<signAC>F1Kr+w4+MNuKKjBO1Rv7enxubGG7HST1Tc6uWS3GOmHVN1V8AHs/5HhxDxO4quEdN5SqnEY6YjI997pp2oBPeeQZuy1mPzVOZk4IbheYFtyDEzHtNWwbU23gY1Gm64zmuv1O59YuJU0P+DBSzpmIiSP+1Mr0rwhCi1MZM/ia+lSnxbqi5xSUFgCRs/meDdsJtvGUVYBBn/boePaQ8Q3vrhKzjH0opjP8HHBMDBQDdf0Ghpln58Q0n++INviRG6i3FDfqk4FNgOUTItNYmnWarpCsy9LKlw/1t5s3HaQKyHmtJJwzODIvT8WPnMK3CU5qq3cbM7CTxJb2zWfn5Rc4fQ==</signAC>
<numeroCaixa>001</numeroCaixa>
</ide>
<emit>
<CNPJ>**************</CNPJ>
<IE>************</IE>
<cRegTribISSQN>1</cRegTribISSQN>
<indRatISSQN>N</indRatISSQN>
</emit>
<det nItem="1">
<prod>
<cProd>01</cProd>
<cEAN>7890000004046</cEAN>
<xProd>ACAI COM GUARANA</xProd>
<NCM>20089900</NCM>
<CFOP>5102</CFOP>
<uCom>UN</uCom>
<qCom>1.00</qCom>
<vUnCom>1.20</vUnCom>
<indRegra>A</indRegra>
</prod>
<imposto>
<vItem12741>0.30</vItem12741>
<ICMS>
<ICMSSN102>
<Orig>0</Orig>
<CSOSN>102</CSOSN>
</ICMSSN102>
</ICMS>
<PIS>
<PISSN>
<CST>49</CST>
</PISSN>
</PIS>
<COFINS>
<COFINSSN>
<CST>49</CST>
</COFINSSN>
</COFINS>
</imposto>
</det>
<vCFeLei12741>0.30</vCFeLei12741>
<pgto>
<MP>
<cMP>01</cMP>
<vMP>1.20</vMP>
</MP>
</pgto>
</infCFe>

</CFe>

cFileXML:="xml.xml"
Hxml := FOpen( cFileXML )
IF Hxml == -1
MsgStop("Não foi possível abrir o XML!")
Return(nil)
Endif
HxmlDoc := TXmlDocument():New( Hxml )
texto:=HxmlDoc:ToString()

retorno:=TesteFAF(STRZERO(N_SESSAO,6),"159357456",TEXTO)

********

as funções usadas no sistema:

DLL32 Function SATConsultar(NumeroSessao AS _INT) AS STRING PASCAL FROM "ConsultarSAT" LIB hdllSAT
DLL32 Function CSO_sat(NumeroSessao AS _INT, codigoDeAtivacao AS STRING) AS STRING PASCAL FROM "ConsultarStatusOperacional" LIB hdllSAT
DLL32 Function TesteFAF(NumeroSessao AS _INT, codigoAtivacao AS STRING, dadosVenda AS STRING) AS STRING FROM "TesteFimAFim" LIB hdllSAT

Obrigado pelas ajudas, já dispensadas

Pompeo

Guaratinguetá SP

Link to comment
Share on other sites

Ola mkyx, aqui não cheguei fazer o teste fim a fim, tb uso o aparelho da Elgin , o que fiz antes de tentar mandar pelo sistema foi enviar pelo proprio sistema da Elgin, la dentro tem a opção fiscal, dai vc busca seu xml e tenta enviar, desta forma vc terá certeza que pelo menos o XML esta correto, depois vc parte para parte de programação via sistema.

Abraços

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...