CE PLUS - Nota 012173

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Fatura Mercadoria

Data/Hora da Publicação: 10/05/2012 11:12:14

Data/Hora Última Alteração: 10/05/2012 11:12:14

Descrição da Nota: INCLUSÃO DO CAMPO FATURA ELETRONICA PARA O CHILE

Sintoma

Inclusão do campo "Fatura Eletronica" na Fatura e na Prestação de Contas para atender legislação do

Chile.

 

 

Solução

Inclusão do campo "Fatura Eletronica" na Fatura e na Prestação de Contas para atender legislação do

Chile.

 

Versões Tratadas

8.0


Pré-Requisitos

Produto:

Nota

Descrição

UTILIZAR CHAVE DE BLOQUEIO INFORMADA PARA LANÇAMENTO DA MIRO

CAMPO REFERÊNCIA É NECESSÁRIO EM PRESTAÇÃO DE CONTAS

ALTERANDO FATURA DE SEGURO, CONTABILIZA NOVAMENTE MAS NÃO ACERTA CUSTO.

Informações Complementares

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

Nota Número 12173 Data: 08/05/2012 Hora: 16:31:56

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

 

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

Nota Número              : 12173

Categoria                : Melhoria

Prioridade               : Baixa

Versão PW.CE             : 8.0

Pacote                   : 00011

Agrupamento              : 00113

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

Referência às notas relacionadas:

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

 

10449  - 00001 - 8.0    - 00004  - UTILIZAR CHAVE DE BLOQUEIO INFORMADA PARA LANÇAMENTO DA MIRO

12091  - 00002 - 8.0    - 00011  - CAMPO REFERÊNCIA É NECESSÁRIO EM PRESTAÇÃO DE CONTAS

12105  - 00003 - 8.0    - 00011  - ALTERANDO FATURA DE SEGURO, CONTABILIZA NOVAMENTE MAS NÃO ACERTA

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

INCLUSÃO DO CAMPO FATURA ELETRONICA PARA O CHILE

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

Palavras Chave:

FATURA - PRESTAÇÃO - CONTAS - ELETRONICA - CHILE

/PWS/SAPMZYCI003 - /PWS/SAPMZYCI004

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

Objetos da nota:

DOMA /PWS/ZYCID545

DTEL /PWS/ZYCIL920

DYNP /PWS/SAPMZYCI003                        0101

DYNP /PWS/SAPMZYCI004                        0300

REPS /PWS/MZYCI003F02

REPS /PWS/MZYCI003O01

REPS /PWS/MZYCI004F01

REPS /PWS/MZYCI004O01

TABD /PWS/ZYCIE006

TABD /PWS/ZYCIE026

TABD /PWS/ZYCIT006

TABD /PWS/ZYCIT026

 

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

Modificações efetuadas em DOMA /PWS/ZYCID545

 

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

Domínio incluído: /PWS/ZYCID545

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

"GL - Tipo Fatura Eletronica(Chile)"

Classe de desenvolvimento: /PWS/ZYGL

Idioma original: PT

Categoria de dados: CHAR

Número de posições: 2

Comprimento de saída: 2

Rotina de conversão:

Letras minúsculas: NÃO

-Valores individuais

Incluído valor fixo "MC"

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

""

Incluído valor fixo "MD"

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

""

Incluído valor fixo "EC"

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

""

Incluído valor fixo "ED"

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

""

Incluída tabela de valores:

 

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

Modificações efetuadas em DTEL /PWS/ZYCIL920

 

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

Elemento de dados incluído: /PWS/ZYCIL920

Classe de desenvolvimento: /PWS/ZYGL

Idioma original: PT

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

"GL - Tipo Fatura Eletronica(Chile)"

Categoria de dados: Domínio

Domínio: /PWS/ZYCID545

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 (10 caracteres), idioma: PT

"Fat.Eletr."

Comprimento máximo do denominador médio: 18

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

"Tipo Fatura Eletr."

Comprimento máximo do denominador longo: 29

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

"Tipo Fatura Eletronica(Chile)"

Comprimento máximo do título: 29

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

"Tipo Fatura Eletronica(Chile)"

 

 

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

Modificações efetuadas em DYNP /PWS/SAPMZYCI003                        0101

*O campo deve ser inserido a direira do campo "V_CONDICAO".

 

INCLUIR CAMPO TEXTO "/PWS/ZYCIE006-INVTP"

Altura                   5

Comprimento Visível      2

Linha                    15

Coluna                   95

Formato                  CHAR

Grupo 4                  BOL

Linhas mínimas           2

Texto                    __

Código função

 

INCLUIR TEXTO "/PWS/ZYCIE006-INVTP"

Comprimento Visível      17

Linha                    15

Coluna                   77

Formato                  CHAR

Texto                    Eletronic Invoice

Código função

 

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

