Sintoma

Ao vincular um pedido de compra com fornecedor brasileiro, o sistema não permite a vinculação.

Porém aparece uma mensagem que pedido de compra não existe.

Solução

Atualização do programa de embarque para que no momento da vinculação do pedido que esteja incorreto

o programa mostre as mensagens especificando o campo do pedido que está incorreto.

Informações Complementares

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

Nota Número 01290 Data: 08/05/2006 Hora: 15:51:04

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

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

Nota Número              : 01290

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00023

Agrupamento              : 00112

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

Referência às notas relacionadas:

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

00924  - 00001 - 6.0    - 00022  - O SISTEMA PERMITE O ANDAMENTO DO PROCESSO DE PEDIDOS NÃO LIBERADO

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

AO VINCULAR UM PEDIDO DE COMPRA COM FORNECEDOR BRASILEIRO,

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

Palavras Chave:

VINCULAR - PEDIDO - FORNECEDOR - NACIONAL

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

Objetos da nota:

REPS /PWS/MZYCI001F01

REPS /PWS/MZYCI001TOP

REPT /PWS/SAPMZYCI001

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

Modificações efetuadas em REPS /PWS/MZYCI001F01

...

            itab_inco1-high = ' '.

            APPEND itab_inco1.

          ENDLOOP.

        ENDIF.

      ENDIF.

    ENDIF.

  ENDIF.

  IF itab_zycit011[] IS INITIAL.

    SELECT ekko~bukrs ekko~waers ekko~lifnr ekko~aedat

           ekko~inco1 ekko~ebeln

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

           ekpo~ebelp ekpo~werks ekpo~bednr ekpo~menge

* << Fim da exclusão

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

           ekpo~ebelp ekpo~loekz ekpo~werks ekpo~bednr ekpo~menge

* << Fim da inclusão

           ekpo~ktmng ekpo~bstyp

           ekpo~meins ekpo~ntgew ekpo~gewei ekpo~netpr ekpo~txz01

           ekpo~uebto ekpo~uebtk ekpo~j_1bnbm ekpo~matnr ekpo~mtart

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

           ekko~spras ekpo~idnlf

* << Fim da exclusão

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

           ekko~spras ekpo~idnlf ekpo~elikz ekpo~wepos ekpo~webre

           ekpo~j_1bmatuse

* << Fim da inclusão

      FROM ( ekpo INNER JOIN ekko ON ekpo~ebeln = ekko~ebeln )

      INTO TABLE itab_itens

      WHERE ekko~bukrs EQ pa_bukrs

        AND ekpo~werks IN so_werks

        AND ekpo~bstyp IN itab_bstyp

        AND ekko~waers IN so_waers

        AND ekko~lifnr IN so_lifnr

        AND ekko~inco1 IN itab_inco1

        AND ekpo~bednr IN so_bednr

        AND ekko~aedat IN so_aedat

        AND ekko~ebeln IN so_ebeln

        AND ekko~waers NE /pws/zycbt007-waersb

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

        AND ekpo~elikz NE 'X'

        AND ekpo~loekz NE 'L'

        AND ekpo~loekz NE 'S'

* << Fim da exclusão

       AND ekpo~ebelp IN so_ebelp

       AND ekpo~matnr IN so_matnr.

  ELSE.

    SELECT ekko~bukrs ekko~waers ekko~lifnr ekko~aedat

           ekko~inco1 ekko~ebeln

           ekpo~ebelp ekpo~werks ekpo~bednr ekpo~menge

           ekpo~ktmng ekpo~bstyp

           ekpo~meins ekpo~ntgew ekpo~gewei ekpo~netpr ekpo~txz01

           ekpo~uebto ekpo~uebtk ekpo~j_1bnbm ekpo~matnr ekpo~mtart

           ekko~spras ekpo~idnlf

      FROM ( ekpo INNER JOIN ekko ON ekpo~ebeln = ekko~ebeln )

      INTO TABLE itab_itens

      FOR ALL ENTRIES IN itab_zycit011

      WHERE ekko~ebeln EQ itab_zycit011-ebeln

        AND ekpo~ebelp EQ itab_zycit011-ebelp

        AND ekko~bukrs EQ /pws/zycie001-bukrs

        AND ekko~waers NE /pws/zycbt007-waersb

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

        AND ekpo~elikz NE 'X'

        AND ekpo~loekz NE 'L'

        AND ekpo~loekz NE 'S'

