Help > Development > W-Language Functions for AS/400 > Profile Management > ASUserList > Example

Example

 

profilList is ASUsrPrfCollection

myProfil is ASUsrPrf

nb is integer

 

HOpenConnection(AS400)

ASUserList(profilListe, AS400)

 

nb = profilList.CollectionASUsrPrf..Occurrence

FOR indice= 1 A nb

   myProfil = profilList.CollectionASUsrPrf[indice]

   TableauAjoute(gtabObjet, myProfil)

FIN

TableAffiche(TABLE_GtabObjet)

 

© 2022-2023 Aura Equipements. All rights reserved.