FTN WRTQ,WRTQ/-SP=WRTQ
.OPEN WRTQBLD.CMD
.ENABLE DATA
WRTQ,WRTQ/-SP=WRTQ,QUEUE/LB,LB:[1,1]F4POTSFCS/LB
/
ASG=ZQ:1
//
.DISABLE DATA
.CLOSE WRTQBLD.CMD
TKB @WRTQBLD
PIP WRTQ.*/PU
PIP WRTQBLD.CMD;*/DE/NM