Sintoma

Embarque com regime 05, admissão temporária. Ao preencher o campo "tempo de permanência", o sistema

não está calculando mais o ad valorem para os impostos conforme tempo de permanência. O ad valorem

dos impostos deverá ser 1% do valor normal dos tributos, por mês de permanência.

Solução

Carregar campo "tempo de permanência" ao calcular valores de impostos.

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 09157 Data: 07/10/2009 Hora: 15:16:04

----------------------------------------------------------------------------------------------------

----------------------------------------------------------------------------------------------------

Nota Número              : 09157

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 8.0

Pacote                   : 00001

Agrupamento              : 00001

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

08725  - 00001 - 7.0    - 00010  - ADMISSÃO TEMPORÁRIO NA MOSTRA VALORES CALCULADOS/DEVIDOS NA ADIÇÃ

----------------------------------------------------------------------------------------------------

AO PREENCHER"TEMPO DE PERMANÊNCIA"NÃO ESTÁ CALCULANDO MAIS O AD VALOREM

----------------------------------------------------------------------------------------------------

Palavras Chave:

TEMPO DE PERMANÊNCIA - ADMISSÃO TEMPORÁRIA - AD VALOREM

DI - IMPOSTOS

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCI023F01

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI023F01

...

FORM load_iii USING p_tipo.

  IF /pws/zycie093-meiotransp = 'PS'

      AND /pws/zycie085-tpdi EQ 'S'

      AND /pws/zycie003-advalii IS INITIAL.

    /pws/zycie003-advalii = '60'.

  ENDIF.

  t_iibas = t_ivadu.

  a_iicalc  = ( ( /pws/zycie003-advalii  / 100 ) * t_iibas ).

* >> Início da exclusão: FORM LOAD_III

  IF ( itab_zycit001-regime EQ '05' OR

     itab_zycit001-regime EQ '12' ) AND

     NOT itab_zycit374-tp_perman IS INITIAL.

* << Fim da exclusão

    READ TABLE itab_zycit374 WITH KEY

           nrseq = itab_it-nrseq

           ebeln = itab_it-ebeln

           ebelp = itab_it-ebelp.

* >> Início da inclusão: FORM LOAD_III

  IF sy-subrc EQ 0 AND

    ( itab_zycit001-regime EQ '05' OR

    itab_zycit001-regime EQ '12' ) AND

    NOT itab_zycit374-tp_perman IS INITIAL.

* << Fim da inclusão

    v_iiadm = a_iicalc  = ( a_iicalc * ( 1 / 100 ) ) *

    itab_zycit374-tp_perman.

  ENDIF.

  IF NOT /pws/zycie100a-reduzida IS INITIAL.

    a_iiredu  = ( ( /pws/zycie100a-reduzida / 100 ) * t_iibas ).

  ELSE.

    CLEAR: a_iiredu.

  ENDIF.

  a_iiacor  = ( ( /pws/zycie100a-acordorate / 100 ) * t_iibas ).

  CLEAR: t_iirec.

...