cancel
Showing results for 
Search instead for 
Did you mean: 

SAP nfe código java

Former Member
0 Kudos

Ricardo,

Segue os cóidog java que estou usando.

Alterei pouco coisa do seu.

Atenciosamente,

Cláudio Argolo

Accepted Solutions (0)

Answers (2)

Answers (2)

rhviana
Active Contributor
0 Kudos

Sugestão antes de você ativar tudo e fazer um teste unitário, faça o teste direto no interface mapping.

Como demonstrado na imagem 3.

Abraco

Former Member
0 Kudos

Ricardo,

mandei o convite gtalk para ricardoviana@gmal.com, está correto?

Segue o teste na interface, aparentemente funciona, mas quando chega o arquivo não.

Abraços,

Argolo

Former Member
0 Kudos

Ricardo,

baixei o eclipse java juno e o SDK 4-2, mas ambos estão dando erro na instalação.

Você recomenda algum em especial?

Abraços,

claudio.argolo@gmail.com

rhviana
Active Contributor
0 Kudos

Claudio,

Vou analisar o código, ajustar, compilar, gerar o jar e testar.

Funcionando te mando o jar so para você importar e refazer os interfaces mappings.

Att,

Viana.

Former Member
0 Kudos

Ricardo,

Como informação adicional, estou usando a função /XNFE/SEND_NFE_B2B para disparar o arquivo B2B. Usando a sequência abaixo.

   * Selecionar dados da nota
  CALL FUNCTION '/XNFE/READ_SINGLE_NFE'
    EXPORTING
      IV_NFEID     = IV_NFEID
    IMPORTING
      ES_NFEHD     = T_NFEHD
    EXCEPTIONS
      NO_NFE_FOUND = 1
      OTHERS       = 2.

* Efetuar o reenvio
  IF SY-SUBRC = 0.

    CALL FUNCTION '/XNFE/READ_XML'
    EXPORTING
      IV_ID              = IV_NFEID
      IV_TYPE            = '1'
      IV_TPEMIS          = T_NFEHD-TPEMIS
    IMPORTING
      ES_XML             = T_XML
    EXCEPTIONS
      NO_XML_FOUND       = 1
      ERROR_READING_KPRO = 2
      OTHERS             = 3.
    IF SY-SUBRC <> 0.
    MESSAGE E040(/XNFE/APP) INTO V_SYST_ERR WITH T_NFEHD-ID.
    ENDIF.


CALL FUNCTION '/XNFE/SEND_NFE_B2B'
  EXPORTING
    IS_NFEHD          = T_NFEHD
    IV_XML            = T_XML-XMLSTRING
    IV_SCENARIO       = 'BUYER'
IMPORTING
   EV_ERROR          = V_SYST_ERR
EXCEPTIONS
   NO_XML_DATA       = 1
   NO_NFE_DATA       = 2
   OTHERS            = 3

Não sei se ajuda na investigação.

Abraço,

Argolo

rhviana
Active Contributor
0 Kudos

Argolo,

No caso essa é a função stantarnd disparada automaticamente.

Fiz o teste no seu código, compilei, e funcionou - favor verificar imagens abaixo:

E-mail recebi com xml em anexo.

  Codigo Fonte

Teste no interface mapping NTB2B - NFE envio

Veriricar validada dos dados XML sefaz RS

Consulta site da sefaz Homologacao a chave de acesso com assinatura valida pela sefaz RS e recebido por e-mail:

Me adiciona no gtalk para poder te enviar o arquivo compilado.

Acho que é isso.

Atenciosamente,

Viana.