.MACRO ONCDEF OFFSET ; ; 24 MAY 79 - RECORD AND BUFFER LENGTHS CHANGED BY BONNIE KAPLAN ; 5 DEC 80 CHANGED OLD VERSION TO MATCH VALUES USED BY ONCDBR ; ; RECORD AND BUFFER LENGTHS MUST BE EVEN NUMBERS ; BUFFER LENGTH SHOULD BE MAXIMUM RECORD LENGTH ; $R.LN1 = 254. ;LENGTH OF LEVEL 1 BUFFER $R.LN2 = 250. ;LENGTH OF LEVEL 2 BUFFER $R.LN3 = 250. ;LENGTH OF LEVEL 3 BUFFER $R.BLN = 254. ;LENGTH OF SCRATCH BUFFER ; DEFINE FLAGS $RF.CD = 1 ;CONTEXT DEFINED $RF.LK = 2 ;RECORD LOCKED .MCALL DEF$I OFFSET DEF$I 0 OFFSET $R.FCN,2 OFFSET $R.LV1,$R.LN1 OFFSET $R.L1F,2 OFFSET $R.L1R,4 ; WAS 6 F.B. OFFSET $R.LV2,$R.LN2 OFFSET $R.L2F,2 OFFSET $R.L2R,4 ; WAS 6 F.B. OFFSET $R.LV3,$R.LN3 OFFSET $R.L3F,2 OFFSET $R.L3R,4 ; WAS 6 F.B. OFFSET $R.BUF,$R.BLN ;SCRATCH BUFFER OFFSET $R.S1,2 OFFSET $R.S2,2 OFFSET $R.TI,4 ; OFFSET $R.STS,2 ;COMMENTED OUT F.B. ; FOLLOWING DEFINITION SHOULD ALWAYS BE LAST OFFSET $R.TLN ; DESCRIBE LAYOUT OF SEND BUFFER DEF$I 0 OFFSET $B.RNA,4 OFFSET $B.MIS,4 .ENDM ONCDEF