CE PLUS - Nota 000238
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Recebimento
Data/Hora da Publicação: 03/11/2005 00:00:00
Data/Hora Última Alteração: 20/06/2011 11:57:36
Descrição da Nota: ERRO NA EXIBIÇÃO DO DOCUMENTO DA MIRO 46B
Sintoma
Ao tentar consultar o documento contabil da MIRO,atraves do nosso resumo de documentos, da APEND (
MIR4)
Solução
Colocada consistência, quando for 46B utilizamos a MR3M, quando não for, utilizamos a MIR4.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00238 Data: 03/11/2005 Hora: 14:16:55
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00238
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 6.0
Pacote : 00021
Agrupamento : 00086
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
ERRO NA EXIBIÇÃO DO DOCUMENTO DA MIRO 46B
----------------------------------------------------------------------------------------------------
Palavras Chave:
ERRO NA EXIBIÇÃO DO DOCUMENTO DA MIRO 46B - MR3M - MIR4
RECEBIMENTO - RESUMO DE DOCUMENTOS - FATURA DE SERVIÇOS
----------------------------------------------------------------------------------------------------
Objetos da nota:
MERG F6DK927481 20051103 104918 PWSCI
RELE F6DK927482 20051103 105435 PWSCI
RELE F6DK927484 20051103 105444 PWSCI
REPS /PWS/MZYCI003F02
REPS /PWS/MZYCI017F02
REPS /PWS/ZYCIR012
REPS /PWS/ZYGLI100
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
SET PARAMETER ID 'RBN' FIELD v_belnr2.
SET PARAMETER ID 'GJR' FIELD v_ano.
* >> Início da inclusão: FORM DRILL_DOWN_DOCUMENTOS
if sy-SAPRL = '46B'.
AUTHORITY-CHECK OBJECT 'S_TCODE'
ID 'TCD' FIELD 'MR3M'.
IF sy-subrc EQ 0.
call transaction 'MR3M' and skip first screen.
ELSE.
MESSAGE e261(sf) WITH 'MR3M'.
ENDIF.
else.
* << Fim da inclusão
AUTHORITY-CHECK OBJECT 'S_TCODE'
ID 'TCD' FIELD 'MIR4'.
IF sy-subrc EQ 0.
CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
ELSE.
MESSAGE e261(sf) WITH 'MIR4'.
ENDIF.
* >> Início da inclusão: FORM DRILL_DOWN_DOCUMENTOS
endif.
* << Fim da inclusão
ENDIF.
ELSEIF v_campo EQ '/PWS/ZYCIE006-MBLNR_MB01'
AND NOT v_valor IS INITIAL.
PERFORM converter_documento.
SELECT SINGLE mblnr FROM mkpf INTO vaux_belnr
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017F02
...
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
SET PARAMETER ID 'RBN' FIELD v_belnr2.
SET PARAMETER ID 'GJR' FIELD v_ano.
* >> Início da inclusão: FORM DRILL_DOWN_DOCUMENTOS
if sy-SAPRL = '46B'.
call transaction 'MR3M' and skip first screen.
else.
* << Fim da inclusão
CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
* >> Início da inclusão: FORM DRILL_DOWN_DOCUMENTOS
endif.
* << Fim da inclusão
ENDIF.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCIR012
...
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
SET PARAMETER ID 'RBN' FIELD v_valor.
SET PARAMETER ID 'GJR' FIELD v_ano.
* >> Início da inclusão: FORM ACESSO_DOC
if sy-SAPRL = '46B'.
call transaction 'MR3M' and skip first screen.
else.
* << Fim da inclusão
CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
* >> Início da inclusão: FORM ACESSO_DOC
endif.
* << Fim da inclusão
ENDIF.
...
...
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
SET PARAMETER ID 'RBN' FIELD p_nrdoc.
SET PARAMETER ID 'GJR' FIELD v_ano.
* >> Início da inclusão: FORM ACESSA_DOC2
if sy-SAPRL = '46B'.
call transaction 'MR3M' and skip first screen.
else.
* << Fim da inclusão
CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
* >> Início da inclusão: FORM ACESSA_DOC2
endif.
* << Fim da inclusão
ENDIF.
...