CE PLUS - Nota 001029
Módulo: DRAWBACK
Funcionalidade: Composição
Data/Hora da Publicação: 15/03/2006 00:00:00
Data/Hora Última Alteração: 17/02/2011 13:36:01
Descrição da Nota: PREENCHIMENTO DOS VALORES DE IMPORTAÇÃO
Sintoma
Os valores de importação estão incorretos quando a unidade de compra é diferente da unidade base.
Solução
Realizar o tratamento para ajustar o valor unitario, criar novo campo na tabela /pws/zycit260 com 7
casas decimais para armazenar o valor unitario e ajustar o programa para utilizar este novo campo.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01029 Data: 15/03/2006 Hora: 15:55:30
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01029
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00105
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
PREENCHIMENTO DOS VALORES DE IMPORTAÇÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
COMPOSIÇÃO - VALORES - DI - IMPORTAÇÃO
/PWS/SAPMZYCI064
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI064F03
REPS /PWS/MZYCI064I01
REPS /PWS/MZYCI064O01
TABD /PWS/ZYCIE260
TABD /PWS/ZYCIE260C
TABD /PWS/ZYCIE260D
TABD /PWS/ZYCIT260
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI064F03
...
WHERE matnr = itab_di_final-codmat.
itab_di_final-gewei = mara-gewei.
itab_di_final-ntgew = itab_di_final-ntgew * v_fator_conv.
itab_di_final-brgew = itab_di_final-brgew * v_fator_conv.
IF itab_zycit001-inco1 EQ 'FOB'.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_u = itab_zycit003-vlreal.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-valor_u = itab_zycit003-vlreal.
* << Fim da inclusão
ELSEIF itab_zycit001-inco1 EQ 'CFR'.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_u = ( itab_zycit003-vlreal +
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-valor_u = ( itab_zycit003-vlreal +
* << Fim da inclusão
itab_zycit003-vlfre_fat ) - itab_zycit100-vlfre.
ELSEIF itab_zycit001-inco1 EQ 'CIF'.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_u = ( ( itab_zycit003-vlreal +
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-valor_u = ( ( itab_zycit003-vlreal +
* << Fim da inclusão
itab_zycit003-vlfre_fat + itab_zycit003-vlseg_fat ) -
itab_zycit100-vlfre ) - itab_zycit100-vlseg.
ELSE.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_u = itab_zycit003-vlreal.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-valor_u = itab_zycit003-vlreal.
* << Fim da inclusão
ENDIF.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_u = itab_di_final-vlfob_u / v_fator_conv.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-valor_u = itab_di_final-valor_u * v_fator_conv.
* << Fim da inclusão
PERFORM valor_converte_imp USING /pws/zycbt007-waersb
'USD'
itab_zycit085-dttax
CHANGING itab_di_final-vlfrete.
PERFORM valor_converte_imp USING /pws/zycbt007-waersb
...
...
CHANGING itab_di_final-vlseg.
itab_di_final-vlfrete = itab_di_final-vlfrete /
itab_zycit003-qtd_iten.
itab_di_final-vlseg = itab_di_final-vlseg /
itab_zycit003-qtd_iten.
* >> Início da exclusão: FORM SELECIONA_DI3
CHECK itab_di_final-vlfob_u > 0.
itab_di_final-i_vlcif_me = itab_di_final-vlfob_u.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
CHECK itab_di_final-valor_u > 0.
itab_di_final-i_vlcif_me = itab_di_final-valor_u.
* << Fim da inclusão
itab_di_final-i_vlcif_mi =
itab_di_final-i_vlcif_me * itab_di_final-i_txmoeda.
LOOP AT itab_zycit260
WHERE codcomp = itab_comp_vinc_final-codcomp
AND nrdi = itab_zycit085-nrseqdi
...
...
ENDIF.
itab_di_final-vlfrete_t = itab_di_final-vlfrete *
itab_di_final-qtd_vinc.
itab_di_final-vlseg_t = itab_di_final-vlseg *
itab_di_final-qtd_vinc.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_t = itab_di_final-vlfob_u *
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_t = itab_di_final-valor_u *
* << Fim da inclusão
itab_di_final-qtd_vinc.
itab_di_final-vlfob = itab_di_final-vlfob_t.
PERFORM valor_converte_imp USING itab_zycit085-waersfob
'USD'
itab_zycit085-dttax
...
...
ENDIF.
itab_di_final-vlfrete_t = itab_di_final-vlfrete *
itab_di_final-qtd_vinc.
itab_di_final-vlseg_t = itab_di_final-vlseg *
itab_di_final-qtd_vinc.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_t = itab_di_final-vlfob_u *
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_t = itab_di_final-valor_u *
* << Fim da inclusão
itab_di_final-qtd_vinc.
itab_di_final-vlfob = itab_di_final-vlfob_t.
PERFORM valor_converte_imp USING itab_zycit085-waersfob
'USD'
itab_zycit085-dttax
...
...
itab_zycit003-vlreal TO itab_di_final-vlreal ,
itab_zycit100-vlfre TO itab_di_final-vlfrete ,
itab_zycit100-vlseg TO itab_di_final-vlseg .
itab_di_final-ntgew = itab_di_final-ntgew * v_fator_conv.
IF itab_zycit001-inco1 EQ 'FOB'.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_u = itab_zycit003-vlreal.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-valor_u = itab_zycit003-vlreal.
* << Fim da inclusão
ELSEIF itab_zycit001-inco1 EQ 'CFR'.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_u = ( itab_zycit003-vlreal +
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-valor_u = ( itab_zycit003-vlreal +
* << Fim da inclusão
itab_zycit003-vlfre_fat ) - itab_zycit100-vlfre.
ELSEIF itab_zycit001-inco1 EQ 'CIF'.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_u = ( ( itab_zycit003-vlreal +
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-valor_u = ( ( itab_zycit003-vlreal +
* << Fim da inclusão
itab_zycit003-vlfre_fat + itab_zycit003-vlseg_fat ) -
itab_zycit100-vlfre ) - itab_zycit100-vlseg.
ELSE.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_u = itab_zycit003-vlreal.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-valor_u = itab_zycit003-vlreal.
* << Fim da inclusão
ENDIF.
PERFORM valor_converte_imp USING /pws/zycbt007-waersb
'USD'
itab_zycit085-dttax
CHANGING itab_di_final-vlfrete.
...
...
CHANGING itab_di_final-vlseg.
itab_di_final-vlfrete = itab_di_final-vlfrete /
itab_zycit003-qtd_iten.
itab_di_final-vlseg = itab_di_final-vlseg /
itab_zycit003-qtd_iten.
* >> Início da exclusão: FORM SELECIONA_DI3
CHECK itab_di_final-vlfob_u > 0.
itab_di_final-i_vlcif_me = itab_di_final-vlfob_u.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
CHECK itab_di_final-valor_u > 0.
itab_di_final-i_vlcif_me = itab_di_final-valor_u.
* << Fim da inclusão
itab_di_final-i_vlcif_mi =
itab_di_final-i_vlcif_me * itab_di_final-i_txmoeda.
CLEAR wa_itab_di_final.
IF itab_comp_vinc_final-qtd_stotal > 0 AND
itab_di_final-sdo_qtd > 0.
...
...
itab_di_final-brgew = itab_di_final-brgew * v_fator_conv.
itab_di_final-vlfrete_t = itab_di_final-vlfrete *
itab_di_final-qtd_vinc.
itab_di_final-vlseg_t = itab_di_final-vlseg *
itab_di_final-qtd_vinc.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_t = itab_di_final-vlfob_u *
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_t = itab_di_final-valor_u *
* << Fim da inclusão
itab_di_final-qtd_vinc.
itab_di_final-vlfob = itab_di_final-vlfob_t.
PERFORM valor_converte_imp USING itab_zycit085-waersfob
'USD'
itab_zycit085-dttax
...
...
ENDIF.
itab_di_final-vlfrete_t = itab_di_final-vlfrete *
itab_di_final-qtd_vinc.
itab_di_final-vlseg_t = itab_di_final-vlseg *
itab_di_final-qtd_vinc.
* >> Início da exclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_t = itab_di_final-vlfob_u *
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI3
itab_di_final-vlfob_t = itab_di_final-valor_u *
* << Fim da inclusão
itab_di_final-qtd_vinc.
itab_di_final-vlfob = itab_di_final-vlfob_t.
PERFORM valor_converte_imp USING itab_zycit085-waersfob
'USD'
itab_zycit085-dttax
...
...
WHERE nrseqd EQ /pws/zycie258-nrseqd.
SELECT * FROM /pws/zycit260 INTO TABLE itab_di_final
WHERE nrseqd EQ /pws/zycie258-nrseqd.
SORT itab_comp_vinc_final BY codcomp ASCENDING.
SORT itab_di_final BY dtdi ASCENDING.
* >> Início da inclusão: FORM TRATA_BUTTON_ENTE3
loop at itab_di_final where valor_u <= 0 and
vlfob_u > 0.
itab_di_final-valor_u = itab_di_final-vlfob_u.
modify itab_di_final.
endloop.
* << Fim da inclusão
PERFORM carrega_resumo_exportacao3.
pressed_tab_3c = 'FS_CABEC3'.
dynpronr3c = '0301'.
IF v_tcode3 EQ '/PWS/ZYCI040_G'.
PERFORM lock_record3.
...
...
FROM mara INTO mara
WHERE matnr = itab_di_final-codmat.
itab_di_final-gewei = mara-gewei.
itab_di_final-ntgew = itab_di_final-ntgew * v_fator_conv.
itab_di_final-brgew = itab_di_final-brgew * v_fator_conv.
* >> Início da exclusão: FORM SELECIONA_DI
itab_di_final-vlfob_u = itab_zycit279-vltot /
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI
itab_di_final-valor_u = itab_zycit279-vltot /
* << Fim da inclusão
itab_zycit279-qtd_ncm.
itab_di_final-vlfrete = itab_di_final-vlfrete /
itab_zycit279-qtd_ncm.
itab_di_final-vlseg = itab_di_final-vlseg /
itab_zycit279-qtd_ncm.
* >> Início da exclusão: FORM SELECIONA_DI
CHECK itab_di_final-vlfob_u > 0.
itab_di_final-i_vlcif_me = itab_di_final-vlfob_u.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI
CHECK itab_di_final-valor_u > 0.
itab_di_final-i_vlcif_me = itab_di_final-valor_u.
* << Fim da inclusão
itab_di_final-i_vlcif_mi =
itab_di_final-i_vlcif_me * itab_di_final-i_txmoeda.
LOOP AT itab_zycit260
WHERE codcomp = itab_comp_vinc_final-codcomp
AND docnum = itab_zycit279-docnum
...
...
ENDIF.
itab_di_final-vlfrete_t = itab_di_final-vlfrete *
itab_di_final-qtd_vinc.
itab_di_final-vlseg_t = itab_di_final-vlseg *
itab_di_final-qtd_vinc.
* >> Início da exclusão: FORM SELECIONA_DI
itab_di_final-vlfob_t = itab_di_final-vlfob_u *
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI
itab_di_final-vlfob_t = itab_di_final-valor_u *
* << Fim da inclusão
itab_di_final-qtd_vinc.
itab_di_final-vlfob = itab_di_final-vlfob_t.
itab_di_final-i_vlcifn_mi =
( itab_di_final-vlfob_t * itab_di_final-i_txmoeda ).
v_perc_vinc =
...
...
ENDIF.
itab_di_final-vlfrete_t = itab_di_final-vlfrete *
itab_di_final-qtd_vinc.
itab_di_final-vlseg_t = itab_di_final-vlseg *
itab_di_final-qtd_vinc.
* >> Início da exclusão: FORM SELECIONA_DI
itab_di_final-vlfob_t = itab_di_final-vlfob_u *
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI
itab_di_final-vlfob_t = itab_di_final-valor_u *
* << Fim da inclusão
itab_di_final-qtd_vinc.
itab_di_final-vlfob = itab_di_final-vlfob_t.
PERFORM valor_converte_imp USING itab_zycit085-waersfob
'USD'
itab_zycit085-dttax
...
...
itab_zycit279-waers TO itab_di_final-waersimp ,
itab_zycit279-vltot TO itab_di_final-vlreal ,
itab_zycit279-vlfrete TO itab_di_final-vlfrete ,
itab_zycit279-vlseg TO itab_di_final-vlseg .
itab_di_final-ntgew = itab_di_final-ntgew * v_fator_conv.
* >> Início da exclusão: FORM SELECIONA_DI
itab_di_final-vlfob_u = itab_zycit279-vltot /
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI
itab_di_final-valor_u = itab_zycit279-vltot /
* << Fim da inclusão
itab_zycit279-qtd_ncm.
itab_di_final-vlfrete = itab_di_final-vlfrete /
itab_zycit279-menge.
itab_di_final-vlseg = itab_di_final-vlseg /
itab_zycit279-menge.
* >> Início da exclusão: FORM SELECIONA_DI
CHECK itab_di_final-vlfob_u > 0.
itab_di_final-i_vlcif_me = itab_di_final-vlfob_u.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI
CHECK itab_di_final-valor_u > 0.
itab_di_final-i_vlcif_me = itab_di_final-valor_u.
* << Fim da inclusão
itab_di_final-i_vlcif_mi =
itab_di_final-i_vlcif_me * itab_di_final-i_txmoeda.
CLEAR wa_itab_di_final.
IF itab_comp_vinc_final-qtd_stotal > 0 AND
itab_di_final-sdo_qtd > 0.
...
...
itab_di_final-brgew = itab_di_final-brgew * v_fator_conv.
itab_di_final-vlfrete_t = itab_di_final-vlfrete *
itab_di_final-qtd_vinc.
itab_di_final-vlseg_t = itab_di_final-vlseg *
itab_di_final-qtd_vinc.
* >> Início da exclusão: FORM SELECIONA_DI
itab_di_final-vlfob_t = itab_di_final-vlfob_u *
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI
itab_di_final-vlfob_t = itab_di_final-valor_u *
* << Fim da inclusão
itab_di_final-qtd_vinc.
itab_di_final-vlfob = itab_di_final-vlfob_t.
itab_di_final-i_vlcifn_mi =
( itab_di_final-vlfob_t * itab_di_final-i_txmoeda ).
v_perc_vinc =
...
...
ENDIF.
itab_di_final-vlfrete_t = itab_di_final-vlfrete *
itab_di_final-qtd_vinc.
itab_di_final-vlseg_t = itab_di_final-vlseg *
itab_di_final-qtd_vinc.
* >> Início da exclusão: FORM SELECIONA_DI
itab_di_final-vlfob_t = itab_di_final-vlfob_u *
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DI
itab_di_final-vlfob_t = itab_di_final-valor_u *
* << Fim da inclusão
itab_di_final-qtd_vinc.
itab_di_final-vlfob = itab_di_final-vlfob_t.
PERFORM valor_converte_imp USING itab_zycit085-waersfob
'USD'
itab_zycit085-dttax
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI064I01
...
itab_di-qtd_vinc = itab_di-qtd_vinc + itab_di-sdo_qtd.
itab_di-sdo_qtd = itab_di-sdo_qtd - itab_di-sdo_qtd.
ENDIF.
itab_di-vlfrete_t = itab_di-vlfrete * itab_di-qtd_vinc.
itab_di-vlseg_t = itab_di-vlseg * itab_di-qtd_vinc.
* >> Início da exclusão: MODULE TRATA_SELECAO
itab_di-vlfob_t = itab_di-vlfob_u * itab_di-qtd_vinc.
* << Fim da exclusão
* >> Início da inclusão: MODULE TRATA_SELECAO
itab_di-vlfob_t = itab_di-valor_u * itab_di-qtd_vinc.
* << Fim da inclusão
itab_di-vlfob = itab_di-vlfob_t.
CLEAR itab_zycit085.
READ TABLE itab_zycit085 WITH KEY nrseqdi = itab_di-nrdi.
IF sy-subrc NE 0.
SELECT SINGLE * FROM /pws/zycit085 INTO itab_zycit085
...
...
itab_di-qtd_vinc = itab_di-qtd_vinc + itab_di-sdo_qtd.
itab_di-sdo_qtd = itab_di-sdo_qtd - itab_di-qtd_vinc.
ENDIF.
itab_di-vlfrete_t = itab_di-vlfrete * itab_di-qtd_vinc.
itab_di-vlseg_t = itab_di-vlseg * itab_di-qtd_vinc.
* >> Início da exclusão: MODULE TRATA_SELECAO
itab_di-vlfob_t = itab_di-vlfob_u * itab_di-qtd_vinc.
* << Fim da exclusão
* >> Início da inclusão: MODULE TRATA_SELECAO
itab_di-vlfob_t = itab_di-valor_u * itab_di-qtd_vinc.
* << Fim da inclusão
itab_di-vlfob = itab_di-vlfob_t.
CLEAR itab_zycit085.
READ TABLE itab_zycit085 WITH KEY nrseqdi = itab_di-nrdi.
IF sy-subrc NE 0.
SELECT SINGLE * FROM /pws/zycit085 INTO itab_zycit085
...
...
itab_zycit085-dttax
CHANGING itab_di-vlfob.
itab_di-vlafrmm = itab_di-vlfrete_t * ( 25 / 100 ).
ENDIF.
itab_di-i_vlcifn_mi =
* >> Início da exclusão: MODULE TRATA_SELECAO
( itab_di-vlfob_u * itab_di-qtd_vinc ) * itab_di-i_txmoeda.
* << Fim da exclusão
* >> Início da inclusão: MODULE TRATA_SELECAO
( itab_di-valor_u * itab_di-qtd_vinc ) * itab_di-i_txmoeda.
* << Fim da inclusão
CLEAR itab_zycit100.
READ TABLE itab_zycit100 WITH KEY nrseqdi = itab_di-nrdi
ebeln = itab_di-ebeln
ebelp = itab_di-ebelp.
IF sy-subrc NE 0.
...
...
ENDLOOP.
itab_di-sdo_qtd = itab_di-sdo_qtd + itab_di-qtd_vinc.
itab_di-qtd_vinc = itab_di-qtd_vinc - itab_di-qtd_vinc.
itab_di-vlfrete_t = itab_di-vlfrete * itab_di-qtd_vinc.
itab_di-vlseg_t = itab_di-vlseg * itab_di-qtd_vinc.
* >> Início da exclusão: MODULE TRATA_SELECAO
itab_di-vlfob_t = itab_di-vlfob_u * itab_di-qtd_vinc.
* << Fim da exclusão
* >> Início da inclusão: MODULE TRATA_SELECAO
itab_di-vlfob_t = itab_di-valor_u * itab_di-qtd_vinc.
* << Fim da inclusão
* >> Início da exclusão: MODULE TRATA_SELECAO
itab_di-vlfob_t = itab_di-vlfob_u * itab_di-qtd_vinc.
* << Fim da exclusão
* >> Início da inclusão: MODULE TRATA_SELECAO
itab_di-vlfob_t = itab_di-valor_u * itab_di-qtd_vinc.
* << Fim da inclusão
itab_di-vlfob = itab_di-vlfob_t.
CLEAR itab_zycit085.
READ TABLE itab_zycit085 WITH KEY nrseqdi = itab_di-nrdi.
IF sy-subrc NE 0.
SELECT SINGLE * FROM /pws/zycit085 INTO itab_zycit085
...
...
itab_zycit085-dttax
CHANGING itab_di-vlfob.
itab_di-vlafrmm = itab_di-vlfrete_t * ( 25 / 100 ).
ENDIF.
itab_di-i_vlcifn_mi =
* >> Início da exclusão: MODULE TRATA_SELECAO
( itab_di-vlfob_u * itab_di-qtd_vinc ) * itab_di-i_txmoeda.
* << Fim da exclusão
* >> Início da inclusão: MODULE TRATA_SELECAO
( itab_di-valor_u * itab_di-qtd_vinc ) * itab_di-i_txmoeda.
* << Fim da inclusão
CLEAR itab_zycit100.
READ TABLE itab_zycit100 WITH KEY nrseqdi = itab_di-nrdi
ebeln = itab_di-ebeln
ebelp = itab_di-ebelp.
IF sy-subrc NE 0.
...
...
itab_det_imp-meins = /pws/zycie260c-meins .
itab_det_imp-qtd_di = /pws/zycie260c-qtd_di .
itab_det_imp-sdo_qtd = /pws/zycie260c-sdo_qtd .
itab_det_imp-qtd_vinc = /pws/zycie260c-qtd_vinc .
itab_det_imp-waers = /pws/zycie260c-waers .
* >> Início da exclusão: MODULE PREENCHE_ITAB_DET_IMP
itab_det_imp-vlfob_u = /pws/zycie260c-vlfob_u .
* << Fim da exclusão
* >> Início da inclusão: MODULE PREENCHE_ITAB_DET_IMP
itab_det_imp-valor_u = /pws/zycie260c-valor_u .
* << Fim da inclusão
itab_det_imp-vlfob_t = /pws/zycie260c-vlfob_t .
itab_det_imp-vlfob = /pws/zycie260c-vlfob .
itab_det_imp-i_waerscifmi = /pws/zycie260c-i_waerscifmi.
itab_det_imp-i_vlcifn_mi = /pws/zycie260c-i_vlcifn_mi .
itab_det_imp-waersimp = /pws/zycie260c-waersimp .
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI064O01
...
/pws/zycie260c-meins = itab_det_imp-meins .
/pws/zycie260c-qtd_di = itab_det_imp-qtd_di .
/pws/zycie260c-sdo_qtd = itab_det_imp-sdo_qtd .
/pws/zycie260c-qtd_vinc = itab_det_imp-qtd_vinc .
/pws/zycie260c-waers = itab_det_imp-waers .
* >> Início da exclusão: MODULE PREENCHE_ESTRUTURA_0308
/pws/zycie260c-vlfob_u = itab_det_imp-vlfob_u .
* << Fim da exclusão
* >> Início da inclusão: MODULE PREENCHE_ESTRUTURA_0308
/pws/zycie260c-valor_u = itab_det_imp-valor_u .
* << Fim da inclusão
/pws/zycie260c-vlfob = itab_det_imp-vlfob .
/pws/zycie260c-vlfob_t = itab_det_imp-vlfob_t .
/pws/zycie260c-vlfrete_t = itab_det_imp-vlfrete_t .
/pws/zycie260c-vlseg_t = itab_det_imp-vlseg_t .
/pws/zycie260c-i_waerscifmi = itab_det_imp-i_waerscifmi.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIE260
Nome campo |Chv |Elem.dados |Tab.verif. |N |CtDt |Comp. |Grupo
...
NRRE | |/PWS/ZYCEL018 | | |CHAR | 14 |
* >> Início da inclusão:
VALOR_U | |/PWS/ZYCIL128 | | |DEC | 20 |
* >> Fim da inclusão:
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIE260C
Nome campo |Chv |Elem.dados |Tab.verif. |N |CtDt |Comp. |Grupo
...
NRRE | |/PWS/ZYCEL018 | | |CHAR | 14 |
* >> Início da inclusão:
VALOR_U | |/PWS/ZYCIL128 | | |DEC | 20 |
* >> Fim da inclusão:
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIE260D
Nome campo |Chv |Elem.dados |Tab.verif. |N |CtDt |Comp. |Grupo
...
NRRE | |/PWS/ZYCEL018 | | |CHAR | 14 |
* >> Início da inclusão:
VALOR_U | |/PWS/ZYCIL128 | | |DEC | 20 |
* >> Fim da inclusão:
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIT260
Nome campo |Chv |Elem.dados |Tab.verif. |N |CtDt |Comp. |Grupo
...
NRRE | |/PWS/ZYCEL018 | | |CHAR | 14 |
* >> Início da inclusão:
VALOR_U | |/PWS/ZYCIL128 | | |DEC | 20 |
* >> Fim da inclusão: