无码精品人妻一区二区三区入口-无码精品人妻一区二区三区夜夜嗨-无码精品人妻一区二区三区颖A片-无码精品日本一区二区桃花岛-无码精品网站-无码精品一

A #Dequeue
JCN exit // 為0時跳轉(zhuǎn)
L #DB_NO //裝載表所在數(shù)據(jù)塊號
T #dbnr
OPN DB 【#dbnr】 //打開裝載數(shù)據(jù)塊

L P#8.0 //初始讀指針
T #Run_Point
L P#0.0 //初始讀指針
T #Standby_Point

L #Run_Point
LAR1
L 16
+AR1
L DBW 【AR1,P#0.0】

next: T #CNTR
L #Run_Point
LAR1
L 16
+AR1
L DBW 【AR1,P#0.0】
L 0
<>I
= #Exit
JCN exit

CALL "FIFO"
TABLE :=DB111.DBW8
RET_VAL:=#data

CALL "ATT"
DATA :=#data
TABLE:=DB111.DBW0


L #CNTR
LOOP next
exit: NOP 1
L #DB_NO
T #dbnr
OPN DB 【#dbnr】