[ABAP] Prochain jour ouvrable d'après une date [Résolu]

[Frooty]

Bonjour,

Je suis à la recherche d'un module fonction qui donne le xèime jour ouvrable après ou avant une date.
Avant de me lancer dans l'écriture de ma propre fonction, j'aurais aimé savoir si vous en connaissiez une.

Merci d'avance.
Frooty

[cladsam]

essaye de regarder vers le FM

DATE_CONVERT_TO_FACTORYDATE

ca permet de tester si une date est une date travaillée ( pas plus de précision pour le moment as eu le temps de checker )

[Frooty]

Un de mes collègues a trouvé la fonction standard qui permet de faire cela : FKK_ADD_WORKINGDAY.

On lui passe la date de départ, un nombre de jours ouvrables à ajouter/enlever, le nom du calendrier d'entreprise et elle restitue la date correspondante.

[cladsam]

Envoyé par Frooty

Un de mes collègues a trouvé la fonction standard qui permet de faire cela : FKK_ADD_WORKINGDAY.

On lui passe la date de départ, un nombre de jours ouvrables à ajouter/enlever, le nom du calendrier d'entreprise et elle restitue la date correspondante.

Cette question étant intéressante, peux-tu mettre un morceau de code AVEC le passage de paramètres (utile pour la potentielle constitution future d'une FAQ Abap)

Merci

[Frooty]

Bien sur, pas de problème

Voici un petit programme qui demande une date en paramètre et qui affiche deux dates en sortie :
- Date - 15 jours ouvrables,
- Date + 20 jours ouvrables.
Le nombre de jours ouvrables est calculé par rapport au calendrier de mon entreprise "SI", vous devez prendre celui de votre entreprise.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
* Déclarations
  DATA : gv_moins_15_jours TYPE sy-datum,
         gv_plus_20_jours  TYPE sy-datum,
         gv_return         TYPE sy-subrc.

* Paramètre de sélection
  PARAMETERS : p_date  LIKE  sy-datum.

* Traitement de la date - 15 jours
  CLEAR gv_moins_15_jours.
  CALL FUNCTION 'FKK_ADD_WORKINGDAY'
    EXPORTING
      i_date            = p_date
      i_days            = '15-'
      i_calendar1       = 'SI'
*     I_CALENDAR2       =
    IMPORTING
      e_date            = gv_moins_15_jours
      e_return          = gv_return.

  IF lv_return = 0.
    WRITE: /'Date passée : ',  gv_moins_15_jours.
  ENDIF.

* Traitement de la date + 20 jours
  CLEAR gv_plus_20_jours.
  CALL FUNCTION 'FKK_ADD_WORKINGDAY'
    EXPORTING
      i_date            = p_date
      i_days            = '20'
      i_calendar1       = 'SI'
*     I_CALENDAR2       =
    IMPORTING
      e_date            = gv_plus_20_jours
      e_return          = gv_return.

  IF lv_return = 0.
    WRITE: /'Date future : ',  gv_plus_20_jours.
  ENDIF.

Très bonne journée,
Frooty.