CE PLUS - Nota 001679
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Recebimento
Data/Hora da Publicação: 05/07/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:47:34
Descrição da Nota: AJUSTE NO TRATAMENTO DE LOTE NO RECEBIMENTO
Sintoma
Ajuste para preenchimento do campo lote na tabela /pws/zycit279 no recebimento e verificação de
obrigatoriedade de lote para os itens do recebimento.
Solução
Ajuste para preenchimento do campo lote na tabela /pws/zycit279 no recebimento e verificação de
obrigatoriedade de lote para os itens do recebimento.
Versões Tratadas
6.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01679 Data: 05/07/2006 Hora: 15:20:20
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01679
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00024
Agrupamento : 00120
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00276 - 00001 - 6.0 - 00021 - RECEBIMENTO GRAVANDO OS DADOS DO CAMPO NTGEW DA TABEL
01016 - 00002 - 6.0 - 00022 - DUMP NO RECEBIMENTO AO TENTAR CONTABILIZAR.
01147 - 00003 - 6.0 - 00023 - TELA DO LOTE NÃO ABRIU NO MOMENTO DO RECEBIMENTO.
01284 - 00004 - 6.0 - 00023 - AJUSTES PARA CONTROLE DE ATO CONCESSÓRIO COMUM POR NCM.
----------------------------------------------------------------------------------------------------
AJUSTE NO TRATAMENTO DE LOTE NO RECEBIMENTO
----------------------------------------------------------------------------------------------------
Palavras Chave:
RECEBIMENTO - LOTE - DRAWBACK - /PWS/SAPMZYCI017
----------------------------------------------------------------------------------------------------
Objetos da nota:
DOMD /PWS/ZYGLD559
DTED /PWS/ZYCIL840
FUGR /PWS/ZYCIGF1
REPS /PWS/MZYCI017F01
REPS /PWS/MZYCI017F02
REPS /PWS/MZYCI017O01
REPS /PWS/MZYCI017TOP
REPT /PWS/SAPMZYCI017
TABD /PWS/ZYCIE279
TABD /PWS/ZYCIT279
TABD /PWS/ZYCIT279B
TABD /PWS/ZYCIT321
TABU TDDAT
TABU TVDIR
TOBJ /PWS/ZYCIT321S
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DOMD /PWS/ZYGLD559
Domínio incluído: /PWS/ZYGLD559
Descrição breve: "GL - Controle de Lote"
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Categoria de dados: CHAR
Número de posições: 1
Comprimento de saída: 1
Rotina de conversão:
Letras minúsculas: NÃO
Valores fixos:
Val.fixo |Descrição
| Não utiliza
1 | Lote Logistico SAP
2 | Lote Fornecedor
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTED /PWS/ZYCIL840
Elemento de dados incluído: /PWS/ZYCIL840
Descrição breve: "GL - Controle de Lote"
Dominio: /PWS/ZYGLD559
Textos:
| Comprim | Denominador de campo
Breve | 10 | Lote
Médio | 15 | Contr. Lote
longa | 20 | Controle de Lote
Título | 16 | Controle de Lote
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUGR /PWS/ZYCIGF1
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017F01
...
(itab_zyglt100-programa) IF FOUND.
ENDIF.
ENDIF.
WHEN 'LOTE'.
PERFORM verifica_lote.
* >> Início da inclusão: FORM EXECUTAR_EVENTO
IF NOT v_suj_lote IS INITIAL.
* << Fim da inclusão
PERFORM divide_lote.
* >> Início da inclusão: FORM EXECUTAR_EVENTO
ENDIF.
* << Fim da inclusão
WHEN 'VISUA'.
...
...
ELSEIF v_modo_bi EQ '1'.
v_modo_bi = 'N'.
ENDIF.
ENDFORM.
FORM executa_batch_input.
* >> Início da inclusão: FORM EXECUTA_BATCH_INPUT
DATA: v_sair TYPE c.
* << Fim da inclusão
CLEAR: v_visualiza.
PERFORM prepara_dados_batch.
IF wa_nf-belnr_mr1m IS INITIAL AND
wa_nf-mblnr_mb01 IS INITIAL AND
wa_nf-belnr_f_51 IS INITIAL AND
wa_nf-belnr_f_02 IS INITIAL.
* >> Início da inclusão: FORM EXECUTA_BATCH_INPUT
CLEAR: v_sair.
SELECT SINGLE * FROM /pws/zycit321.
REFRESH: itab_zycit223.
IF NOT itab_zycit003[] IS INITIAL.
SELECT * FROM /pws/zycit223 INTO TABLE itab_zycit223
FOR ALL ENTRIES IN itab_zycit003
WHERE nrseq = itab_zycit003-nrseq
AND ebelp = itab_zycit003-ebelp
AND ebeln = itab_zycit003-ebeln.
REFRESH: itab_mara.
SELECT matnr xchpf FROM mara
INTO CORRESPONDING FIELDS OF TABLE itab_mara
FOR ALL ENTRIES IN itab_zycit003
WHERE matnr EQ itab_zycit003-matnr.
ENDIF.
LOOP AT itab_zycit003.
CLEAR: itab_mara.
READ TABLE itab_mara WITH KEY matnr = itab_zycit003-matnr.
IF itab_mara-xchpf EQ space.
CONTINUE.
ENDIF.
READ TABLE itab_zycit223 WITH KEY
ebeln = itab_zycit003-ebeln
ebelp = itab_zycit003-ebelp.
IF sy-subrc EQ 0.
IF /pws/zycit321-lote EQ 2 AND
wa_zycit000-flagdraw NE space.
LOOP AT itab_zycit223 WHERE ebeln = itab_zycit003-ebeln
AND ebelp = itab_zycit003-ebelp
AND lote_forn EQ space.
MESSAGE i015 WITH text-258 itab_zycit003-ebeln
itab_zycit003-ebelp.
v_sair = 'X'.
EXIT.
ENDLOOP.
ENDIF.
ELSE.
MESSAGE i015 WITH text-257 itab_zycit003-ebeln
itab_zycit003-ebelp.
v_sair = 'X'.
ENDIF.
IF v_sair NE space.
EXIT.
ENDIF.
ENDLOOP.
IF v_sair NE space.
EXIT.
ENDIF.
* << Fim da inclusão
CLEAR v_receb.
IF v_existe_nfr EQ 'S'.
LOOP AT itab_zycit044.
READ TABLE itab_deposito WITH KEY ebeln = itab_zycit044-ebeln
ebelp = itab_zycit044-ebelp.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017F02
...
ENDLOOP.
LOOP AT itab_zycit044 WHERE mark = 'X'.
MOVE itab_zycit044 TO wa_zycie044.
ENDLOOP.
IF NOT wa_zycie042 IS INITIAL.
* >> Início da inclusão: FORM VERIFICA_LOTE
clear: itab_matuse_aux3, v_suj_lote.
SELECT single ebeln ebelp matnr FROM ekpo
INTO itab_matuse_aux3
WHERE ebeln = wa_zycie042-ebeln
AND ebelp = wa_zycie042-ebelp.
SELECT single xchpf FROM mara
INTO v_suj_lote
WHERE matnr EQ itab_matuse_aux3-matnr.
if v_suj_lote is initial.
MESSAGE w015 WITH text-256.
exit.
endif.
* << Fim da inclusão
SELECT * FROM /pws/zycit223 INTO TABLE itab_zycit223
WHERE nrseq = wa_zycie042-nrseq AND
nrseqnf = wa_zycie042-nrseqnf AND
nfglobal = wa_zycie042-nfglobal AND
nfremessa = space AND
ebeln = wa_zycie042-ebeln AND
ebelp = wa_zycie042-ebelp.
ELSEIF NOT wa_zycie044 IS INITIAL.
* >> Início da inclusão: FORM VERIFICA_LOTE
clear: itab_matuse_aux3, v_suj_lote.
SELECT single ebeln ebelp matnr FROM ekpo
INTO itab_matuse_aux3
WHERE ebeln = wa_zycie044-ebeln
AND ebelp = wa_zycie044-ebelp.
SELECT single xchpf FROM mara
INTO v_suj_lote
WHERE matnr EQ itab_matuse_aux3-matnr.
if v_suj_lote is initial.
MESSAGE w015 WITH text-256.
exit.
endif.
* << Fim da inclusão
SELECT * FROM /pws/zycit223 INTO TABLE itab_zycit223
WHERE nrseq = wa_zycie044-nrseq AND
nrseqnf = wa_zycie044-nrseqnf AND
nfglobal = wa_zycie044-nfglobal AND
nfremessa = wa_zycie044-nfremessa AND
...
...
ENDLOOP.
CLEAR it_zycit270. REFRESH it_zycit270.
ENDFORM.
FORM adiciona_saldo_ato.
DATA: v_qtdpropor LIKE /pws/zycit245-qtd_iten,
* >> Início da exclusão: FORM ADICIONA_SALDO_ATO
v_qtd_003temp LIKE /pws/zycit245-qtd_iten,
v_variacfob LIKE /pws/zycit376-vlfob.
* << Fim da exclusão
* >> Início da inclusão: FORM ADICIONA_SALDO_ATO
v_qtd_nftp TYPE /pws/zycit044-qtd_item,
v_variacfob TYPE /pws/zycit376-vlfob,
wa_zycit279 TYPE /pws/zycit279.
* << Fim da inclusão
DATA: itab_zycit078 LIKE /pws/zycit078 OCCURS 0 WITH HEADER LINE.
DATA: itab_zycit376 LIKE /pws/zycit376 OCCURS 0 WITH HEADER LINE.
DATA: itab_zycit245 LIKE /pws/zycit245 OCCURS 0 WITH HEADER LINE.
DATA: BEGIN OF itab_matuse1 OCCURS 0.
INCLUDE STRUCTURE itab_matuse.
DATA: ntgew LIKE ekpo-ntgew,
gewei LIKE ekpo-gewei.
DATA: END OF itab_matuse1.
* >> Início da inclusão: FORM ADICIONA_SALDO_ATO
SELECT SINGLE * FROM /pws/zycit321.
* << Fim da inclusão
IF itab_zycit003[] IS INITIAL AND NOT itab_itens_nf[] IS INITIAL.
SELECT * FROM /pws/zycit003 INTO TABLE itab_zycit003
FOR ALL ENTRIES IN itab_itens_nf
WHERE nrseq = itab_itens_nf-nrseq
AND ebeln = itab_itens_nf-ebeln
...
...
ENDIF.
LOOP AT itab_zycit003 WHERE NOT nrseqd IS initial.
READ TABLE itab_itens_nf WITH KEY nrseq = itab_zycit003-nrseq
ebeln = itab_zycit003-ebeln
ebelp = itab_zycit003-ebelp.
* >> Início da inclusão: FORM ADICIONA_SALDO_ATO
v_qtd_nftp = itab_itens_nf-qtd_item.
* << Fim da inclusão
READ TABLE itab_matuse1 WITH KEY ebeln = itab_zycit003-ebeln
ebelp = itab_zycit003-ebelp.
itab_matuse1-ntgew = itab_matuse1-ntgew * itab_zycit003-qtd_iten.
READ TABLE itab_zycit078 WITH KEY nrseqli = itab_zycit003-nrseqli.
READ TABLE itab_zycit100 WITH KEY nrseq = itab_zycit003-nrseq
...
...
CHANGING itab_zycit003-meins
itab_zycit003-qtd_iten.
READ TABLE itab_zycit279 WITH KEY nrseq = itab_zycit003-nrseq
ebeln = itab_zycit003-ebeln
ebelp = itab_zycit003-ebelp.
* >> Início da exclusão: FORM ADICIONA_SALDO_ATO
IF sy-subrc = 0.
* << Fim da exclusão
* >> Início da inclusão: FORM ADICIONA_SALDO_ATO
IF sy-subrc = 0 AND /pws/zycit321 EQ space.
* << Fim da inclusão
itab_zycit279-slqtde =
itab_zycit279-slqtde + itab_itens_nf-qtd_item.
IF itab_zycit279-slqtde > 0.
itab_zycit279-esgotado = space.
ENDIF.
...
...
PERFORM taxa_converte USING /pws/zycit001-waers
/pws/zycit085-dttax
CHANGING v_taxa.
itab_zycit279-valor = ( itab_zycit100-vlfob * v_taxa ) /
itab_zycit003-qtd_iten.
* >> Início da inclusão: FORM ADICIONA_SALDO_ATO
IF /pws/zycit321-lote IS INITIAL.
APPEND itab_zycit279.
ELSE.
wa_zycit279 = itab_zycit279.
LOOP AT itab_zycit223 WHERE
nrseqnf EQ itab_itens_nf-nrseqnf
AND nrseq EQ itab_itens_nf-nrseq
AND nfglobal EQ itab_itens_nf-nfglobal
AND nfremessa EQ itab_itens_nf-nfremessa
AND ebeln EQ itab_itens_nf-ebeln
AND ebelp EQ itab_itens_nf-ebelp .
IF /pws/zycit321-lote EQ '1'.
wa_zycit279-lote = itab_zycit223-lote.
ELSE.
wa_zycit279-lote = itab_zycit223-lote_forn.
ENDIF.
READ TABLE itab_zycit279 WITH KEY nrseq = itab_zycit279-nrseq
ebeln = itab_zycit279-ebeln
ebelp = itab_zycit279-ebelp
lote = wa_zycit279-lote.
IF sy-subrc EQ 0.
itab_zycit279-slqtde =
itab_zycit279-slqtde + itab_itens_nf-qtd_item.
IF itab_zycit279-slqtde > 0.
itab_zycit279-esgotado = space.
ENDIF.
MODIFY itab_zycit279 TRANSPORTING slqtde esgotado
WHERE nrseq = itab_zycit279-nrseq
AND ebeln = itab_zycit279-ebeln
AND ebelp = itab_zycit279-ebelp
AND lote = wa_zycit279-lote.
ELSE.
itab_zycit279 = wa_zycit279.
itab_zycit279-qtd_iten = itab_zycit279-qtd_iten *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-ntgew = itab_zycit279-ntgew *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-vltot = itab_zycit279-vltot *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-vlseg = itab_zycit279-vlseg *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-vlfrete = itab_zycit279-vlfrete *
( itab_zycit223-qtde / v_qtd_nftp ).
* << Fim da inclusão
* >> Início da exclusão: FORM ADICIONA_SALDO_ATO
APPEND itab_zycit279.
* << Fim da exclusão
* >> Início da inclusão: FORM ADICIONA_SALDO_ATO
itab_zycit279-slqtde = itab_zycit279-slqtde *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-menge = itab_zycit279-menge *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-baseii = itab_zycit279-baseii *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-baseipi = itab_zycit279-baseipi *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-basecofins = itab_zycit279-basecofins *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-basepis = itab_zycit279-basepis *
( itab_zycit223-qtde / v_qtd_nftp ).
itab_zycit279-baseicms = itab_zycit279-baseicms *
( itab_zycit223-qtde / v_qtd_nftp ).
COLLECT itab_zycit279.
ENDIF.
ENDLOOP.
ENDIF.
* << Fim da inclusão
ENDIF.
ENDLOOP.
IF NOT itab_zycit279[] IS INITIAL.
MODIFY /pws/zycit279 FROM TABLE itab_zycit279.
PERFORM unlock_record.
ENDIF.
ENDFORM.
FORM verifica_saldo_ato.
* >> Início da inclusão: FORM VERIFICA_SALDO_ATO
DATA: itab_zycit282 TYPE /pws/zycit282 OCCURS 0.
PERFORM lock_record.
* << Fim da inclusão
* >> Início da exclusão: FORM VERIFICA_SALDO_ATO
PERFORM lock_record.
LOOP AT itab_itens_nf.
READ TABLE itab_zycit279 WITH KEY nrseq = itab_itens_nf-nrseq
ebeln = itab_itens_nf-ebeln
ebelp = itab_itens_nf-ebelp.
IF sy-subrc = 0.
IF itab_itens_nf-qtd_item > itab_zycit279-slqtde.
* << Fim da exclusão
* >> Início da inclusão: FORM VERIFICA_SALDO_ATO
REFRESH itab_zycit282.
IF NOT itab_itens_nf[] IS INITIAL.
SELECT * FROM /pws/zycit282 INTO TABLE itab_zycit282
FOR ALL ENTRIES IN itab_itens_nf
WHERE nrseqimp = itab_itens_nf-nrseq
AND ebeln = itab_itens_nf-ebeln
AND ebelp = itab_itens_nf-ebelp.
ENDIF.
IF NOT itab_zycit282[] IS INITIAL.
* << Fim da inclusão
v_canc = 'X'.
ENDIF.
* >> Início da exclusão: FORM VERIFICA_SALDO_ATO
ENDIF.
ENDLOOP.
* << Fim da exclusão
ENDFORM.
FORM estorna_saldo_ato.
DATA: v_variacfobd LIKE /pws/zycit376-vlfob.
DATA: itab_zycit376d LIKE /pws/zycit376 OCCURS 0 WITH HEADER LINE.
DATA: itab_zycit245d LIKE /pws/zycit245 OCCURS 0 WITH HEADER LINE.
* >> Início da inclusão: FORM ESTORNA_SALDO_ATO
SELECT SINGLE * FROM /pws/zycit321.
IF itab_zycit223[] IS INITIAL.
SELECT * FROM /pws/zycit223 INTO TABLE itab_zycit223
WHERE nrseq EQ /pws/zycie001-nrseq.
ENDIF.
* << Fim da inclusão
CLEAR itab_matuse. FREE itab_matuse.
SELECT ebeln ebelp matnr bwtar j_1bmatuse
knttp werks umrez umren lmein
FROM ekpo INTO CORRESPONDING FIELDS OF TABLE itab_matuse
FOR ALL ENTRIES IN itab_itens_nf
...
...
( itab_zycit279-vltot / itab_zycit279-menge ) ).
itab_zycit245d-vlvinc = itab_zycit245d-vlvinc + v_variacfobd.
UPDATE /pws/zycit245 SET vlvinc = itab_zycit245d-vlvinc
WHERE nrseqd EQ itab_zycit245d-nrseqd
AND nritem EQ itab_zycit245d-nritem.
* >> Início da inclusão: FORM ESTORNA_SALDO_ATO
IF /pws/zycit321-lote EQ space.
* << Fim da inclusão
PERFORM carrega_umncm_real USING itab_itens_nf-matnr
CHANGING itab_itens_nf-meins
itab_itens_nf-qtd_item.
itab_zycit279-slqtde =
itab_zycit279-slqtde - itab_itens_nf-qtd_item.
* >> Início da inclusão: FORM ESTORNA_SALDO_ATO
IF itab_zycit279-slqtde < 0.
itab_zycit279-slqtde = 0.
ENDIF.
IF itab_zycit279-slqtde = 0.
DELETE FROM /pws/zycit279 WHERE nrseq = itab_itens_nf-nrseq
AND ebeln = itab_itens_nf-ebeln
AND ebelp = itab_itens_nf-ebelp.
DELETE itab_zycit279 WHERE nrseq = itab_itens_nf-nrseq
AND ebeln = itab_itens_nf-ebeln
AND ebelp = itab_itens_nf-ebelp.
CLEAR itab_zycit279.
CONTINUE.
ENDIF.
MODIFY itab_zycit279 INDEX sy-tabix.
ELSE.
LOOP AT itab_zycit223 WHERE
nrseqnf EQ itab_itens_nf-nrseqnf
AND nrseq EQ itab_itens_nf-nrseq
AND nfglobal EQ itab_itens_nf-nfglobal
AND nfremessa EQ itab_itens_nf-nfremessa
AND ebeln EQ itab_itens_nf-ebeln
AND ebelp EQ itab_itens_nf-ebelp .
PERFORM carrega_umncm_real USING itab_itens_nf-matnr
CHANGING itab_itens_nf-meins
itab_zycit223-qtde.
IF /pws/zycit321-lote EQ '1'.
READ TABLE itab_zycit279 WITH KEY nrseq = itab_itens_nf-nrseq
ebeln = itab_itens_nf-ebeln
ebelp = itab_itens_nf-ebelp
lote = itab_zycit223-lote.
ELSE.
READ TABLE itab_zycit279 WITH KEY nrseq = itab_itens_nf-nrseq
ebeln = itab_itens_nf-ebeln
ebelp = itab_itens_nf-ebelp
lote = itab_zycit223-lote_forn.
ENDIF.
itab_zycit279-slqtde =
itab_zycit279-slqtde - itab_zycit223-qtde.
* << Fim da inclusão
IF itab_zycit279-slqtde < 0.
itab_zycit279-slqtde = 0.
ENDIF.
IF itab_zycit279-slqtde = 0.
DELETE FROM /pws/zycit279 WHERE nrseq = itab_itens_nf-nrseq
...
...
AND ebelp = itab_itens_nf-ebelp.
CLEAR itab_zycit279.
CONTINUE.
ENDIF.
MODIFY itab_zycit279 INDEX sy-tabix.
* >> Início da inclusão: FORM ESTORNA_SALDO_ATO
ENDLOOP.
ENDIF.
* << Fim da inclusão
ENDIF.
ENDLOOP.
IF NOT itab_zycit279[] IS INITIAL.
MODIFY /pws/zycit279 FROM TABLE itab_zycit279.
ENDIF.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017TOP
...
INCLUDE /pws/mzyci017oo.
include /pws/mzyci017x01.
INCLUDE /pws/zygl_bot.
TABLES:
/pws/zycit000,
* >> Início da inclusão:
/pws/zycit321,
* << Fim da inclusão
/pws/zycie045,
/pws/zycbt012,
/pws/zycit005,
/pws/zycit085,
/pws/zycit007,
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCI017
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 256
Texto: (28 caracteres)
"Material não sujeito a Lote."
Comprimento máximo: 28
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 257
Texto: (33 caracteres)
"Preencher lote para o pedido/item"
Comprimento máximo: 33
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 258
Texto: (47 caracteres)
"Preencher lote do fornecedor para o pedido/item"
Comprimento máximo: 47
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIE279
Nome campo |Chv |Elem.dados |Tab.verif. |N |CtDt |Comp. |Grupo
...
NRSEQD | X |/PWS/ZYCIL435 | | |CHAR | 10 |
* >> Início da inclusão:
LOTE | X |LICHN | | |CHAR | 15 |
* >> Fim da inclusão:
MATNR | |MATNR |MARA | |CHAR | 18 |
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIT279
Nome campo |Chv |Elem.dados |Tab.verif. |N |CtDt |Comp. |Grupo
...
NRSEQD | X |/PWS/ZYCIL435 | | |CHAR | 10 |
* >> Início da inclusão:
LOTE | X |LICHN | | |CHAR | 15 |
* >> Fim da inclusão:
MATNR | |MATNR |MARA | |CHAR | 18 |
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIT279B
Nome campo |Chv |Elem.dados |Tab.verif. |N |CtDt |Comp. |Grupo
...
NRSEQD | X |/PWS/ZYCIL435 | | |CHAR | 10 |
* >> Início da inclusão:
LOTE | X |LICHN | | |CHAR | 15 |
* >> Fim da inclusão:
MATNR | |MATNR |MARA | |CHAR | 18 |
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIT321
Nome campo |Chv |Elem.dados |Tab.verif. |N |CtDt |Comp. |Grupo
...
DIA_ANT | |/PWS/ZYCIL835 | | |DEC | 4 |
C_COMUM | |/PWS/ZYCIL839 | | |CHAR | 1 |
* >> Início da inclusão:
LOTE | |/PWS/ZYCIL840 | | |CHAR | 1 |
* >> Fim da inclusão: