Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 27/07/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 13:05:26
Descrição da Nota: CAMPO ALÍQUOTA DE PIS E COFINS NA DI
Sintoma
O programa não permite 'zerar' a alíquota específica do PIS/Cofins, o que limparia o valor a
recolher.
Solução
Atualização do programa da DI para que os campos em tela funcionem como o Siscomex: Se colocar a
aliquota especifica, o valor no campo de advalorem será zerado e o campo fechado. Se zerar o valor,
os dois ficarão abertos. Se preencher o campo advalorem, o campo alíq.específica será zerado e o
campo fechado.
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01836 Data: 27/07/2006 Hora: 17:01:14
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01836
Categoria : Melhoria
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00024
Agrupamento : 00124
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01520 - 00001 - 6.0 - 00023 - INCLUSÃO DA NOVA TELA PIS/COFINS NA DI
----------------------------------------------------------------------------------------------------
CAMPO ALÍQUOTA DE PIS E COFINS NA DI
----------------------------------------------------------------------------------------------------
Palavras Chave:
ALÍQUOTA - PIS - COFINS - DI - ESPECÍFICO
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI023 0435
REPS /PWS/MZYCI023O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI023 0435
*Os campos abaixo foram alterados
Nome
Ctg. Linha Coluna CmprDf CmVis Altura Format Dict Modif At.Des.Só At
Gr1 Gr2 Gr3 Gr4 SPA GPA ID parâm Cód.F TCmp TpoLoopExbLoop
Outros atributos
*DE:
/PWS/ZYCIE100A-CODREGTRIPISCOFI
I/O 7 25 12 28 1 CHAR X X Ent Off
Chave externa, Botão EntrsPoss.stand., Drop-down, Caixa listagem
/PWS/ZYCIE100A-ADVALPIS
I/O 12 34 8 8 1 DEC X Off
Alinh.à dir.
/PWS/ZYCIE100A-ADVALCOFINS
I/O 12 77 8 8 1 DEC X Off
Alinh.à dir.
/PWS/ZYCIE100A-ALIQCOF
I/O 14 77 8 8 1 DEC X Ent Off
Alinh.à dir.
*PARA:
/PWS/ZYCIE100A-CODREGTRIPISCOFI
I/O 7 25 12 28 1 CHAR X X Ent Off
AC
Chave externa, Botão EntrsPoss.stand., Drop-down, Caixa listagem
/PWS/ZYCIE100A-ADVALPIS
I/O 12 34 8 8 1 DEC X Ent Off
Alinh.à dir.
/PWS/ZYCIE100A-ADVALCOFINS
I/O 12 77 8 8 1 DEC X Ent Off
Alinh.à dir.
/PWS/ZYCIE100A-ALIQCOF
I/O 14 77 8 8 1 DEC X Ent Off
AC
Alinh.à dir.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023O01
...
clear: /PWS/ZYCIE100A-ALIQPIS ,
/PWS/ZYCIE100A-ALIQCOF.
endif.
endif.
MODIFY SCREEN.
* >> Início da inclusão: MODULE SET_SCREEN_PADRAO
IF screen-name eq '/PWS/ZYCIE100A-ADVALPIS' .
if not /PWS/ZYCIE100A-ALIQPIS is initial.
clear /pws/zycie100a-advalpis.
screen-input = '0'.
else.
screen-input = '1'.
endif.
elseif screen-name eq '/PWS/ZYCIE100A-ALIQPIS' .
if not /PWS/ZYCIE100A-ADVALPIS is initial.
clear /PWS/ZYCIE100A-aliqpis.
screen-input = '0'.
else.
screen-input = '1'.
endif.
elseif screen-name eq '/PWS/ZYCIE100A-ADVALCOFINS' .
if not /PWS/ZYCIE100A-ALIQCOF is initial.
clear /PWS/ZYCIE100A-ADVALCOFINS.
screen-input = '0'.
else.
screen-input = '1'.
endif.
elseif screen-name eq '/PWS/ZYCIE100A-ALIQCOF' .
if not /PWS/ZYCIE100A-ADVALCOFINS is initial.
clear /PWS/ZYCIE100A-ALIQCOF.
screen-input = '0'.
else.
screen-input = '1'.
endif.
endif.
modify screen.
* << Fim da inclusão
ENDLOOP.
if /PWS/ZYCIE100A-CODREGTRIPISCOFI eq 2 or
/PWS/ZYCIE100A-CODREGTRIPISCOFI eq 6.
loop at screen.
IF screen-name eq '/PWS/ZYCIE100A-ALIQPIS' or
...