abap-platform-rap110 icon indicating copy to clipboard operation
abap-platform-rap110 copied to clipboard

Correction README.md files

Open ruthiel opened this issue 1 year ago • 3 comments
trafficstars

  • Small typos
  • Formating coherence
  • Removing white spaces

ruthiel avatar Aug 26 '24 09:08 ruthiel

&--------------------------------------------------------------------- *& Report ZBWIN_2LIS_11_VASIT *& &--------------------------------------------------------------------- *& &--------------------------------------------------------------------- REPORT ZBWIN_2LIS_11_VASIT.

type-pools: sbiwa.

&--------------------------------------------------------------------- *& Form execute_user_exit &---------------------------------------------------------------------

  •   Ajout des champs AUART (Type de document) et RFSTA (Statut du document)
    

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

  •  -->I_T_SELECT    Sélections d'entrée
    
  •  -->I_T_FIELDS    Champs sélectionnés
    
  •  -->C_T_DATA      Données d'extraction
    
  •  -->C_T_MESSAGES  Messages
    

---------------------------------------------------------------------- FORM EXECUTE_USER_EXIT TABLES i_t_select TYPE sbiwa_t_select i_t_fields TYPE sbiwa_t_fields c_t_data STRUCTURE MC11VA0STI c_t_messages STRUCTURE balmi.

DATA: lt_data TYPE STANDARD TABLE OF mc11va0sti, ls_data TYPE mc11va0sti, lt_vbak TYPE vbak, lt_vbup TYPE vbup, lt_vbeln TYPE vbeln, lv_auart TYPE auart, lv_rfsta TYPE rfsta.

FIELD-SYMBOLS: <fs_data> TYPE mc11va0sti.

" Copier les données d'extraction dans une table de travail lt_data[] = c_t_data[].

" Récupérer les numéros de document VBELN à partir des données d'extraction LOOP AT lt_data INTO ls_data. APPEND ls_data-vbeln TO lt_vbeln. ENDLOOP.

" Supprimer les doublons dans les numéros de document DELETE ADJACENT DUPLICATES FROM lt_vbeln.

" Sélectionner les AUART (Type de document) depuis VBAK pour tous les VBELN IF lt_vbeln IS NOT INITIAL. SELECT vbeln auart INTO TABLE lt_vbak FROM vbak FOR ALL ENTRIES IN lt_vbeln WHERE vbeln = lt_vbeln-vbeln.

" Sélectionner les RFSTA (Statut du document) depuis VBUP pour tous les VBELN
SELECT vbeln rfsta
  INTO TABLE lt_vbup
  FROM vbup
  FOR ALL ENTRIES IN lt_vbeln
  WHERE vbeln = lt_vbeln-vbeln.

ENDIF.

" Mise à jour des données avec les valeurs récupérées LOOP AT lt_data ASSIGNING <fs_data>.

" Chercher AUART depuis VBAK
READ TABLE lt_vbak INTO DATA(ls_vbak) WITH KEY vbeln = <fs_data>-vbeln.
IF sy-subrc = 0.
  <fs_data>-auart = ls_vbak-auart.
ENDIF.

" Chercher RFSTA depuis VBUP
READ TABLE lt_vbup INTO DATA(ls_vbup) WITH KEY vbeln = <fs_data>-vbeln.
IF sy-subrc = 0.
  <fs_data>-rfsta = ls_vbup-rfsta.
ENDIF.

ENDLOOP.

" Transférer les données mises à jour dans la table d'extraction c_t_data[] = lt_data[].

ENDFORM.

ZERDANEH2 avatar Mar 05 '25 09:03 ZERDANEH2

Est-il possible de corriger ce code svp ?

ZERDANEH2 avatar Mar 05 '25 09:03 ZERDANEH2

CLA assistant check
Thank you for your submission! We really appreciate it. Like many open source projects, we ask that you sign our Contributor License Agreement before we can accept your contribution.


Ruthiel Trevisan seems not to be a GitHub user. You need a GitHub account to be able to sign the CLA. If you have already a GitHub account, please add the email address used for this commit to your account.
You have signed the CLA already but the status is still pending? Let us recheck it.

cla-assistant[bot] avatar Apr 24 '25 14:04 cla-assistant[bot]