MACRO 00250000 ISTDNIB 00300000 ISTDNIB DSECT CL64 LENGTH = 64 BYTES 02100000 ORG ISTDNIB 02150000 NIBST EQU * 02160055 NIBID DS CL1 NIB IDENTIFIER 02200000 NIBRSV01 DS CL1 RESERVED 02250000 NIBCONDN DS CL1 CONDN 02300000 NIBLEN DS CL1 NIB LENGTH 02350000 NIBCID DS CL4 COMMUNICATION ID 02400000 NIBUSER DS CL4 USER DATA AREA 02450000 NIBSYM DS CL8 SYMBOLIC NODE NAME 02500000 NIBMODE DS CL8 MODE NAME FOR SKEL DVT 02550000 NIBDEVCH EQU * AREA FOR DEVICE CHARACTERISTICS 02600000 ISTDVCHR DSECT=NO 02650000 NIBPROCD EQU * NIB PROCESSING OPTIONS 02700000 ISTDPROC DSECT=NO 02750000 NIBFLGS DS BL1 FLAGS 02800000 ORG NIBFLGS 02850000 NIBFLG1 DS BL1 FLAGS 1 02900000 NIBLAST EQU X'80' 1=NOT LAST NIB 02950000 NIBCON EQU X'40' 1=NODE CONNECTED 03000000 NIBSDAPP EQU X'20' SDT / APPL=1,VTAM=0 03050000 NIBSHLTP EQU X'10' DESTINATION IS REQUIRED BY ANOTHER APPLICATION 03100000 NIBRSV02 EQU X'08' RESERVED 03150000 NIBRSV03 EQU X'04' RESERVED 03200000 NIBRSV04 EQU X'02' RESERVED 03250000 NIBRSV05 EQU X'01' RESERVED 03300000 NIBRSV06 DS CL1 RESERVED 03350000 NIBLIMIT DS FL2 RESPLIM VALUE 03400000 NIBEXLST DS AL4 EXIT LIST ADDRESS 03450000 NIBLMODE DS CL8 LOGON MODE 03460066 NIBNDAR DS A POINTER TO BIND SESSION PARAMETERS 03470055 NIBRESV DS XL4 RESERVED 03480055 NIBEND EQU * 03490055 NIBIDD EQU X'D0' NIBID EQUATE 03500000 NIBLNIB EQU (NIBEND-NIBST) LENGTH OF NIB 03510055 MEND 03550000