CE PLUS - Nota 013344
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Recebimento
Data/Hora da Publicação: 24/10/2013 00:00:00
Data/Hora Última Alteração: 24/10/2013 17:19:06
Descrição da Nota: DUMP NA FUNÇÃO /PWS/ZYGL_OBTEM_ANO_CONTABIL - FALTA EXCEPTIONS
Sintoma
Dump no recebimento, ao estornar o documento ocorre o dump pois está faltando a EXCEPTIONS na função
/PWS/ZYGL_OBTEM_ANO_CONTABIL.
Solução
Colocar EXCEPTIONS na chamada da função /PWS/ZYGL_OBTEM_ANO_CONTABIL.
Versões Tratadas
9.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 13344 Data: 24/10/2013 Hora: 11:03:26
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 13344
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 9.0
Pacote : 00006
Agrupamento : 00166
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
----------------------------------------------------------------------------------------------------
DUMP NA FUNÇÃO /PWS/ZYGL_OBTEM_ANO_CONTABIL - FALTA EXCEPTIONS
----------------------------------------------------------------------------------------------------
Palavras Chave:
RECEBIMENTO - DATA_NAO_ENCONTRADA - FALTA EXCEPTIONS
RAISE_EXCEPTION
----------------------------------------------------------------------------------------------------
Objetos da nota:
FUNC /PWS/ZYCI_TRANSACAO_F_05A
FUNC /PWS/ZYCI_TRANSACAO_F_05
FUNC /PWS/ZYCI_TRANSACAO_F_02C
FUNC /PWS/ZYCI_TRANSACAO_FBRA
FUNC /PWS/ZYCI_TRANSACAO_FB08_A
FUNC /PWS/ZYCI_TRANSACAO_FB08
FUNC /PWS/ZYCI_TRANSACAO_F_43A
FUNC /PWS/ZYCI_TRANSACAO_MR8M
FUNC /PWS/ZYCI_TRANSACAO_F_63A
FUNC /PWS/ZYCI_TRANSACAO_F_51C
FUNC /PWS/ZYCI_TRANSACAO_F_51B
FUNC /PWS/ZYCI_TRANSACAO_F_51A
FUNC /PWS/ZYCI_TRANSACAO_F_51
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_05A
...
LOOP AT t_dados.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
IMPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_05A
v_year = v_date.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_05A
v_year = v_date
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
IF sy-subrc <> 0.
ENDIF.
* << Fim da inclusão
CHECK t_dados-tcode = 'F-05'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_05
...
LOOP AT t_dados.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
IMPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_05
v_year = v_date.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_05
v_year = v_date
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
IF sy-subrc <> 0.
ENDIF.
* << Fim da inclusão
CHECK t_dados-tcode = 'F-05'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_02C
...
LOOP AT t_dados.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_02C
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_02C
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
* << Fim da inclusão
IMPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_02C
v_year = v_date.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_02C
v_year = v_date
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
IF sy-subrc <> 0.
ENDIF.
* << Fim da inclusão
CHECK t_dados-tcode = 'F-02'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_FBRA
...
LOOP AT t_dados.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = t_dados-bukrs
v_date = t_dados-bldat
IMPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_FBRA
v_year = v_date.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_FBRA
v_year = v_date
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
IF sy-subrc <> 0.
ENDIF.
* << Fim da inclusão
CHECK t_dados-tcode = 'FBRA'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_FB08_A
...
LOOP AT t_dados.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_FB08_A
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_FB08_A
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
* << Fim da inclusão
IMPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_FB08_A
v_year = v_date.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_FB08_A
v_year = v_date
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
* << Fim da inclusão
IF sy-subrc <> 0.
ENDIF.
CHECK t_dados-tcode = 'FB08'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_FB08
...
LOOP AT t_dados.
SELECT SINGLE * FROM /pws/zycbt007
WHERE bukrs EQ t_dados-bukrs.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
IMPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_FB08
v_year = v_date.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_FB08
v_year = v_date
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
IF sy-subrc <> 0.
ENDIF.
* << Fim da inclusão
IF sy-subrc <> 0.
ENDIF.
CHECK t_dados-tcode = 'FB08'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_43A
...
LOOP AT t_dados.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
IMPORTING
v_year = v_date
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_43A
.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_43A
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
* << Fim da inclusão
IF sy-subrc <> 0.
ENDIF.
CHECK t_dados-tcode = 'F-43'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_MR8M
...
LOOP AT T_DADOS.
CHECK T_DADOS-TCODE = 'MR8M'.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
IMPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_MR8M
v_year = v_ano.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_MR8M
v_year = v_ano
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
IF sy-subrc <> 0.
ENDIF.
* << Fim da inclusão
v_monat = sy-datum+4(2).
CALL FUNCTION 'FI_PERIOD_CHECK'
EXPORTING
i_bukrs = t_dados-bukrs
i_gjahr = v_ano
i_koart = '+'
i_monat = v_monat
EXCEPTIONS
error_period = 1
error_period_acc = 2
OTHERS = 3.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_63A
...
loop at t_dados.
call function '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
exporting
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
importing
v_year = v_date
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_63A
.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_63A
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
* << Fim da inclusão
if sy-subrc <> 0.
endif.
check t_dados-tcode = 'F-63'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_51C
...
LOOP AT t_dados.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
IMPORTING
v_year = v_date
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_51C
.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_51C
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
* << Fim da inclusão
IF sy-subrc <> 0.
ENDIF.
CHECK t_dados-tcode = 'F-51'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_51B
...
loop at t_dados.
call function '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
exporting
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
importing
v_year = v_date
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_51B
.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_51B
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
* << Fim da inclusão
if sy-subrc <> 0.
endif.
check t_dados-tcode = 'F-51'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_51A
...
LOOP AT t_dados.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
IMPORTING
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_51A
v_year = v_date.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_51A
v_year = v_date
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
IF sy-subrc <> 0.
ENDIF.
* << Fim da inclusão
CHECK t_dados-tcode = 'F-51'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_51
...
loop at t_dados.
call function '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
exporting
v_bukrs = t_dados-bukrs
v_date = t_dados-budat
importing
v_year = v_date
* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_51
.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_F_51
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
* << Fim da inclusão
if sy-subrc <> 0.
endif.
check t_dados-tcode = 'F-51'.
...
...
...