Sintoma

Quando o material está parametrizado no SAP para que seja informado o certificado no recebimento, o

Pw.Ce não está preenchendo esta informação.

Solução

No cadastro do material, quando os campos referentes ao certificado estiverem preenchidos, esta

informação deverá aparecer também no recebimento físico (MIGO).

1) Cadastro de material - pasta Administração de Qualidade:

¿ ¿Suprimento QM ativo¿ (MARA-QMPUR),

¿ ¿Chave controle QM¿ (MARC-SSQSS) e

¿ ¿Ctg de certificado¿ (MARC-QZGTP).

Parametrizar tabela TQ05.

Informações Complementares

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

Nota Número 10923 Data: 28/01/2011 Hora: 13:45:35

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

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

Nota Número              : 10923

Categoria                : Consultoria

Prioridade               : Baixa

Versão PW.CE             : 8.0

Pacote                   : 00006

Agrupamento              : 00056

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

Referência às notas relacionadas:

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

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

CERTIFICADO QM - MIGO - CERTIFIC.EM ANEXO?

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

Palavras Chave:

PREENCHER O CAMPO "CERTIFIC.EM ANEXO?" NA MIGO - CERTIFICADO DE QM

PARAMETRIZAR TABELA TQ05

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

Objetos da nota:

REPS /PWS/MZYCI017F01

REPS /PWS/MZYCI017X01

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

Modificações efetuadas em REPS /PWS/MZYCI017F01

...

  IF NOT itab_itens_nf[] IS INITIAL.

    SELECT a~ebeln a~ebelp a~matnr b~sernp

     FROM ( ekpo AS a INNER JOIN marc AS b

          ON a~matnr EQ b~matnr AND

             a~werks EQ b~werks )

      INTO TABLE itab_serie

      FOR ALL ENTRIES IN itab_itens_nf

      WHERE ebeln = itab_itens_nf-ebeln

        AND ebelp = itab_itens_nf-ebelp.

  ENDIF.

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

  IF NOT itab_itens_nf[] IS INITIAL.

    CLEAR: gt_marc, gt_marc[].

    SELECT matnr werks qzgtp

       FROM marc

       INTO TABLE gt_marc

       FOR ALL ENTRIES IN itab_itens_nf

       WHERE matnr EQ itab_itens_nf-matnr.

  ENDIF.

* << Fim da inclusão

  FREE itab_zycit031.

  LOOP AT itab_itens_nf.

    itab_zycit031-tcode  = itab_zycie033-tcode.

    itab_zycit031-tabela = itab_zycie033-tabela.

    itab_zycit031-cpochv = itab_zycie033-cpochv.

    itab_zycit031-ebeln  = itab_itens_nf-ebeln.

    itab_zycit031-ebelp  = itab_itens_nf-ebelp.

    itab_zycit031-menge  = itab_itens_nf-qtd_item.

    itab_zycit031-lgort  = itab_itens_nf-lgort.

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

    READ TABLE gt_marc WITH KEY matnr = itab_itens_nf-matnr.

    IF sy-subrc EQ 0 AND NOT gt_marc-qzgtp IS INITIAL.

      itab_zycit031-answer = 'J'.

    ENDIF.

* << Fim da inclusão

    IF NOT itab_serie[] IS INITIAL.

      CLEAR itab_serie.

      READ TABLE itab_serie WITH KEY ebeln = itab_itens_nf-ebeln

                                     ebelp = itab_itens_nf-ebelp.

      IF NOT itab_serie-sernp IS INITIAL.

        itab_zycit031-sernp = 'X'.

      ENDIF.

    ENDIF.

    APPEND itab_zycit031.

    CLEAR itab_zycit031.

...

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

Modificações efetuadas em REPS /PWS/MZYCI017X01

...

* >> Início da inclusão:

DATA: BEGIN OF gt_marc OCCURS 0,

        matnr TYPE marc-matnr,

        werks TYPE marc-werks,

        qzgtp TYPE marc-qzgtp,

      END OF gt_marc.

* << Fim da inclusão

DATA: END OF COMMON PART.