PreviousNext
Help > Développement > Fonctions W-Langage pour AS/400 > Fonctions Output Queues/Remote Output Queues/Writers(Editeurs) > ASWriterEnd >
Exemple

 

gTest est un ASOutputQueueCollection

 

nResSelectedQ est un entier  = TableSelect(TABLE_CollectionASOutputQueue)

nResSelectedWtr est un entier  = TableSelect(TABLE_CollectionASWriter)

 

aswtr est un ASWriterDetailed = gTest[nResSelectedQ].WriterCollection[nResSelectedWtr]

 

//SI PAS ASWriterEnd(aswtr, MaConnexion1, ASCntld) ALORS

//SI PAS ASWriterEnd(aswtr, MaConnexion1) ALORS 

//SI PAS ASWriterEnd(aswtr, MaConnexion1, ASPageEnd) ALORS

SI PAS ASWriterEnd(aswtr, MaConnexion1, ASImmed) ALORS

       Info(ErreurInfo(errComplet))

FIN