Sintoma

Ao deixar criar fatura de Frete sem o pedido estar completamente faturado apresenta falha no custo

efetivo

Solução

Somente permitir criar fatura de frete se o pedido estiver totalmente faturado

Informações Complementares

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

Nota Número 09502 Data: 02/12/2009 Hora: 16:14:56

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

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

Nota Número              : 09502

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 8.0

Pacote                   : 00001

Agrupamento              : 00125

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

NÃO PERMITIR CRIAR FATURA FRETE SEM O PEDIDO ESTAR TOTALMENTE FATURADO

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

Palavras Chave:

FATURA - FRETE - TOTALMENTE - FATURADO - COMPLETAMENTE

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

Objetos da nota:

REPS /PWS/MZYCI003F01

REPT /PWS/SAPMZYCI003

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

Modificações efetuadas em REPS /PWS/MZYCI003F01

FORM salvar_dados.

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

  DATA v_trunc TYPE /pws/zycit003-vlreal.

  DATA v_qtd_iten LIKE itab_zycit003-invoiced.

* << Fim da inclusão

  DATA :v_tot_fat2 LIKE /pws/zycie006-vltotal,

        v_salva_desp.

  DATA: itab_zycit483s TYPE /pws/zycit483 OCCURS 0.

  e_subrc = '0' .

  PERFORM verifica_exit USING 'D'

                              '/PWS/SAPMZYCI003'

                              'FAT014'.

  CLEAR itab_zyglt100 .

  READ TABLE itab_zyglt100 WITH KEY

                   zexit = 'FAT014' BINARY SEARCH.

  IF NOT itab_zyglt100-zexit_ativa IS INITIAL.

    PERFORM (itab_zyglt100-formulario) IN PROGRAM

        (itab_zyglt100-programa) IF FOUND.

  ENDIF.

  IF e_subrc EQ '8'.

    EXIT.

  ENDIF.

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

  IF /pws/zycie006-tpfatura EQ '02'.

    LOOP AT itab_zycit003.

      v_trunc = itab_zycit003-qtd_iten * 10000 .

      v_trunc = trunc( v_trunc ) .

      v_qtd_iten = v_trunc / 10000.

      IF itab_zycit003-invoiced NE v_qtd_iten AND

         itab_zycit003-servico NE 'X'.

        MESSAGE e061 WITH text-190 itab_zycit003-ebeln

                                   itab_zycit003-ebelp text-191.

      ENDIF.

    ENDLOOP.

  ENDIF.

* << Fim da inclusão

  CLEAR v_stop.

  IF /pws/zycie006-tpfatura NE '11' AND

  ( /pws/zycie006-tpfatura NE '04' AND /pws/zycie006-vinserv EQ 'X' ).

    IF /pws/zycie006-nrseqce IS INITIAL.

...

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

Modificações efetuadas em REPT /PWS/SAPMZYCI003

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

Incluído símbolo de texto:

Idioma: EN

Símbolo: 192

Texto: (10 caracteres)

"Order/Item"

Comprimento máximo: 13

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 192

Texto: (13 caracteres)

"O Pedido/Item"

Comprimento máximo: 13

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

Incluído símbolo de texto:

Idioma: ES

Símbolo: 192

Texto: (11 caracteres)

"Orden/Punto"

Comprimento máximo: 13

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

Incluído símbolo de texto:

Idioma: EN

Símbolo: 193

Texto: (16 caracteres)

"Not fully billed"

Comprimento máximo: 32

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 193

Texto: (32 caracteres)

"Não esta completamente faturado."

Comprimento máximo: 32

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

Incluído símbolo de texto:

Idioma: ES

Símbolo: 193

Texto: (30 caracteres)

"No es completamente facturada."

Comprimento máximo: 32