> Tech > Figure 1A

Figure 1A

Tech - Par iTPro - Publié le 24 juin 2010
email

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

Figure 1A

C DateIn SubDur SomeSunday Days : *D
C Return ( %Rem( %Rem( Days : 7 ) + 7 : 7 ) ) + 1
P RtvDayOfWeek E

Téléchargez gratuitement cette ressource

HP Elite Slice G2 : optimisez la collaboration… et votre budget !

HP Elite Slice G2 : optimisez la collaboration… et votre budget !

Téléchargez cette étude Forrester et découvrez comment booster la collaboration tout en dégageant un excellent R.O.I grâce au système de vidéoconférence HP Elite Slice G2 avec Microsoft Teams !

Tech - Par iTPro - Publié le 24 juin 2010