FB 101 continued:
0037 :L FY 249 Receiving capacity = number
0038 :L FY 243 of reserved
0039 :><F memory fields ?
003A :JC = EMPT
003B :
003C RECV :L KB 246 SF OB:
003D
:JU OB 204 "Receive a data field"
003E :L FY 248
003F :JM =OBER Abort if error/warning
0040 :L FY 249 if receiving capacity = 0
0041 :L KB 0 process next
0042 :><F link
0043 :JC =RECV
0044 :
0045 EMPT :L FY 242 Increment
0046 :I 1 link counter
0047 :T FY 242
0048 :L KB 4 All links
0049 :<F processed ?
004A :JM = SRCH
004B :L KB 0 Regular program end:
004C :T =ERWA RLO = 0, ERWA = 0
004D :BEU
004E :
004F ERWA :L KB 16 Program end if error:
0050 OBER :T =ERWA RLO = 1, ERWA contains
0051 :BE error/warning number
Applications
CPU 948 Programming Guide
10 - 76 C79000-G8576-C848-04