SAP – DEVELOPPEMENT ABAP

QM notification

On connait les avis QM dans les flux standards comme le contrôle lors d’une entrée marchandise ou en cours de production… Mais on peut utiliser les avis pour toutes sortes de problématiques qui ne sont pas directement liées au flux SAP.

Ici, je vais vous présenter un exemple de ces utilisations pour traiter la dérogation d’un produit finis pour un client donné. L’objectif est de voir apparaitre la dérogation (Avis de type D1 / D2) dans l’historique du S/N et de garder une trace de toutes les actions.

- Je profite de l’occasion pour présenter également la barre d’activité des avis QM -

Avis D1 :

3 Parties : 1- Faits(description de la dérogation); 2-les interventions(Suivi des actions); 3- Les partenaires(Ligne de production, client…)

Le barre d’activités :

Elle sert a déclencher des actions depuis l’avis, c’est à dire mail, impression de formulaire….Et tout cela tracé par une intervention ( ou activité).

Je vais zoomer sur le bouton :

Il va permettre d’associer à la dérogation générique (Avis de type D1)  une liste de S/N via un nouvel avis (D2). Et c’est cet avis que l’on retrouvera dans l’historique du S/N.

J’utilise un ALV pour saisir la liste des S/N :

Des avis QM sont automatiquement créés via la BAPI :   IQS4_CREATE_NOTIFICATION .

Nous les retrouvons via le flux de documents :

Avis  D1 en 0008XXX et avis D2 en 0004XXX

Avis D2 :

Historique du S/N :

On voit en première position la dérogation client.

Un post pour expliquer comment ajouter des groupes de zones dans la fonctionnalité de mise en forme des ALV. C’est trés pratique surtout si on utilise beacoup de zones.

  Data : wt_groups type LVC_T_SGRP,
              ws_groups type LVC_S_SGRP.

…

Dans la methode de mise en forme de l’ALV (Tri, layout…)

* groupes spécials
    CLEAR ws_groups. REFRESH wt_groups.
    ws_groups-sp_group = ’01′.
    ws_groups-text = text-g01.  ”‘Avis QM’.
    APPEND ws_groups TO wt_groups.
    CLEAR ws_groups.
    ws_groups-sp_group = ’02′.
    ws_groups-text = text-g03. “‘Données CO’.
    APPEND ws_groups TO wt_groups.
    CLEAR ws_groups.
    ws_groups-sp_group = ’03′.
    ws_groups-text = text-g02. “‘Données CS’.
    APPEND ws_groups TO wt_groups.

…

Dans la methode la mise en forme du catalogue de l’ALV

      CALL FUNCTION ‘LVC_FIELDCATALOG_MERGE’
          EXPORTING
             i_structure_name = ’ZST_GARANTIE’
          CHANGING
            ct_fieldcat      = wt_fieldcat.
    LOOP AT wt_fieldcat INTO ws_field.
      CASE ws_field-fieldname.

…   

       WHEN ’QMKAT’.
          ws_field-no_out = ’X’.
          ws_field-sp_group = ’01′.
        WHEN OTHERS.
          ws_field-no_out = ’X’.
          ws_field-sp_group = ’02′.
      ENDCASE.
      MODIFY wt_fieldcat FROM ws_field.
    ENDLOOP.

Dans l’appel de la methode   : “set_table_for_first_display”  

wo_alv->set_table_for_first_display( EXPORTING
                                         is_layout            = ws_layout
                                         is_variant           = ws_disvariant
                                         i_save               = ’A’
                                         IT_SPECIAL_GROUPS    = wt_groups
                                         CHANGING
                                          it_fieldcatalog       = wt_fieldcat
                                          it_sort               = wt_sort
                                          it_outtab             = wt_garantie
                                          ).