Sintoma

Desenvolvimento Adicional.

O sistema transfere o valor da mercadoria sempre para a pasta ¿Pagamento 180 dias¿.

Será parametrizado o grupo de câmbio e transferido para a pasta correta.

Solução

1) Na tabela /pws/zycit128, criar nova coluna com as opções:

      1= Antecipado, 2= a vista, 3= pagto 180 dias

2) Na transação /pws/zycit128, incluir a nova coluna sendo de preenchimento obrigatório.

Ao gerar a DI, nas adições o valor que atualmente é colocado no campo ¿Valor total¿ na pasta

¿Pagamento em até 180 dias¿, deve ser colocado somente se o grupo de câmbio da pasta ¿Câmbio¿ da

fatura estiver parametrizado na /pws/zycit128 (novo campo) com a opção ¿3¿.

Informações Complementares

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

Nota Número 13285 Data: 30/09/2013 Hora: 10:53:59

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

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

Nota Número              : 13285

Categoria                : Melhoria

Prioridade               : Baixa

Versão PW.CE             : 9.0

Pacote                   : 00006

Agrupamento              : 00164

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

Referência às notas relacionadas:

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

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

VALOR TOTAL NA ADIÇÃO DA DI DE ACORDO COM O GRUPO DE CAMBIO DA FATURA

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

Palavras Chave:

ADIÇÕES - DI - FATURA - VALOR TOTAL - GRUPO DE CAMBIO -

PAGAMENTO EM ATÉ 180 DIAS -/PWS/ZYCIE116-VALTOT

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

Objetos da nota:

DOMA /PWS/ZYCID954

DTEL /PWS/ZYCIL954

TABD /PWS/ZYCIT128

REPS /PWS/MZYCI023O01

VDAT V_TVIMF

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

Modificações efetuadas em DOMA /PWS/ZYCID954

* Criar o Domínio abaixo:

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

Domínio incluído: /PWS/ZYCID954

Descrição breve incluída (18 caracteres), idioma: PT

"Forma de Pagamento"

Classe de desenvolvimento: /PWS/ZYCI

Idioma original: PT

Categoria de dados: NUMC

Número de posições: 1

Comprimento de saída: 1

Rotina de conversão:

-Valores individuais

Incluído valor fixo "1"

Texto incluído, idioma: PT (10 caracteres):

"antecipado"

Incluído valor fixo "2"

Texto incluído, idioma: PT (7 caracteres):

"à vista"

Incluído valor fixo "3"

Texto incluído, idioma: PT (14 caracteres):

"pagto 180 dias"

Incluída tabela de valores:

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

Modificações efetuadas em DTEL /PWS/ZYCIL954

* Criar o elemento de dados abaixo:

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

Elemento de dados incluído: /PWS/ZYCIL954

Classe de desenvolvimento: /PWS/ZYCI

Idioma original: PT

Descrição breve incluída: (18 caracteres), idioma: PT

"Forma de Pagamento"

Categoria de dados: Domínio

Domínio: /PWS/ZYCID954

ID parâmetro:

Nome componente default:

Documentar modificações: NÃO

Nome da ajuda de pesquisa:

Parâmetro da ajuda de pesquisa:

Comprimento máximo do denominador breve: 10

Denominador breve incluído (8 caracteres), idioma: PT

"F. Pagto"

Comprimento máximo do denominador médio: 18

Denominador médio incluído (18 caracteres), idioma: PT

"Forma de Pagamento"

Comprimento máximo do denominador longo: 20

Denominador longo incluído (18 caracteres), idioma: PT

"Forma de Pagamento"

Comprimento máximo do título: 18

Título incluído (18 caracteres), idioma: PT

"Forma de Pagamento"

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

Modificações efetuadas em TABD /PWS/ZYCIT128

* Criar o campo "FRPAGTO" na tabela /PWS/ZYCIT128

Campos      Tipo de campo

MANDT       MANDT

CODIGO      /PWS/ZYCIL176

DESCRICAO   /PWS/ZYCEL248

FRPAGTO     /PWS/ZYCIL954

USERNAMEC   SYUNAME

DTUSERC     SYDATUM

HRUSERC     SYSTTIMLO

* Gerar novamente a tela de atualização - Gerador de atualização de tabela

* Inserir uma rotina de atualização

Momento    Form

01         VERIFICA_ZYCIT128

* Criar esta rotina dentro do include: /PWS/LZYCIGF1OBS

*---------------------------------------------------------------------*

*       FORM VERIFICA_ZYCIT128                                        *

*---------------------------------------------------------------------*

FORM verifica_zycit128.

  DATA: v_erro     TYPE  c.

  DATA: wa_zycit128 TYPE /pws/zycit128.

  TYPES:

    BEGIN OF s_conteudo,

      zycit128  TYPE /pws/zycit128,

      zycit128t TYPE /pws/zycit128t,

      action(1) TYPE c,

    END OF s_conteudo.

  FIELD-SYMBOLS:

    <fs_conteudo> TYPE s_conteudo.

  LOOP AT total.

    ASSIGN total TO <fs_conteudo> CASTING.

    IF <fs_conteudo>-action EQ 'N' OR

       <fs_conteudo>-action EQ 'U'.

      CLEAR: wa_zycit128.

      wa_zycit128 = <fs_conteudo>-zycit128.

      IF wa_zycit128-frpagto IS INITIAL.

        MESSAGE i015(/pws/zycim) WITH text-024.

        v_erro = 'X'.

        EXIT.

      ENDIF.

    ENDIF.

  ENDLOOP.

  IF v_erro = 'X'.

    sy-subrc = 8.

  ELSE.

    CLEAR: sy-subrc.

  ENDIF.

ENDFORM.

* Criar o TEXT-024 e tradução

Portugues = Por favor informar o campo Forma de Pagamento.

Ingles    = Please inform the field form of payment.

Espanhol  = Por favor informe al campo Forma de pago.

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

Modificações efetuadas em REPS /PWS/MZYCI023O01

...

MODULE radio_init1 OUTPUT.

* >> Início da inclusão: MODULE RADIO_INIT1

  DATA: lv_frpagto TYPE /pws/zycit128-frpagto.

* << Fim da inclusão

...

...

* >> Início da inclusão: MODULE RADIO_INIT1

  IF NOT /pws/zycie006-gpcambio IS INITIAL.

    CLEAR: lv_frpagto.

    SELECT SINGLE frpagto INTO lv_frpagto

       FROM /pws/zycit128

       WHERE codigo = /pws/zycie006-gpcambio.

    IF sy-subrc EQ 0 AND lv_frpagto NE '3'.

      CLEAR: /pws/zycie116-valtot.

    ENDIF.

  ENDIF.

* << Fim da inclusão

  IF /pws/zycie116-taxajuros IS INITIAL.

    CLEAR: /pws/zycie116-codtxjuros, /pws/zycie116-taxarate, a_txjur.

  ENDIF.

  PERFORM load_juro.

ENDMODULE.

...