Liste les tous locks d’un job AS/400 en cours.
Syntaxe
bResult = ASJobrecordLocks(ASJobRecordLockCollection, Travail, Utilisateur, Numéro du travail, Connexion)
Paramètres
bResult
Booléen - Vrai si la commande a réussi, Faux en cas d'erreur.
ASJobRecordLockCollection
Variable de type ASJobRecordLockCollection qui va contenir les résultats
Travail
Nom du travail
Utilisateur
Nom d'un utilisateur spécifique
Numéro du travail
Un numéro spécifique de travail
Connexion
Connexion - nom de la connexion
Exemple
lockList est une ASJobRecordLockCollection
nbLock est un entier
monLock est un ASJobRecordLock
AsJobRecordLocks(lockList,jb.Job_name,jb.Job_user_name,jb.Job_number,PrinciConnexion)
nbLock = lockList.CollectionASJobRecordLock..Occurrence
POUR i =1 A nbLock
monLock = lockList.CollectionASJobRecordLock[i]
TableauAjoute(gtabAsJobRecordLock,monLock)
FIN