* << Fim da exclusão

       AND ekpo~ebelp IN so_ebelp

       AND ekpo~matnr IN so_matnr.

  ENDIF.

  IF sy-subrc NE 0.

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

    MESSAGE e015 WITH text-248.

* << Fim da exclusão

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

    MESSAGE e013 WITH text-263.

    EXIT.

  ENDIF.

  DATA: v_index  TYPE i,

        v_index2 TYPE i.

  DESCRIBE TABLE itab_itens LINES v_index.

  LOOP AT itab_itens.

    DELETE itab_itens WHERE webre EQ 'X'.

    DELETE itab_itens WHERE wepos NE 'X'.

    DELETE itab_itens WHERE elikz EQ 'X'.

    DELETE itab_itens WHERE loekz EQ 'L'.

    DELETE itab_itens WHERE loekz EQ 'S'.

    DELETE itab_itens WHERE j_1bmatuse EQ ' '.

  ENDLOOP.

  IF itab_itens[] IS INITIAL.

    MESSAGE e013 WITH text-263.

* << Fim da inclusão

    EXIT.

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

  ELSE.

    DESCRIBE TABLE itab_itens LINES v_index2.

    IF v_index NE v_index2.

      MESSAGE e013 WITH text-263.

      EXIT.

    ENDIF.

* << Fim da inclusão

  ENDIF.

...

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

Modificações efetuadas em REPS /PWS/MZYCI001TOP

...

        lifnr LIKE ekko-lifnr,

        aedat LIKE ekko-aedat,

        inco1 LIKE ekko-inco1,

        ebeln LIKE ekko-ebeln,

        ebelp LIKE ekpo-ebelp,

* >> Início da inclusão:

        loekz LIKE ekpo-loekz,

* << Fim da inclusão

        werks LIKE ekpo-werks,

        bednr LIKE ekpo-bednr,

        menge LIKE ekpo-menge,

        ktmng LIKE ekpo-ktmng,

        bstyp LIKE ekpo-bstyp,

...

...

        j_1bnbm LIKE ekpo-j_1bnbm,

        matnr LIKE ekpo-matnr,

        mtart LIKE ekpo-mtart,

        spras LIKE ekko-spras,

        idnlf LIKE ekpo-idnlf,

* >> Início da inclusão:

        elikz LIKE ekpo-elikz,

        wepos LIKE ekpo-wepos,

        webre LIKE ekpo-webre,

        j_1bmatuse LIKE ekpo-j_1bmatuse,

* << Fim da inclusão

      END OF itab_itens.

DATA: BEGIN OF itab_divisao OCCURS 0,

        ebeln LIKE ekko-ebeln       ,

        ebelp LIKE ekpo-ebelp       ,

        gsber LIKE ekkn-gsber       ,

...

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

Modificações efetuadas em REPT /PWS/SAPMZYCI001

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 263

Texto: (28 caracteres)

"Nenhum dado foi selecionado."

Comprimento máximo: 30

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 298

Texto: (17 caracteres)

"Verificar Pedido,"

Comprimento máximo: 20

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 299

Texto: (28 caracteres)

"Pasta Fatura (Fatura Final)."

Comprimento máximo: 30

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 300

Texto: (32 caracteres)

"Pasta Fornecimento (Entr.Merc.)."

Comprimento máximo: 32

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 301

Texto: (32 caracteres)

"Pasta Fornecimento (Rem. Final)."

Comprimento máximo: 32

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 302

Texto: (15 caracteres)

"Item Eliminado."

Comprimento máximo: 15

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 303

Texto: (15 caracteres)

"Item Bloqueado."

Comprimento máximo: 15

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 304

Texto: (38 caracteres)

"Pasta Brasil (Utilização do Material)."

Comprimento máximo: 38

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 305

Texto: (20 caracteres)

"Fornecedor Nacional."

Comprimento máximo: 132

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

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