Extraire la valeur day-of-week avec RPG seulement
* ===================================================================
* = Description... Retrieve day-of-week
* ===================================================================
H NoMain
D RtvDayOfWeek PR 5I 0
D D Value
P RtvDayOfWeek B Export
D RtvDayOfWeek PI 5I 0
D DateIn D Value
D SomeSunday S D Inz( D'2001-05-20' )
D Days S 10I 0
C DateIn SubDur SomeSunday Days : *D
C Return ( %Rem( %Rem( Days : 7 ) + 7 : 7 ) ) + 1
P RtvDayOfWeek E
Téléchargez cette ressource
SIEM & PME : Comment construire la boîte noire de votre SI ?
Passez à la cybersécurité proactive, transformez la collecte et l’analyse des logs en un bouclier dynamique contre les cybermenaces. Découvrez comment mettre en place une approche SIEM modulaire, évolutive et accessible, pour anticiper, détecter et réagir efficacement aux attaques.