Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DSI
Data/Hora da Publicação: 10/09/2008 00:00:00
Data/Hora Última Alteração: 22/02/2011 14:59:40
Descrição da Nota: AO CRIAR DSI, NÃO PROPÕE O CÓDIGO DO REGIME TRIBUTÁRIO DO PIS E COFINS.
Sintoma
Ao criar DSI, não propõe o código do regime tributário do pis e cofins.
Solução
Propor código para todos os itens.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07288 Data: 10/09/2008 Hora: 09:12:06
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07288
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00006
Agrupamento : 00064
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
04713 - 00001 - 7.0 - 00002 - MULTIPLAS MOEDAS, RATEIO DE DESPESAS, REGIME TRIBUTÁRIO NA DSI
04976 - 00002 - 7.0 - 00003 - DSI - REGIME DE TRIBUTAÇÃO PIS/COFINS - IPI
----------------------------------------------------------------------------------------------------
AO CRIAR DSI, NÃO PROPÕE O CÓDIGO DO REGIME TRIBUTÁRIO DO PIS E COFINS.
----------------------------------------------------------------------------------------------------
Palavras Chave:
DSI - REGIME TRIBUTÁRIO - PIS - COFINS
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI058F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI058F03
...
ENDIF.
ENDFORM.
FORM chama_zyci_relatorio.
CALL FUNCTION '/PWS/ZYCE_RELATORIO'
EXPORTING
i_spras = t002-spras
EXCEPTIONS
OTHERS = 1.
ENDFORM.
FORM set_codregtri.
* >> Início da exclusão: FORM SET_CODREGTRI
READ TABLE itab_zycit001 INDEX 1.
* << Fim da exclusão
IF itab_zycit001-meioemba EQ 'PS' AND
itab_zycit001-tpdecl EQ 'DSI'.
itab_it-codregtri = '7'.
itab_it-codfunleg = '42'.
ELSE.
IF itab_it-codregtri IS INITIAL.
SELECT SINGLE codreg FROM /pws/zycit167
INTO /pws/zycie100a-codregtri
WHERE ntimp EQ itab_zycit001-regime
AND tipo EQ '1'.
...
...
itab_it-codregtri = /pws/zycie100a-codregtri = '1'.
ELSE.
itab_it-codregtri = /pws/zycie100a-codregtri.
ENDIF.
ENDIF.
ENDIF.
IF /pws/zycie100a-codregtriipi IS INITIAL.
/pws/zycie100a-codregtriipi = '4'.
itab_it-codregtriipi = '4'.
ENDIF.
* >> Início da exclusão: FORM SET_CODREGTRI
IF /pws/zycie100a-codregtripiscofi IS INITIAL AND
itab_it-codregtripiscofi IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: FORM SET_CODREGTRI
IF itab_it-codregtripiscofi IS INITIAL.
* << Fim da inclusão
/pws/zycie100a-codregtripiscofi = '1'.
itab_it-codregtripiscofi = '1'.
ENDIF.
ENDFORM.
FORM relatorio.
SELECT * FROM /pws/zycet079 INTO TABLE itab_report_cliente
WHERE codmod EQ 'D'
AND func EQ 'DSI'.
READ TABLE itab_report_cliente.
IF itab_report_cliente-transacao IS INITIAL.
...