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