PreviousNext
Help > Development > W-Language Functions for AS/400 > DataQueue functions > ASDataQueueReceive > Example with the new syntax
Example with the new syntax


FIFO Dataqueue

 

sdq_pcml est chaîne =[

       <pcml version="4.0">

       <program name="TESTDQ" >

       <data name="data" type="char" length="50" usage="input"/>

       </program>

       </pcml>

]

 

 

data est chaîne sur 50

 

asdq est une ASDataQueue

asdq.description            = sdq_pcml

asdq.library                = "EASYCOMXMP"

asdq.name                   = "DTAQ_FIFO"

asdq.timeout                = 0

asdq.remove                 = true

 

 

SI PAS ASLitDataQueue(asdq, data) ALORS

       Info(ErreurInfo(errComplet))

SINON

       Info(data)

FIN

 

See Example.