CE PLUS - Nota 007047
Módulo: DRAWBACK
Funcionalidade: Entrada de NF Mercado Interno
Data/Hora da Publicação: 30/07/2008 00:00:00
Data/Hora Última Alteração: 17/02/2011 15:25:20
Descrição da Nota: CODE INSPECTOR
Sintoma
Code Inspector
Solução
Code Inspector
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07047 Data: 30/07/2008 Hora: 10:37:55
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07047
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00006
Agrupamento : 00058
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
07001 - 00001 - 7.0 - 00006 - ENTRADA DE NOTAS NOS ATOS CONCESSÓRIOS DO TIPO SUSPENSÃO
----------------------------------------------------------------------------------------------------
CODE INSPECTOR
----------------------------------------------------------------------------------------------------
Palavras Chave:
CODE INSPECTOR
CODE INSPECTOR
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI052F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI052F01
...
SELECT * FROM /pws/zycit245 INTO TABLE itab_zycit245
WHERE tipo NE 'F' "#EC CI_NOFIELD
AND codcomp EQ itab_zycit330-codcomp.
SELECT SINGLE * FROM /pws/zycit433
WHERE matnr EQ itab_zycit330-codcomp
AND dtde =< sy-datum
AND dtate => sy-datum.
IF sy-subrc EQ 0.
SELECT * FROM /pws/zycit433 INTO TABLE itab_zycit433
WHERE grupo EQ /pws/zycit433-grupo
* >> Início da exclusão: FORM VINCULA_ATO_SUSP
AND nritem EQ /pws/zycit433-nritem.
* << Fim da exclusão
* >> Início da inclusão: FORM VINCULA_ATO_SUSP
AND nritem EQ /pws/zycit433-nritem. "#EC CI_NOFIRST
* << Fim da inclusão
IF sy-subrc EQ 0.
SELECT * FROM /pws/zycit245
APPENDING TABLE itab_zycit245
FOR ALL ENTRIES IN itab_zycit433
* >> Início da exclusão: FORM VINCULA_ATO_SUSP
WHERE codcomp EQ itab_zycit433-matnr.
* << Fim da exclusão
* >> Início da inclusão: FORM VINCULA_ATO_SUSP
WHERE codcomp EQ itab_zycit433-matnr. "#EC CI_NOFIELD
* << Fim da inclusão
SORT itab_zycit245 BY nrseqd nritem.
DELETE ADJACENT DUPLICATES FROM itab_zycit245 COMPARING
nrseqd nritem.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
IF NOT itab_zycit245[] IS INITIAL.
SELECT * FROM /pws/zycit244 INTO TABLE itab_zycit244
FOR ALL ENTRIES IN itab_zycit245
...