CE PLUS - Nota 003256
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DSI
Data/Hora da Publicação: 15/03/2007 00:00:00
Data/Hora Última Alteração: 22/02/2011 14:57:01
Descrição da Nota: DSI COM CAMPOS DE ALIQUOTAS FECHADO E DESPESA(DEBITO EM CONTA)
Sintoma
Os campos das alicotas de II, IPI, ICMS encontram-se fechados, impedindo que os mesmos sejam
modificados.
Despesas(DEBITO EM CONTA) não estão sendo atualizada conforme impostos.
Ao zerar aliquotas dos impostos não atualiza a pasta pagamentos.
Solução
Atualizado o programa da DSI para abrir os campos de aliquota e atualizar as despesas(DEBITO EM
CONTA)
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03256 Data: 15/03/2007 Hora: 13:55:08
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03256
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00026
Agrupamento : 00157
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
02022 - 00001 - 6.0 - 00024 - AJUSTES DSI MUNDANÇA SISCOMEX
----------------------------------------------------------------------------------------------------
DSI COM CAMPOS DE ALIQUOTAS FECHADO E DESPESA(DEBITO EM CONTA)
----------------------------------------------------------------------------------------------------
Palavras Chave:
DSI - CAMPOS FECHADOS(ALIQUOTAS) - DESPESAS DO DC NÃO ATUALIZA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI058F01
REPS /PWS/MZYCI058I01
TELA 0234
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI058F01
...
itab_itb-advalipi = itab_it-advalipi = itab_zycit003-advalipi .
ENDIF.
IF NOT itab_itb-advalicms IS INITIAL.
itab_it-advalicms = itab_itb-advalicms.
ELSE.
itab_itb-advalicms = itab_it-advalicms = itab_zycit003-advalicms .
ENDIF.
IF itab_it-pproc IS INITIAL.
itab_it-pproc = itab_it-porigem.
ENDIF.
* >> Início da inclusão: FORM FILL_ITABIT
IF sy-tcode eq '/PWS/ZYCI058_C'.
* << Fim da inclusão
IF itab_it-advalii IS INITIAL.
IF /pws/zycie093-meiotransp EQ 'PS'.
itab_it-advalii = '60'.
ELSE.
itab_it-advalii = itab_it-aliqii.
ENDIF.
ENDIF.
IF itab_it-advalipi IS INITIAL.
itab_it-advalipi = itab_it-aliqipi.
ENDIF.
IF itab_it-advalicms IS INITIAL.
IF /pws/zycie093-meiotransp EQ 'PS'.
itab_it-advalicms = '60'.
ELSE.
itab_it-advalicms = itab_it-aliqicms.
ENDIF.
* >> Início da inclusão: FORM FILL_ITABIT
ENDIF.
* << Fim da inclusão
ENDIF.
PERFORM set_codregtri.
SELECT SINGLE matnr FROM ekpo INTO v_matnr
WHERE ebeln EQ itab_it-ebeln
AND ebelp EQ itab_it-ebelp.
IF itab_it-basredpis IS INITIAL.
SELECT SINGLE * FROM /pws/zycit406 INTO wa_zycit406
WHERE pais EQ 'BR'
AND matnr EQ v_matnr
AND tributos EQ 'PIS'.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI058I01
...
ELSE.
CLEAR v_dsi_int.
LEAVE PROGRAM.
ENDIF.
ENDIF.
ENDCASE.
WHEN '0231' OR '0400'.
CASE sy-ucomm.
WHEN 'BACK' OR 'LEAV'.
PERFORM: save_data_item,
* >> Início da exclusão: MODULE USER_COMMAND_EXIT
calc_itab.
* << Fim da exclusão
* >> Início da inclusão: MODULE USER_COMMAND_EXIT
calc_itab,
fill_receitas.
* << Fim da inclusão
LOOP AT itab_it WHERE NOT mark IS initial.
itab_it-mark = space.
MODIFY itab_it INDEX sy-tabix TRANSPORTING mark.
ENDLOOP.
IF sy-dynnr = '0231'.
LEAVE TO SCREEN '0200'.
ELSE.
LEAVE TO SCREEN '0100'.
ENDIF.
ENDCASE.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas na TELA 0234
os campos a baixo estavam como campo de entrada not possible e foram alterados para POSSIBLE
/PWS/ZYCIE003-ADVALICMS
/PWS/ZYCIE003-ADVALII
/PWS/ZYCIE003-ADVALIPI