Modificações efetuadas em DYNP /PWS/SAPMZYCI004                        0300

*O campo deve ser inserido a direira do campo "V_DESC_IMP".

,

INCLUIR CAMPO TEXTO "/PWS/ZYCIE026-INVTP"

Altura                   5

Comprimento Visível      2

Linha                    3

Coluna                   108

Formato                  CHAR

Linhas mínimas           2

Texto                    __

Código função

 

INCLUIR TEXTO "/PWS/ZYCIE026-INVTP"

Comprimento Visível      17

Linha                    3

Coluna                   87

Formato                  CHAR

Texto                    Eletronic Invoice

Código função

 

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

Modificações efetuadas em REPS /PWS/MZYCI003F02

 

...

  IF /pws/zycit286-conversao = 'DTDOC'.

    wa_headerdata-pstng_date = /pws/zycie006-dtincl.

  ELSE.

    wa_headerdata-pstng_date = /pws/zycie006-dtlanc.

  ENDIF.

  wa_headerdata-ref_doc_no   = itab_zycie033-bktxt.

  wa_headerdata-comp_code    = itab_zycie033-bukrs.

  wa_headerdata-currency     = itab_zycie033-waers.

  wa_headerdata-gross_amount = itab_zycie033-rmwwr.

  wa_headerdata-header_txt   = wa_zycbt007-bktxt.

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

  IF NOT /pws/zycie006-invtp IS INITIAL.

    wa_headerdata-header_txt = /pws/zycie006-invtp.

  ENDIF.

* << Fim da inclusão

  wa_headerdata-diff_inv = itab_zycie033-lifnr.

  wa_headerdata-doc_type     = wa_zycbt011-blart.

  wa_headerdata-calc_tax_ind = 'X'.

  v_invoice = 'X'.

  v_creditmemo = 'X'.

  LOOP AT itab_itemdata.

    READ TABLE itab_zycit003 WITH KEY ebeln = itab_itemdata-po_number

                                        ebelp = itab_itemdata-po_item.

    itab_itens_iva-bedat = itab_zycie033-bldat.

    itab_itens_iva-bewae = /pws/zycie006-waers.

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCI003O01

 

...

            screen-name EQ  '/PWS/ZYCIE006-LIFNR' OR

            screen-name EQ  '/PWS/ZYCIE006-PAQUIS' OR

            screen-name EQ  '/PWS/ZYCIE006-DTBASE' OR

            screen-name EQ  '/PWS/ZYCIE006-ZLSPR' OR

            screen-name EQ  '/PWS/ZYCIE006-ZLSCH' OR

            screen-name EQ  '/PWS/ZYCIE006-FHCAMBIO' .

            screen-input = 0.

            MODIFY SCREEN.

          ENDIF.

        ENDIF.

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

        IF screen-name = '/PWS/ZYCIE006-INVTP'.

          IF NOT /pws/zycie006-belnr_p IS INITIAL.

            screen-input = 0.

            MODIFY SCREEN.

          ENDIF.

          IF t001-land1 NE 'CL'.

            screen-input = 0.

            screen-invisible = 1.

            MODIFY SCREEN.

          ENDIF.

        ENDIF.

* << Fim da inclusão

      ENDLOOP.

      IF /pws/zycie006-vlmerc IS INITIAL AND

        /pws/zycie006-vlfre IS INITIAL AND

        /pws/zycie006-vlseg IS INITIAL.

        CLEAR /pws/zycie006-vltotal.

      ENDIF.

    WHEN '0106'.

      LOOP AT SCREEN.

        IF v_status_s = 0 OR sy-tcode = '/PWS/ZYCI003_M'.

          IF screen-name NE 'BTN0100_01' .

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCI004F01

 

...

                             frgsx4   =  /pws/zycie026-frgsx4

                             frgsx5   =  /pws/zycie026-frgsx5

                             waersmu  =  /pws/zycie026-waersmu

                             iva      =  /pws/zycie026-iva

                             taxamu   =  /pws/zycie026-taxamu

                             totdepme =  /pws/zycie026-totdepme

                             vldfme   =  /pws/zycie026-vldfme

                             vlmime   =  /pws/zycie026-vlmime

                             reterir  =  /pws/zycie026-reterir

                             forndes  =  /pws/zycie026-forndes

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

                             invtp    =  /pws/zycie026-invtp

* << Fim da inclusão

                       WHERE nrseq    = itab_zycit026-nrseq

                         AND nradto   = itab_zycit026-nradto

                         AND nrpres   = v_value.

    IF sy-subrc = 0.

      v_save = 'X'.

      /pws/zycie026-dtincl = v_dtincl.

      /pws/zycie026-totdep = v_totdep.

      /pws/zycie026-vldf   = v_vldf.

      /pws/zycie026-nrseq  = itab_zycit026-nrseq.

      /pws/zycie026-nradto = itab_zycit026-nradto.

