SAP – DEVELOPPEMENT ABAP

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
                                          ).

Le flux de documents dans les avis qualités est trés pratique, il est donc utile voir indispensable de lier tous les objets SAP en relation avec les avis qu’ils soient créer avant, pendant ou aprés l’avis qualité de référence.

Nous parlons ici d’autres avis QM,CS ou PM, de commande achat, de commande client, de mouvement de stock…  Bien souvent, en utilisant les BAPI et autres fonctions le lien se fait automatiquement mais pour les autres cas, nous pouvons utiliser le MF :   QMLR_CREATE_DOCUMENT_FLOW.

Exemple :

DATA WS_OBJ_ROLEA   LIKE BORIDENT.
DATA WS_OBJ_ROLEB   LIKE BORIDENT.
DATA WV_RELTYPE     LIKE BRELTYP-RELTYPE.  

CONSTANTS WC_VONA  LIKE BRELTYP-RELTYPE  VALUE ‘VONA’.

*— predecessor - notification
     move viqmel-qmnum   to ws_obj_rolea-objkey.
     move ‘BUS2078′      to ws_obj_rolea-objtype.

*— successor  - PO
     move wv_ebeln      to ws_obj_roleb-objkey.
     move ‘BUS2012′     to ws_obj_roleb-objtype. 

*—Relationtype
      move wc_vona          to wv_reltype.

      call function ‘QMLR_CREATE_DOCUMENT_FLOW’
        EXPORTING
          role_a             = ws_obj_rolea
          role_b             = ws_obj_roleb
          reltype            = wv_reltype
        EXCEPTIONS
          no_logical_system  = 1
          no_relation_create = 2
          others             = 3.

Nous verrons dans un futur post comment recupérer les liens dans les tables SAP.