The sysLib.purge() system function deletes a CICS® temporary storage queue.
If you call sysLib.purge(), the program runs the CICS ENQ command with the NOSUSPEND option to enqueue on the resource name EZETEMP-queuename. The program runs the CICS DEQ command to dequeue after the temporary storage queue is deleted.
sysLib.purge(queueName CHAR(8) in)
The following code deletes the CICS temporary storage queue associated with the current value of resourceAssociation for record myCustomer:
myQueue CHAR(8); myQueue = myCustomer.resourceAssociation; sysLib.purge(myQueue);