CE PLUS - Nota 002314

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Embarque

Data/Hora da Publicação: 25/10/2006 00:00:00

Data/Hora Última Alteração: 20/06/2011 13:13:18

Descrição da Nota: NO EMBARQUE REGIME 16 VERIFICAR SE A VINCULAÇÃO DA DA É MANUAL.

Sintoma

No embarque, somente para regime 16, quando a vinculação da DA for manual, deverá aparecer a

seguinte mensagem "vinculação manual da DA" com botões de "sim" e "não".

Após salvar o embarque com vinculação manual, o sistema deverá procurar a tabela 025. Caso exista a

tabela, o sistema deverá fazer a baixa da DA.

 

 

Solução

Diferenciar e emitir uma mensagem ao vincular pedidos de compra na DA em regime 16

 

Versões Tratadas

6.0


Pré-Requisitos

Produto:

Nota

Descrição

DESEMVOLVIMENTO DA DECLARAÇÃO DE ADMISSÃO (DA)

ENTREPOSTO ADUANEIRO

APÓS SALVAR O EMBARQUE COM REGIME 16, O SALDO DA DA E O VALOR PLANEJADO

Informações Complementares

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

Nota Número 02314 Data: 25/10/2006 Hora: 17:37:54

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

 

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

Nota Número              : 02314

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 6.0

Pacote                   : 00025

Agrupamento              : 00137

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

Referência às notas relacionadas:

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

 

00774  - 00001 - 6.0    - 00022  - ENTREPOSTO ADUANEIRO

01282  - 00002 - 6.0    - 00023  - DESEMVOLVIMENTO DA DECLARAÇÃO DE ADMISSÃO (DA)

01353  - 00003 - 6.0    - 00023  - APÓS SALVAR O EMBARQUE COM REGIME 16, O SALDO DA DA E O VALOR PLA

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

NO EMBARQUE REGIME 16 VERIFICAR SE A VINCULAÇÃO DA DA É MANUAL.

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

Palavras Chave:

DA - EMBARQUE - RECOF - VINCULAÇÃO DE PEDIDO

VINCULAÇÃO MANUAL.

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

Objetos da nota:

REPS /PWS/MZYCI001F03

REPS /PWS/MZYCI001I01

REPS /PWS/MZYCI001X01

REPT /PWS/SAPMZYCI001

 

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

Modificações efetuadas em REPS /PWS/MZYCI001F03

 

...

    DESCRIBE TABLE itab_da LINES v_line.

    IF itab_da[] IS INITIAL.

      MESSAGE s015 WITH text-259 text-264.

      EXIT.

    ENDIF.

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

    IF v_manual EQ 'X'.

      v_caller = 'SELECIONAR_RC'.

    ELSE.

      v_caller = 'SELECIONAR_DA'.

    ENDIF.

* << Fim da inclusão

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

    v_caller = 'SELECIONAR_DA'.

* << Fim da exclusão

    CALL SCREEN '0003'.

  ELSE.

    MESSAGE s015 WITH text-259 text-264.

  ENDIF.

ENDFORM.

...

 

...

                         WHERE ebeln   = itab_zycit013-ebeln

                           AND ebelp   = itab_zycit013-ebelp .

    MODIFY itab_zycit013.

  ENDLOOP.

ENDFORM.

* >> Início da inclusão:

FORM verifica_rc.

  CLEAR v_resposta.

  CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE'

       EXPORTING

            defaultoption = 'Y'

            diagnosetext1 = text-335

            textline1     = text-336

            titel         = text-337

       IMPORTING

            answer        = v_resposta.

  IF v_resposta EQ 'J'.

    v_manual = 'X'.

    EXIT.

  ELSEIF v_resposta EQ 'N'.

    v_manual = 'N'.

  ELSE.

    CLEAR v_manual.

  ENDIF.

  CLEAR v_resposta.

ENDFORM.

* << Fim da inclusão

 

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

Modificações efetuadas em REPS /PWS/MZYCI001I01

 

...

        SELECT SINGLE status

               FROM /pws/zycit001

               INTO /pws/zycie001-status

               WHERE nrseq = /pws/zycie001-nrseq.

      WHEN 'SELE_DA'.

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

        if /pws/zycie001-regime = '16'.

           perform verifica_RC.

        endif.

        if v_manual eq 'N'.

           CALL SELECTION-SCREEN '0701'.

        else.

* << Fim da inclusão

        CALL SELECTION-SCREEN '0700'.

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

        endif.

* << Fim da inclusão

      WHEN 'SELE_RC'.

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCI001X01

 

...

data:   ebeln type ekpo-ebeln,

        ebelp type ekpo-ebelp,

        menge type ekpo-menge,

        bstyp type ekpo-bstyp.

data: end of itab_pedido.

* >> Início da inclusão:

data: v_manual.

* << Fim da inclusão

DATA: END OF COMMON PART A.

 

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

Modificações efetuadas em REPT /PWS/SAPMZYCI001

 

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

Incluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 335

 

Texto: (30 caracteres)

"Opção de Seleção Manual de DA."

 

Comprimento máximo: 30

 

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

Incluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 336

 

Texto: (17 caracteres)

"Deseja continuar?"

 

Comprimento máximo: 17

 

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

Incluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 337

 

Texto: (23 caracteres)

"Vinculação Manual de DA"

 

Comprimento máximo: 23

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): PA_BUK

 

Texto: (15 caracteres)

"Empresa"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_ADICA

 

Texto: (14 caracteres)

"Adição"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_BELN

 

Texto: (14 caracteres)

"Pedido"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_BELP

 

Texto: (12 caracteres)

"Item"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_DTDE

 

Texto: (24 caracteres)

"Data Desembaraço"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_EBELP

 

Texto: (12 caracteres)

"Item"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_FILIA

 

Texto: (14 caracteres)

"Filial"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_ITADI

 

Texto: (22 caracteres)

"Item da Adição"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_LIFN

 

Texto: (18 caracteres)

"Fornecedor"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_MATN

 

Texto: (16 caracteres)

"Material"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_MATNR

 

Texto: (16 caracteres)

"Material"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_MATRI

 

Texto: (15 caracteres)

"Empresa"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_NRDA

 

Texto: (20 caracteres)

"Número da DA"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_NRSEQ

 

Texto: (21 caracteres)

"Sequencial DA"

 

Referência ao Dictionary: NÃO

 

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

Excluído texto de seleção:

 

Idioma: PT

 

Variável (SELECT-OPTION / PARAMETER): SO_NUMDA

 

Texto: (20 caracteres)

"Número da DA"

 

Referência ao Dictionary: NÃO