E' stato implementato una nuova funzione che restituisce un progressivo giornaliero, vale a dire un progressivo che ogni giorno ricomincia da 1.
Se si arriva al termine dei progressivi disponibili nella giornata, la variabile ritornerà zero, e questo va gestito da programma secondo i casi
(esempio: se ho una dimensione di 3 cifre, la funzione ritornerà da 001 a 999, e poi zero per indicare il termine dei progressivi disponibili nel giorno).
L'eventuale termine del progressivo giornaliero viene tracciato in EDTALG.
Per usarlo, occorre creare una variabile di sistema secondo la nomenclatura:
*EDDAYPRddnnnnnnnnnn
dove
dd = dimensione del progressivo (max 15 cifre)
nnnnnnnnnn = nome del progressivo (max 10 caratteri)
La funzione da agganciare è EDSYDPR (proc=ED_UTIL7), e va riportata anche dal cliente dove si installa il programma che usa questo nuovo progressivo giornaliero.
Esempio di variabile:
Il funzionamento si basa su una data area, che su AS/400 viene creata in modo automatico.