* /* START OF SPECIFICATIONS **** 00050000 * 00100000 *01* MODULE-NAME = CHANGE 00150000 * 00300000 *01* DESCRIPTIVE-NAME = CHANGE 00350000 * 00400000 *01* COPYRIGHT = NONE 00450000 * 00500000 *01* STATUS = RELEASE 1 00550000 * 00600000 *01* FUNCTION = THIS MACRO IS USED TO CHANGE THE PROCESSING OPTIONS, 00650000 * MODE OR USER DATA ASSOCIATED WITH A NODE 00700000 * 00850000 *01* NOTES = A NIB ELEMENT IS USED TO DEFINE THE USER DATA, PROCESSING 00900000 * OPTIONS, AND THE SYMBOLIC NAME TO IDENTIFY THE NODE - THE NIB 00910000 * ELEMENT IS ADDRESSED VIA THE NODE OPERAND OF THE RPL, AND THE 00920000 * MODE VIA THE AREA FIELD, AS FOR OPNDST 00930000 * UPON RETURN FROM THE CHANGE MACRO REG 15 WILL CONTAIN A RETURN 00930500 * CODE AS FOLLOWS: 00950000 * 00986100 * R15 VALUE MEANING 01022400 * 0 REQUEST ACCEPTED OR COMPLETED 01058500 * 4 NOT AN RPL 01094600 * 8 RPL ACTIVE 01130700 * 12 CONTROL BLOCK ERROR 01166800 * 16 LOGICAL ERROR 01202900 * 01239000 *02* CHARACTER-CODE-DEPENDENCIES = NONE 01275100 * 01311200 *02* DEPENDENCIES= THE NODE MUST BE OWNED BY THE APPLICATION,OPENED, 01347300 * AND CONNECTED TO THE ACB ADDRESSED 01383400 * 01419500 *02* RESTRICTIONS = NONE 01455600 * 01491700 *02* RESTRICTIONS = NONE 01527800 * 01547800 *02* REGISTER-CONVENTIONS = NONE 01563900 * 01583900 *02* PATCH-LABEL = NONE 01600000 * 01620000 *01* MODULE-TYPE = MACRO 01700000 * 01710000 *02* PROCESSOR = ASSEM-370R 01720000 * 01740000 *02* MACRO-SIZE = 4 STATEMENTS 01742000 * 01746000 *02* ATTRIBUTES = LIST-EXEC 01748000 * 01748400 *01* ENTRY-POINT = NA 01748800 * 01749200 *01* EXIT-NORMAL = NA 01749600 * 01749700 *01* EXIT-ERROR = NA 01749800 * 01749900 *01* EXTERNAL-REFERENCES = NONE 01766600 * 01866600 *01* TABLES = NONE 01938300 * 01938400 *01* INNER-MACROS = IHBRDWRA 01938600 * 01998600 *01* SYSTEM-MACROS = NONE 02008600 * 02028600 *01* CHANGE-ACTIVITY = AS-FOLLOWS 02058600 * NEW MACRO - FIRST RELEASE 31 DOS/VS 02078600 * 03 OS/VS1 02079400 * 03 OS/VS2 02080200 * 02082600 **** END OF SPECIFICATIONS ***/ 02088600 * 02138600 */* IBM OPERATING SYSTEM 02188600 * VTAM - 5741 - SC - VTM */ 02238600 * 02288600 MACRO 07120000 &NAME CHANGE &RPL=,&ACB=,&ECB=,&EXIT=,&BRANCH=,&CODESEL=, *07140000 &OPTCD=,&AREA=,&AREALEN=,&AAREA=,&AAREALN=,&RECLEN=, *07160000 &ARECLEN=,&NIB= 07180000 .*A-000000-999999 @DL29HLQ 07280000 &NAME IHBRDWRA RPL=&RPL,AREA=&AREA,ECB=&ECB,EXIT=&EXIT, *07500000 OPTCD=&OPTCD,ACB=&ACB,BRANCH=&BRANCH,CODESEL=&CODESEL, *07520000 AREALEN=&AREALEN,RECLEN=&RECLEN,ARECLEN=&ARECLEN, *07540000 AAREA=&AAREA,AAREALN=&AAREALN,NIB=&NIB,IHBRW=25 07560000 MEND 07600000