Translations - OPALE - 10.0 - Utilisation

Récupérer en critère d'archivage la date du spool d'origine/11/fr

De MappingDoc
Révision datée du 3 juin 2019 à 15:06 par FuzzyBot (discussion | contributions) (Importation d’une nouvelle version depuis une source externe.)
(diff) ← Version précédente | Voir la version actuelle (diff) | Version suivante → (diff)

IF COND(%SST(&ZONNAM 1 4) *EQ 'DATE') THEN(DO)

     RTVDTAARA DTAARA(QTEMP/DATE (1 10)) RTNVAR(&DATE)
     CHGVAR     VAR(&STRVAL) VALUE(&DATE)             
     CHGVAR     VAR(%BIN(&STRLEN)) VALUE(9)            
     GOTO FIN                                          
     ENDDO