...

 

...

            v_bktxt   = v_bktxt.

  PERFORM ajustes_46b.

  wa_headerdata-pmnt_block = /pws/zycie026-zlspr.

  wa_headerdata-doc_date     = itab_zycie033-bldat.

  wa_headerdata-pstng_date   = itab_zycie033-budat.

  wa_headerdata-ref_doc_no   = itab_zycie033-bktxt.

  wa_headerdata-comp_code    = itab_zycie033-bukrs.

  wa_headerdata-currency     = itab_zycie033-waers.

  wa_headerdata-gross_amount = itab_zycie033-rmwwr.

  wa_headerdata-header_txt   = /pws/zycbt007-bktxt.

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

  IF NOT /pws/zycie026-invtp IS INITIAL.

    wa_headerdata-header_txt   = /pws/zycie026-invtp.

  ENDIF.

* << Fim da inclusão

  wa_headerdata-diff_inv = itab_zycie033-lifnr.

  wa_headerdata-doc_type     = wa_zycbt011-blart.

  wa_headerdata-calc_tax_ind = 'X'.

  wa_headerdata-exch_rate = /pws/zycie026-taxamu.

  wa_headerdata-partner_bk = /pws/zycie026-bvtyp.

  LOOP AT itab_itemdata.

    READ TABLE it_zycit003 WITH KEY ebeln = itab_itemdata-po_number

                                      ebelp = itab_itemdata-po_item.

    itab_itens_iva-bedat = itab_zycie033-bldat.

    itab_itens_iva-bewae = /pws/zycie026-waersmu.

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCI004O01

 

...

        screen-name = '/PWS/ZYCIE026-IMPOSTO'  OR

        screen-name = '/PWS/ZYCIE026-IVA'  OR

        screen-name = '/PWS/ZYCIE026-AREA'      OR

        screen-name = '/PWS/ZYCIE026-VINSERV'   OR

        screen-name = '/PWS/ZYCIE026-ZLSPR'     OR

        screen-name = '/PWS/ZYCIE026-ZLSCH'     OR

        screen-name = '/PWS/ZYCIE026-FDLEV'     OR

        screen-name = '/PWS/ZYCIE026-DTDOC'     OR

        screen-name = '/PWS/ZYCIE026-WAERSMU'   OR

        screen-name = '/PWS/ZYCIE026-REFPRES'   OR

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

        screen-name = '/PWS/ZYCIE026-INVTP'     OR

* << Fim da inclusão

        screen-name = '/PWS/ZYCIE026-TAXAMU'.

        screen-input = 0.

      ENDIF.

      IF screen-group1 = 'GR1'.

        screen-input = '0'.

        MODIFY SCREEN.

        screen-invisible = '1'.

        MODIFY SCREEN.

      ENDIF.

      IF screen-group2 = 'GR2' AND ( sy-tcode EQ '/PWS/ZYCI004_A' OR

...

 

...

        screen-active = 0.

      ENDIF.

      MODIFY SCREEN.

    ENDIF.

    IF screen-name EQ '/PWS/ZYCIE026-VINSERV'.

      IF v_flags NE 'X'.

        screen-invisible = '1'.

      ELSE.

        CLEAR screen-invisible.

      ENDIF.

      MODIFY SCREEN.

    ENDIF.

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

    IF screen-name = '/PWS/ZYCIE026-INVTP' AND

       t001-land1 NE 'CL'.

      screen-input = 0.

      screen-invisible = 1.

      MODIFY SCREEN.

    ENDIF.

* << Fim da inclusão

  ENDLOOP.

ENDMODULE.

...

 

 

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

Modificações efetuadas em TABD /PWS/ZYCIE006

 

Nome de campo Elem.dados    Tab.verif.    N CtDt Comp.

...

* >> Início da inclusão:

INVTP         /PWS/ZYCIL920                 CHAR     2

* << Fim da inclusão

 

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

Modificações efetuadas em TABD /PWS/ZYCIE026

 

Nome de campo Elem.dados    Tab.verif.    N CtDt Comp.

...

* >> Início da inclusão:

INVTP         /PWS/ZYCIL920                 CHAR     2

* << Fim da inclusão

 

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

Modificações efetuadas em TABD /PWS/ZYCIT006

 

Nome campo Chv Elem.dados    Tab.verif.    N CtDt Comp.

...

* >> Início da inclusão:

INVTP          /PWS/ZYCIL920                 CHAR     2

* << Fim da inclusão

 

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

Modificações efetuadas em TABD /PWS/ZYCIT026

 

Nome campo Chv Elem.dados    Tab.verif.    N CtDt Comp.

...

* >> Início da inclusão:

INVTP          /PWS/ZYCIL920                 CHAR     2

* << Fim da inclusão