Sintoma

Ao entrar na PLi dá dump.

Solução

Atualizado programa para alterar vírgula para ponto no campo fator dos itens da PLI.

Informações Complementares

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

Nota Número 12157 Data: 02/05/2012 Hora: 16:04:03

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

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

Nota Número              : 12157

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 8.0

Pacote                   : 00011

Agrupamento              : 00113

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

Referência às notas relacionadas:

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

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

AO ENTRAR NA PLI DÁ DUMP.

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

Palavras Chave:

PLI - DUMP - FATOR - CÁLCULO - VIRGULA

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

Objetos da nota:

REPS /PWS/MZYCI020F01

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

Modificações efetuadas em REPS /PWS/MZYCI020F01

...

    ENDIF.

    READ TABLE it_ekpo WITH KEY ebeln = it_zycit079-ebeln

                                  ebelp = it_zycit079-ebelp.

    IF NOT it_zycit079-qtd_iten IS INITIAL AND

       NOT it_zycit079-fator IS INITIAL.

      IF NOT /pws/zycie078-aplicpli EQ '2'.

        SELECT SINGLE * FROM /pws/zycit338

               WHERE matnr    EQ it_ekpo-matnr

                 AND codsufra EQ it_zycit079-codsufra.

        IF sy-subrc EQ 0.

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

            REPLACE ',' WITH '.' INTO it_zycit079-fator.

* << Fim da inclusão

          SELECT SINGLE * FROM /pws/zycit219

              WHERE codigo   EQ /pws/zycit338-codsufra

                AND ncm      EQ it_zycit079-ncm

                AND destaque EQ it_zycit079-destaque.

          IF sy-subrc EQ 0.

            IF /pws/zycit219-flagppb NE 'X'.

              it_zycit079-qtdest =

                        it_zycit079-qtd_iten * it_zycit079-fator.

            ELSEIF /pws/zycit219-flagppb EQ 'X'.

              it_zycit079-qtdest = it_zycit079-ntgew.

...