CE PLUS - Nota 007109
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 08/08/2008 00:00:00
Data/Hora Última Alteração: 23/02/2011 09:22:46
Descrição da Nota: AJUSTE PARA UTILIZAR AS TRANSAÇÕES J1B2N E J1B3N
Sintoma
Ajusta o programa de recebimento e as funções de estorno e atualização de nota fiscal para utilizar
as transações J1B3N e J1B2N pois as transações J1B3 e J1B2 não podem ser utilizadas para nota fiscal
eletronica.
Solução
Ajusta o programa de recebimento e as funções de estorno e atualização de nota fiscal para utilizar
as transações J1B3N e J1B2N pois as transações J1B3 e J1B2 não podem ser utilizadas para nota fiscal
eletronica.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07109 Data: 08/08/2008 Hora: 10:19:24
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07109
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00006
Agrupamento : 00059
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
06996 - 00002 - 7.0 - 00006 - ESTORNO DE NOTA FISCAL NO CE QUANDO DOCUMENTO JÁ ESTORNADO NO SAP
07097 - 00001 - 7.0 - 00006 - DUMP NO PROGRAMA DE RECEBIMENTO NA VERIFICAÇÃO DA NOTA FISCAL ELE
----------------------------------------------------------------------------------------------------
AJUSTE PARA UTILIZAR AS TRANSAÇÕES J1B2N E J1B3N
----------------------------------------------------------------------------------------------------
Palavras Chave:
TRANSAÇÃO - J1B3N - J1B2N - NOTA - FICAL - RECEBIMENTO - ESTORNO
J1B3 - J1B2
----------------------------------------------------------------------------------------------------
Objetos da nota:
FUNC /PWS/ZYCI_TRANSACAO_J1B2
FUNC /PWS/ZYCI_TRANSACAO_J1B3
REPS /PWS/MZYCI017I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_J1B2
FUNCTION /PWS/ZYCI_TRANSACAO_J1B2.
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B2
DATA: V_TRANSACAO(4) TYPE C.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B2
DATA: v_transacao(5) TYPE c.
* << Fim da inclusão
...
...
LOOP AT T_DADOS.
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B2
CHECK T_DADOS-TCODE = 'J1B2'.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B2
CHECK t_dados-tcode = 'J1B2' OR
t_dados-tcode = 'J1B2N'.
* << Fim da inclusão
CLEAR V_CONT.
...
...
PERFORM BDC_CAMPO USING 'BDC_OKCODE' '=SAVE'.
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B2
V_TRANSACAO = 'J1B2'.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B2
v_transacao = 'J1B2N'.
* << Fim da inclusão
...
...
ENDLOOP.
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B2
t_zycet005-tcode = 'J1B3'.
MODIFY t_zycet005 TRANSPORTING tcode
WHERE tcode EQ 'J1B3N'.
* << Fim da inclusão
FREE: ITAB_BDC, ITAB_MSG.
ENDFUNCTION.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_J1B3
FUNCTION /PWS/ZYCI_TRANSACAO_J1B3.
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B3
DATA:
V_TRANSACAO(4) TYPE C.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B3
DATA:
v_transacao(5) TYPE c.
* << Fim da inclusão
...
...
...
...
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B3
V_TRANSACAO = 'J1B3'.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B3
v_transacao = 'J1B3N'.
* << Fim da inclusão
...
...
ENDLOOP.
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B3
t_zycet005-tcode = 'J1B3'.
MODIFY t_zycet005 TRANSPORTING tcode
WHERE tcode EQ 'J1B3N'.
* << Fim da inclusão
FREE: ITAB_BDC, ITAB_MSG.
ENDFUNCTION.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017I01
...
WHEN 'ATUAL'.
CLEAR v_linha.
READ TABLE itab_nf WITH KEY marc = 'X'.
IF sy-subrc EQ 0.
SET PARAMETER ID 'JEF' FIELD itab_nf-docnum.
* >> Início da exclusão: MODULE USER_COMMAND_0010
CALL TRANSACTION 'J1B2' AND SKIP FIRST SCREEN. "#EC CI_CALLTA
* << Fim da exclusão
* >> Início da inclusão: MODULE USER_COMMAND_0010
CALL TRANSACTION 'J1B2N' AND SKIP FIRST SCREEN. "#EC CI_CALLTA
* << Fim da inclusão
...