ާņVAX-11 Bliss-32 V4.1-74614-Apr-1986 09:57:12T 0 p Ą ( ` ø š 8 ą  4 € “  $|Č(čpŲ,døTŲģŒŲP|üdč”@T‚œ8|ģ’d|˜@X“,`tØ(T˜°0„Äœ\¼Ō € t!¬!`""#|#ø#$P$€$°$ą$l%Ų%,&T&œ&Ō&'€'(L(t(ų(D)Ģ)D*œ*<+¼+,€,Ų,X-š-l./ø/0T0141T1č12ä2Œ3š3Ä4č4$5|5¼56Ą6€7Ō7ģ7T8č8t9ģ9P: ;;Ø;Ō;€<==ą=t>?(?P?h??¼?č?@Œ@ @ ō@@AxA˜AB-hBĄB$C¤C,DĢDpEĄEšETF$GpGčGH¤HÄHNICE_C_NODE_NEXTNODE@€ BRH$L_RESERVED @NICE_M_TEST_TYPE @ BSA$S_LABEL @ BSA$S_USERNAME @ĘNICE_C_NODE_MAXLINKS " MDL__MACRO @›NICE_K_NODE_LOOPNODE @&BSA$K_TOTFILES @NICE_C_READ_COUNTERS @ŃNICE_K_NODE_DELAYWGT@€ BBH$B_STRUCVER @KBSA$K_VERLIMIT @šNICE_K_NODE_LOOPHELP @SITESPEC_M_INVISIBLE @ BBH$M_NOCRC @BSA$S_FILEPROT @ŸNICE_K_NODE_MAXBRDRT @ķ’’’NICE_C_RET_MIRDISCON @ž’’’NICE_C_STRING_ACTIVE @>NICE_K_NODE_NEXTNODE @5BSA$K_REVISION ŠMDL_END @’’’’NICE_C_RET_UNRECFUNC@STRUCT_SAVE_LKSB_LOCKID @YNICE_C_NODE_DELAY @ĘNICE_K_NODE_MAXLINKS@€NICE_V_TEST_TYPE@€BJL$B_STRUCLEV @NFB$C_SHOW_ALL @BSA$S_TOTFILES @ū’’’NICE_C_STRING_SIGNIF @NICE_K_READ_COUNTERS @3 BSA$K_UCHAR @ NICE_C_OS_VMS @ś’’’NICE_C_RET_UNRECPARM @€NICE_M_ITEM_CODED@€ BRH$L_FLAGS @BSA$S_VERLIMIT @NICE_C_ERROR_MIRRORUNRECOBJECT @HBSA$K_DIR_FPRO@€SITESPEC_V_INVISIBLE@€, BBH$V_NOCRC @ķ’’’NICE_K_RET_MIRDISCON @ž’’’NICE_K_STRING_ACTIVE@€BJL$B_STRUCVER @BSA$S_REVISION b›MDL_BIT @˜NICE_C_NODE_LOOPWITH @’’’’NICE_K_RET_UNRECFUNC @@NICE_M_ITEM_IMAGE 0{%FSCHECK @+BSA$K_STRUCLEV@€NICE_B_OBJECT_FMT @ŽNICE_C_NODE_ROUTIMER @YNICE_K_NODE_DELAY @ KEY_C_XOFF@€ BBH$W_STRUCLEV @BJL$K_STRUCLEV @NFB$C_SHOW_ONE @’NICE_C_NODE_OUTTIMER @ NICE_C_OS_RSX @ū’’’NICE_K_STRING_SIGNIF @ BSA$S_UCHAR @ NICE_K_OS_VMS @ś’’’NICE_K_RET_UNRECPARM @BSA$K_VOLOWNER @NICE_K_ERROR_MIRRORUNRECOBJECT@€ NICE_R_ALTER_DATA@€NICE_V_ITEM_CODED @BSA$S_DIR_FPRO ‘ MDL_STRUCT ;| $$KEY_ENTRY @ NFB$_ERR_P1 @NICE_C_ENTITY_MODULE @NICE_C_NODE_STATE_ON @¾STR$K_CLASS_DB @ NFB$_ERR_P2 @}NICE_C_NODE_SOFTTYPE @˜NICE_K_NODE_LOOPWITH DŠu RTL_PSECTS @BSA$S_STRUCLEV @ NFB$_ERR_P3 @NICE_C_DTYPE_SDEC @ŽNICE_K_NODE_ROUTIMER@€NICE_V_ITEM_IMAGE@€Ü BBH$B_RTYPE @ KEY_K_XOFF@€ LKSB_W_STATUS @ NFB$_ERR_P4 @’’’’NICE_C_AREA_KNOWN @ž’’’NICE_C_RET_INVMSGFMT @ē’’’NICE_C_RET_OPFAIL@€ IOSB_W_STATUS @NICE_C_DTYPE_UDEC @™NICE_C_NODE_LOOPASSTPHYADDR @NICE_C_NODE_STATE @’NICE_K_NODE_OUTTIMER @ NICE_K_OS_RSX @ NFB$_ERR_DB @BSA$K_BACKFILES @BSA$S_VOLOWNER@€BSA$W_STRUCLEV@€BJL$W_STRUCLEV @NICE_C_ERROR_MIRRORREJECTED @NICE_K_ENTITY_MODULE @NICE_K_NODE_STATE_ON @}NICE_K_NODE_SOFTTYPE ¬ MDL___BITS @ NFB$M_NOUPD @NICE_K_DTYPE_SDEC @NBSA$K_NUM_ATRS @’’’’NICE_K_AREA_KNOWN @ž’’’NICE_K_RET_INVMSGFMT @ē’’’NICE_K_RET_OPFAIL @NICE_K_DTYPE_UDEC @™NICE_K_NODE_LOOPASSTPHYADDR @NICE_K_NODE_STATE @NICE_M_LDT_METHOD @BSA$S_BACKFILES@€NICE_W_RET_DETAIL @dNICE_C_NODE_ID @’’’’NICE_C_NODE_KNOWN @ę’’’NICE_C_RET_NOSYSFUNC @NICE_K_ERROR_MIRRORREJECTED@€Ž BBH$W_RSIZE@€NICE_B_ITEM_DTYPE @BBH$S_RESERVED2@€čBBH$T_RESERVED2 } MDL___SIZE@€ NFB$V_NOUPD @€NICE_M_ALTER_PERM @ BSA$K_NVOLS @NFB$C_GETLOCNAM @NICE_C_RQ_TRIGGER @SITESPEC_M_INFORM Ų| __ITM_ITEM @!NFB$C_FC_DELETE@€NICE_V_LDT_METHOD@€ NICE_B_AREA @NFB$C_GETNODNAM @SITESPEC_M_ULOGIN \ MDL___UNIT @NFB$C_READEVENT @dNICE_K_NODE_ID @’’’’NICE_K_NODE_KNOWN @ę’’’NICE_K_RET_NOSYSFUNC @NFB$C_GETLINNAM µ| __ITM_INIT @NFB$C_UPDOBJECT@€NICE_B_STRING_FMT l|_ITMLST @FBSA$K_PLACEMENT @ BSA$S_NVOLS @NICE_C_RQ_READ @NICE_K_RQ_TRIGGER @0NICE_M_ITEM_DTYPE@€NICE_V_ALTER_PERM @NICE_M_ITEM_BYTES @€NICE_M_TEST_ACTRL@€SITESPEC_V_INFORM @œNICE_C_NODE_LOOPASSTNODE @NICE_C_OS_COMSERV@€( BBH$L_BLOCKSIZE @ŅNICE_C_NODE_INACTIMER @?NICE_M_ITEM_COUNT @ BSA$K_OPSYS @ NFB$C_GETLOCSTA @NICE_C_ERROR_FILE_PERMDB @NICE_C_RQ_LOAD@€SITESPEC_V_ULOGIN @ BBH$K_LEVEL1@€ BRH$W_RSIZE @DBSA$K_BOOTBLOCK @NFB$C_GETLNBYND @ NFB$C_GETLOCCTR @ NFB$C_GETLOGLNK @NFB$C_GETNDBYLN @@NICE_M_ITEM_MULTI@€ BBH$W_OPSYS @ NFB$C_CLRLOCCTR @NFB$C_ENDOFLIST @ģ’’’NICE_C_RET_NOROOM @BSA$S_PLACEMENT œ— MDL__DEFINE @NICE_K_RQ_READ @BSA$K_PLC_PLACE @NFB$C_GETLINSTA @oNICE_C_NODE_SRVPW@€NICE_V_ITEM_DTYPE ńœSTRUCT_SAVED_1 @NFB$C_GETLINCTR @NFB$C_GETNAMNUM @NFB$C_GETNUMNAM @ż’’’NICE_C_RET_NOPRIV @œNICE_K_NODE_LOOPASSTNODE @NICE_K_OS_COMSERV@€NICE_V_ITEM_BYTES@€NICE_V_TEST_ACTRL @½STR$K_CLASS_XT @NFB$C_CLRLINCTR @ŅNICE_K_NODE_INACTIMER@€ BRH$W_RTYPE @ BSA$K_BLOCKSIZE @ BSA$S_OPSYS@€NICE_B_SYSSPEC_OS @NICE_K_ERROR_FILE_PERMDB @NICE_K_RQ_LOAD@€NICE_V_ITEM_COUNT @LBSA$K_RETAINMIN @BSA$S_BOOTBLOCK @NICE_C_ERROR_MIRRORRESOURCE @NICE_C_RQ_SYSSPEC @ģ’’’NICE_K_RET_NOROOM@€NICE_V_ITEM_MULTI @MBSA$K_RETAINMAX@€NICE_B_RET_STATUS@€NICE_B_RQ_OPTIONS @NICE_C_ERROR_MIRROREXECSHUT @ NFB$C_SETLOCSTA @ NICE_C_ERROR_MIRRORNODESHUT @ BJL$K_LEVEL1 @BSA$S_PLC_PLACE @ NFB$C_DELETE @oNICE_K_NODE_SRVPW @BSA$K_OWNERNAME @ż’’’NICE_K_RET_NOPRIV @<BSA$K_CYLINDERS @NFB$C_UPDREMOTE @BSA$S_BLOCKSIZE @ NFB$C_DB_XD5 @BSA$S_RETAINMIN @NFB$C_SETLINSTA @ BBH$C_LENGTH @)BSA$K_SERIALNUM @ž’’’NICE_C_AREA_ACTIVE @NICE_K_ERROR_MIRRORRESOURCE @NICE_K_RQ_SYSSPEC @(BSA$K_MAXFILNUM @BSA$S_RETAINMAX @ NFB$C_DB_EFI @NICE_K_ERROR_MIRROREXECSHUT @ NFB$C_DB_XD9 @NFB$C_OP_FNDMIN @ NICE_K_ERROR_MIRRORNODESHUT @ NICE_C_ERROR_MIRRORDISCONNECTED @ BSA$S_OWNERNAME @NFB$C_OP_FNDMAX @NICE_C_RQ_DUMP @BSA$S_CYLINDERS @6NICE_C_NODE_CIRCUITRO @BSA$K_PLC_PLLBN@€ LKSB_L_LKID @ BBH$C_COMMON @BJL$K_DIRECTORY@€BSA$W_PLC_HILBN @ NFB$C_DB_OBI @ NICE_C_NODE_COUNTIMER @ BBH$K_LENGTH @BSA$S_SERIALNUM @ NFB$C_DB_NDI @%NFB$C_FC_ZERCOU @ė’’’NICE_C_RET_MIRCONNECT @ž’’’NICE_K_AREA_ACTIVE @BSA$K_VOLSETNAM @BSA$S_MAXFILNUM @ BSA$C_LENGTH ØyCHECK@€ BBH$W_APPLIC @@ BSA$K_DEVNAM@€ ITEM_W_CODE @ NFB$C_DB_CRI @ NICE_K_ERROR_MIRRORDISCONNECTED Ģ‹ MDL_RESTORE @NICE_C_NODE_STATE_OFF @NICE_K_RQ_DUMP @BRH$M_DIRECTORY @ NFB$C_DB_XS5 @NICE_C_AREA_NUMBER @ž’’’NICE_C_NODE_ACTIVE @6NICE_K_NODE_CIRCUITRO @ BSA$S_PLC_PLLBN @ NFB$C_DB_ESI @ NFB$C_DB_LLI @NICE_C_RQ_TEST @NICE_C_RQ_ZERO @ BBH$K_COMMON @NICE_C_ENTITY_LOGGING @ NICE_K_NODE_COUNTIMER@€ BBH$L_NUMBER @ BRH$C_LENGTH @? BSA$K_SERIAL @ NFB$C_DB_LNI @ˆNICE_C_NODE_DUMPCOUNT @ė’’’NICE_K_RET_MIRCONNECT @ BSA$S_VOLSETNAM@€BSA$W_PLC_LOLBN @ NFB$C_DB_XS9 @ū’’’NICE_C_NODE_SIGNIF@€NICE_W_RANGE_BEGIN@€ā BBH$W_MAXREC @ BSA$K_LENGTH @ NFB$C_DB_PLI @ NFB$C_DB_XDI @@ BSA$S_DEVNAM @ NFB$C_DB_MAX @NICE_C_OS_TOPS @NICE_S_OBJECT_NAME @NICE_K_NODE_STATE_OFF @@NICE_M_ALTER_CLEAR@€NICE_T_OBJECT_NAME @ BBH$S_SSNAME @ NFB$C_DB_XGI @ NFB$C_GETVER @NICE_K_AREA_NUMBER @ž’’’NICE_K_NODE_ACTIVE@€0 BBH$T_SSNAME@€BRH$V_DIRECTORY @% NFB$C_FC_MAX @š’’’NICE_C_RET_INVPARMVAL @NICE_K_RQ_TEST @NICE_K_RQ_ZERO @BSA$K_PLC_COUNT @ BSA$K_SSNAME@€BSA$W_FID_COUNT ‹MDL_SAVE @NICE_K_ENTITY_LOGGING@€ BJL$W_VOLNUMBER @ BRH$K_LENGTH @! BSA$K_EXTEND @; BSA$K_TRACKS@€ BSA$L_PLC_COUNT @ BSA$S_SERIAL @ˆNICE_K_NODE_DUMPCOUNT @BJL$C_STRUC_LEN @ BJL$K_SSNAME @ BSA$K_FORMAT @œNICE_C_NODE_MAXVISITS @NICE_C_OS_RSTS @ū’’’NICE_K_NODE_SIGNIF @NICE_C_ERROR_FILE_VOLATILEDB @~NICE_C_NODE_SOFTID @sNICE_C_NODE_SRVNODVER @NICE_C_ENTITY_CIRCUIT @NICE_K_OS_TOPS @ NFB$C_DB_XNI @# NFB$C_FC_SET @ NICE_C_ERROR_MIRRORENTFAILED @NICE_C_LDT_BY_CIRCUIT @NICE_C_READ_EVENTS @å’’’NICE_C_RET_INVPARMGRP DYvDESCR@€NICE_V_ALTER_CLEAR @š’’’NICE_K_RET_INVPARMVAL@€$ BBH$L_CRC @ BBH$S_DID @BSA$S_PLC_COUNT @ BSA$S_SSNAME @ī’’’NICE_C_RET_FILEERR @ü’’’NICE_C_RET_MSGTOOLONG @ BSA$S_EXTEND @ BSA$S_TRACKS @ BBH$S_FID @BJL$K_STRUC_LEN @ BJL$S_SSNAME @ BSA$S_FORMAT @NICE_C_ENTITY_AREA @œNICE_K_NODE_MAXVISITS @NICE_K_OS_RSTS @NICE_M_ITEM_BITMAP@€ BJL$T_SSNAME @ KEY_C_FF @ NFB$C_DB_XTI @NICE_K_ERROR_FILE_VOLATILEDB @~NICE_K_NODE_SOFTID @sNICE_K_NODE_SRVNODVER@€V BBH$W_DID @, BSA$K_FID @NICE_C_RET_PARTIAL @NICE_K_ENTITY_CIRCUIT@€ NFB$B_FCT @NICE_C_DTYPE_OCTAL @õ’’’NICE_C_RET_WRONGSTATE @ NICE_K_ERROR_MIRRORENTFAILED @NICE_K_LDT_BY_CIRCUIT @NICE_K_READ_EVENTS @å’’’NICE_K_RET_INVPARMGRP@€P BBH$W_FID D&s_DATA @BSA$K_VOLSTRUCT ż™MDL__BIT D„p_CODE @ö’’’NICE_C_RET_LINEERR @ī’’’NICE_K_RET_FILEERR @ü’’’NICE_K_RET_MSGTOOLONG @ BSA$K_WINDOW @KEY_C_EM @ KEY_C_LF @ BRH$K_FID @ū’’’NICE_C_RET_MGMTBUG @NICE_K_ENTITY_AREA @ BJL$K_VOLUME @ KEY_K_FF @ NFB$C_OP_NEQ @ NFB$_ERR_FCT@€NICE_B_AREA_FMT @NICE_C_NODE_STATE_RESTRICTED@€ NICE_V_ITEM_BITMAP @ BSA$S_FID@€ ITEM_W_SIZE @KEY_C_BS @ KEY_C_CR @pNICE_C_NODE_SRVDEV @NICE_C_READ_STATUS @NICE_K_RET_PARTIAL@€NICE_W_ITEM_BITMAP @> BSA$K_DEVTYP @NICE_K_DTYPE_OCTAL @õ’’’NICE_K_RET_WRONGSTATE @ NFB$C_DB_XTT @ BRH$K_VOLUME @BSA$S_VOLSTRUCT @NICE_C_ENTITY_NODE @NICE_M_READ_ENTITY z%CHECK @KEY_C_FS @NICE_C_LDT_BY_NODE @¼NICE_C_NODE_NSPVER @NICE_C_RET_SUCCESS @ö’’’NICE_K_RET_LINEERR @ BSA$S_WINDOW @KEY_C_GS @KEY_K_EM @ KEY_K_LF @NICE_C_ENTITY_LINE @ŒNICE_C_NODE_HOSTRO @/ BSA$K_UIC @KEY_C_RI @ NFB$C_OP_EQU @ó’’’NICE_C_RET_OPENERR @ū’’’NICE_K_RET_MGMTBUG @ BRH$K_LBN @ KEY_C_HT @KEY_C_SI @NICE_K_NODE_STATE_RESTRICTED@€" BBH$W_VOLNUM @žKEY_C_PM @KEY_K_BS @ KEY_K_CR@€NICE_B_RQ_FUNCTION @NICE_C_ERROR_MIRRORUNRECNODE @pNICE_K_NODE_SRVDEV @NICE_K_READ_STATUS @ BSA$S_DEVTYP @ NFB$C_SET @NICE_C_ERROR_MIRRORINVOBJECT @*NICE_C_NODE_TYPERO @ NFB$C_DB_XXX @NICE_K_ENTITY_NODE šy_QUAD @KEY_K_FS@€NICE_B_NODE_FMT @NICE_K_LDT_BY_NODE @¼NICE_K_NODE_NSPVER @NICE_K_RET_SUCCESS@€NICE_V_READ_ENTITY üœ_LKSB @KEY_C_SO @KEY_K_GS @NICE_K_ENTITY_LINE @ŒNICE_K_NODE_HOSTRO@€ NICE_R_LDT_DATA ֜_IOSB @ BRH$M_BADDATA @ BSA$S_UIC @ KEY_C_SP @KEY_K_RI @qNICE_C_NODE_CPU @ó’’’NICE_K_RET_OPENERR @•KEY_C_MW @ KEY_K_HT @KEY_K_SI @ NFB$M_KNO@€ BBH$W_SUBSYS @KEY_C_RS @žKEY_K_PM @ NFB$C_DECLOBJ @ NFB$M_UPD @NICE_K_ERROR_MIRRORUNRECNODE @ BRH$K_VBN @9 BSA$K_BAKDATE @ BSA$K_SYSVER @€’’’NICE_C_RET_DONE @NICE_K_ERROR_MIRRORINVOBJECT @*NICE_K_NODE_TYPERO @œKEY_C_ST @ BSA$K_SIR @KEY_C_US@€ NICE_R_RET_DATA @ KEY_C_VT @KEY_K_SO @ KEY_K_SP @qNICE_K_NODE_CPU@€ BRH$V_BADDATA @•KEY_K_MW @KEY_K_RS@€ NFB$V_KNO @ BSA$S_BAKDATE @ BSA$S_SYSVER@€ NFB$V_UPD @¢NICE_C_NODE_MAXBUFFERS @€’’’NICE_K_RET_DONE @œKEY_K_ST @ BSA$K_RVN @ BSA$S_SIR @KEY_K_US @NICE_C_RQ_ALTER @6 BSA$K_CREDATE @ KEY_K_VT @¤NICE_C_NODE_SEGBUFSIZE @ LKSB_C_FIXED @NICE_C_ERROR_FILE_DIAG @ƒNICE_C_NODE_SECNDRYDMP @yNICE_C_NODE_SECNDRYLDR @NICE_C_NODE_STATE_UNREACHABLE @é’’’NICE_C_RET_PARMVALTOOLONG @2 BSA$K_ACLEVEL  ” MDL_FIELD @ NFB$C_COLLATE @¢NICE_K_NODE_MAXBUFFERS @ BSA$K_BACKVER @ BSA$S_RVN @ KEY_C_DC1 @NICE_K_RQ_ALTER @(BJL$C_SSNAME_LEN @ BSA$K_COMMAND @ KEY_C_DC2 @NICE_C_RET_ACCEPTED@€ BJL$Q_CREDATE @ BSA$S_CREDATE @ KEY_C_DC3 @NICE_C_NODE_MAXAREA @¤NICE_K_NODE_SEGBUFSIZE @ KEY_C_DC4 @ LKSB_K_FIXED @ä’’’NICE_C_RET_BADLOOPRESP @č’’’NICE_C_RET_HARDFAIL @NICE_K_ERROR_FILE_DIAG @ BJL$S_CREDATE f˜ MDL_CONSTANT @˜NICE_C_NODE_MAXADDR @ƒNICE_K_NODE_SECNDRYDMP @NICE_M_ZERO_ENTITY@€ NICE_R_ITEM_CTR £’ MDL_ALIGN @NICE_C_ERROR_MIRRORNONODE @yNICE_K_NODE_SECNDRYLDR @NICE_K_NODE_STATE_UNREACHABLE @é’’’NICE_K_RET_PARMVALTOOLONG @ BSA$S_ACLEVEL … MDL__LITERAL @NICE_C_ERROR_FILE_LOAD@€Ż BBH$B_RATTRIB@€NICE_W_ITEM_FMT @ BSA$S_BACKVER @ KEY_K_DC1 @NICE_C_NODE_SUBADDR@€ NICE_R_STRING_TEXT@€į BBH$B_VFCSIZE @(BJL$K_SSNAME_LEN @ BSA$K_DRIVEID @ BSA$S_COMMAND @ KEY_K_DC2 @öNICE_C_NODE_ADDRESS @ņ’’’NICE_C_RET_INVFILECONT @NICE_K_RET_ACCEPTED @ KEY_K_DC3 @™NICE_C_NODE_MAXCIRC @NICE_K_NODE_MAXAREA@€ą BBH$B_BKTSIZEVpBBLOCK @ KEY_K_DC4 @ä’’’NICE_K_RET_BADLOOPRESP @č’’’NICE_K_RET_HARDFAIL @O BJL$S_DIRNAME @˜NICE_K_NODE_MAXADDR@€ BJL$T_DIRNAME @8 BSA$K_EXPDATE @7 BSA$K_REVDATE @NICE_K_ERROR_MIRRORNONODE@€NICE_V_ZERO_ENTITY @NICE_K_ERROR_FILE_LOAD@€ BRH$L_ADDRESS @ BSA$K_BUFFERS @JBSA$K_DIR_VERLIM @ NICE_C_NODE_PHYADDR ĘySCHECK @NICE_K_NODE_SUBADDR  _LKVALBLK @ BSA$K_VOLCHAR @ BSA$K_VOLDATE @ BSA$S_DRIVEID @öNICE_K_NODE_ADDRESS @ņ’’’NICE_K_RET_INVFILECONT@€[ BBH$B_DID_NMX @BJL$C_VOLUME_LEN @ć’’’NICE_C_RET_MISSINGPARM @™NICE_K_NODE_MAXCIRC @ BSA$K_PLC_FID@€U BBH$B_FID_NMX @ BSA$K_VOLNAME@€Z BBH$B_DID_RVN@€ BJL$B_DATA @ BSA$K_COMMENT @ BSA$S_EXPDATE @ BSA$S_REVDATE @” KEY_C_CCH @õNICE_C_NODE_CIRCUIT @ NICE_C_OS_CT @ź’’’NICE_C_RET_PARMNOTAPPL@€T BBH$B_FID_RVN @4 BSA$K_RECATTR @ BSA$S_BUFFERS @BSA$S_DIR_VERLIM @ KEY_C_ACK @NICE_C_READ_CHAR @ NICE_K_NODE_PHYADDR @O BJL$C_DIR_LEN @ BSA$S_VOLCHAR @ BSA$S_VOLDATE @ NICE_C_ERROR_MIRRORNORESP @BJL$K_VOLUME_LEN @ KEY_C_CAN @ć’’’NICE_K_RET_MISSINGPARM @ BSA$S_PLC_FID @ KEY_C_BEL @£NICE_C_NODE_BUFSIZE @žNICE_C_NODE_INTIMER @E BSA$K_BOOTVBN @ BSA$S_VOLNAME @Ÿ KEY_C_APC @NICE_C_ERROR_FILE_DUMP @—NICE_C_NODE_LOOPLEN@€X BBH$W_DID_SEQ@€ BSA$L_PLC_LBN @ BSA$S_COMMENT @ KEY_C_DEL @ KEY_C_DLE@€NICE_W_NODE_ADDRESS @ BJL$S_VOLNAME@€ BSA$B_FID_NMX @— KEY_C_EPA @‘ KEY_C_PU1 @” KEY_K_CCH @NICE_C_NODE_ADDR @õNICE_K_NODE_CIRCUIT @ NICE_K_OS_CT @ź’’’NICE_K_RET_PARMNOTAPPL@€R BBH$W_FID_SEQ@€ BJL$T_VOLNAME @ BSA$S_RECATTR @’ KEY_C_PU2 @ KEY_C_TAB @ KEY_K_ACK @ NFB$_ERR_CELL @nNICE_C_NODE_SRVCIRC @NICE_K_READ_CHAR @ BSA$K_DATE @Ž KEY_C_SS2 @O BJL$K_DIR_LEN@€ BSA$B_FID_RVN @G BSA$K_DIR_UIC @ BSA$K_RECPROT @‡ KEY_C_ESA @ KEY_C_SS3 @ NICE_K_ERROR_MIRRORNORESP | $$KEY_INIT @ BSA$K_USERUIC @ KEY_C_DCS @ KEY_C_NAK @ KEY_K_CAN @–NICE_C_NODE_LOOPCNT @šNICE_C_NODE_MAXCOST @ų’’’NICE_C_RET_UNRECENTITY@€ NICE_R_READ_DATA @ BSA$K_PROTECT @ KEY_C_ESC @ KEY_C_ETB @„ KEY_C_IND @ KEY_K_BEL @" NFB$C_FC_SHOW @NICE_C_ITEM_BIT8 @›NICE_C_NODE_MAXHOPS @ł’’’NICE_C_RET_INCOMPAT @£NICE_K_NODE_BUFSIZE @žNICE_K_NODE_INTIMER@€V BBH$W_DID_NUM @ BJL$K_FILE @" BSA$K_CLUSTER @IBSA$K_DIR_STATUS @ BSA$S_BOOTVBN@€ IOSB_L_DEVDEPEND @Ÿ KEY_K_APC @ōNICE_C_NODE_NAME @zNICE_C_NODE_TERTLDR @NICE_K_ERROR_FILE_DUMP @—NICE_K_NODE_LOOPLEN †y _QUADWORD @: BSA$K_SECTORS @ KEY_K_DEL @ KEY_K_DLE 7 MDL__MASK @eNICE_C_NODE_MGMTVER @ NICE_C_OS_RT@€P BBH$W_FID_NUM @— KEY_K_EPA @‘ KEY_K_PU1 @ NFB$C_CHG_SRV @NICE_K_NODE_ADDR @› KEY_C_CSI @… KEY_C_NEL @’ KEY_K_PU2 @ KEY_K_TAB @NICE_C_NODE_STATE_SHUT @NICE_C_READ_SUMMARY @nNICE_K_NODE_SRVCIRC @ BRH$K_FILE @ BSA$S_DATE @‹ KEY_C_PLD @Ž KEY_K_SS2 @ BSA$S_DIR_UIC @ BSA$S_RECPROT@€ BSA$W_FID_SEQ@€ IOSB_W_COUNT @‡ KEY_K_ESA @ KEY_K_SS3@€Z BBH$W_DID_RVN @ BSA$S_USERUIC @ KEY_K_DCS @ KEY_K_NAK @–NICE_K_NODE_LOOPCNT @šNICE_K_NODE_MAXCOST @ų’’’NICE_K_RET_UNRECENTITY @ BSA$S_PROTECT @ KEY_K_ESC @ KEY_K_ETB @„ KEY_K_IND @NICE_K_ITEM_BIT8 @›NICE_K_NODE_MAXHOPS @ł’’’NICE_K_RET_INCOMPAT@€T BBH$W_FID_RVN @ BSA$S_CLUSTER @BSA$S_DIR_STATUS @ KEY_C_ENQ @– KEY_C_SPA @ōNICE_K_NODE_NAME @zNICE_K_NODE_TERTLDR @ BSA$S_SECTORS @ KEY_C_OSC @eNICE_K_NODE_MGMTVER @ NICE_K_OS_RT @$ BSA$K_VOLSIZE @‰ KEY_C_HTJ@€NFB$B_DATABASE @NICE_M_NODE_NAME @† KEY_C_SSA @› KEY_K_CSI @… KEY_K_NEL@€ NFB$B_OPER @ NFB$_ERR_SRCH @NICE_K_NODE_STATE_SHUT @NICE_K_READ_SUMMARY @pNICE_M_READ_INFO &pSETIPL@€ BSA$W_FID_NUM @ KEY_C_EOT @‹ KEY_K_PLD @ń’’’NICE_C_RET_RESOURCE @NICE_C_TEST_CIRCUIT@€ NICE_R_SYSSPEC_DATA @ŠNICE_C_NODE_DELAYFACTOR Ē{ $KEY_TABLE @ KEY_C_SOH @ KEY_C_SUB @€NICE_M_NODE_EXEC @NFB$C_DECLNAME žz%SCHECK @BBSA$K_BADBLOCK @% BSA$K_TOTSIZE @ KEY_K_ENQ @– KEY_K_SPA@€ NICE_B_OBJECT @NICE_S_NODE_NAME @ KEY_K_OSC @ NFB$_ERR_OPER@€NICE_T_NODE_NAME@€NICE_W_RANGE_END@€ BJL$B_SIZE @ BRH$K_SUMMARY @ BSA$K_LRU_LIM @ BSA$K_XORSIZE @ BSA$S_VOLSIZE@€ BSA$W_FID_RVN p INTERNAL_CALL @‰ KEY_K_HTJ @€NICE_M_ITEM_COUNTER @ˆ KEY_C_HTS @ KEY_C_NUL @† KEY_K_SSA @€NICE_M_READ_PERM@€NICE_V_NODE_NAME @ KEY_K_EOT @NICE_C_ERROR_FILE_LOAD2 @{NICE_C_NODE_DIAGFILE @ń’’’NICE_K_RET_RESOURCE @NICE_K_TEST_CIRCUIT@€NICE_V_READ_INFO @0 BSA$K_FPRO @ KEY_C_ETX @Œ KEY_C_PLU @NICE_C_ERROR_FILE_LOAD3 @ŠNICE_K_NODE_DELAYFACTOR @ KEY_K_SOH @ KEY_K_SUB @ NFB$C_OP_GTRU @„NICE_C_NODE_ROUTVER @ļ’’’NICE_C_RET_PROTOCOL @`NICE_M_ITEM_CTRSIZE وMDL__ERASE_SAVED @ NFB$C_SHOW @ NICE_C_NODE_AREAMAXCOST@€NICE_V_NODE_EXEC @BSA$S_BADBLOCK @ BSA$S_TOTSIZE p EXTERNAL_CALL @ NICE_C_ERROR_MIRROROBJECTBUSY @”NICE_C_NODE_AREAMAXHOPS @4NICE_C_NODE_COST @NICE_M_ALTER_ENTITY @ STR$K_CLASS_B@€ BJL$B_TYPE @ BRH$K_PHYSVOL @ KEY_C_XON @ü’’’NICE_C_NODE_ADJACENT @5NICE_C_NODE_HOPS @ż’’’NICE_C_NODE_LOOP @ BSA$S_LRU_LIM @ BSA$S_XORSIZE @ STR$K_CLASS_D@€ BBH$W_SIZE @ˆ KEY_K_HTS @ KEY_K_NUL @ NFB$C_OP_LSSU@€NICE_V_ITEM_COUNTER @XNICE_C_NODE_ACTIVELINKS @ÓNICE_C_NODE_RETRANSFACT @NICE_K_ERROR_FILE_LOAD2 @{NICE_K_NODE_DIAGFILE@€NICE_V_READ_PERM @ STR$K_CLASS_F @€BBH$S_FILENAME @-BSA$K_BACKLINK @ BSA$S_FPRO @ KEY_K_ETX @Œ KEY_K_PLU @NICE_C_NODE_HOST @’’’’NICE_C_STRING_KNOWN @NICE_K_ERROR_FILE_LOAD3@€\BBH$T_FILENAME@€ BSA$W_PLC_PTR @“ KEY_C_STS @ KEY_C_SYN @÷’’’NICE_C_RET_INVID @„NICE_K_NODE_ROUTVER @ļ’’’NICE_K_RET_PROTOCOL @ BRH$K_NULL @*BSA$K_FILENAME @NICE_C_ERROR_MIRRORABORTED @xNICE_C_NODE_LOADFILE @NICE_C_TEST_NODE @ NICE_K_NODE_AREAMAXCOST @€NICE_M_ZERO_READ@€ NICE_V_ITEM_CTRSIZE @NFB$C_WILDCARD @ NICE_K_ERROR_MIRROROBJECTBUSY @”NICE_K_NODE_AREAMAXHOPS @4NICE_K_NODE_COST @1 BSA$K_RPRO @Š KEY_C_VTS @ KEY_K_XON @…NICE_C_NODE_TYPE @NICE_C_TEST_LINE @ü’’’NICE_K_NODE_ADJACENT @5NICE_K_NODE_HOPS @ż’’’NICE_K_NODE_LOOP@€NICE_V_ALTER_ENTITY@€ NICE_R_TEST_DATA @ KEY_C_STX @ LKSB_C_VALBLK @NICE_C_DTYPE_HEX @XNICE_K_NODE_ACTIVELINKS @ÓNICE_K_NODE_RETRANSFACT @ BSA$K_NODENAME @BSA$S_BACKLINK@€ BSA$W_SIZE @$NFB$C_FC_CLEAR @NICE_K_NODE_HOST @’’’’NICE_K_STRING_KNOWN @“ KEY_K_STS @ KEY_K_SYN@€ LKSB_L_LOCKID @÷’’’NICE_K_RET_INVID @€BSA$S_FILENAME @NFB$C_DISCLINK @NICE_K_ERROR_MIRRORABORTED @xNICE_K_NODE_LOADFILE @NICE_K_TEST_NODE@€ NICE_R_ITEM_PARM @ NFB$_ERR_STRT@€NICE_V_ZERO_READ @€BJL$S_FILENAME @ BSA$S_RPRO @Š KEY_K_VTS @ LKSB_C_LENGTH @NICE_C_ERROR_MIRRORTHIRDPARTY @…NICE_K_NODE_TYPE @NICE_K_TEST_LINE@€BJL$T_FILENAME @BSA$K_BACKSIZE @ IOSB_C_LENGTH @NICE_C_ERROR_FILE_DUMP2 @ KEY_K_STX @ LKSB_K_VALBLK@€ BSA$W_TYPE @ ITEM_C_LENGTH @NICE_C_ITEM_BIT32 @NICE_K_DTYPE_HEX @ BSA$S_NODENAME@€ ITEM_L_BUFFER @NICE_C_ITEM_BIT16 @NICE_C_NODE_BRDROUTIMER @žNICE_C_NODE_MAXBRDNONRT @=BSA$K_MAXBLOCK @rNICE_C_NODE_HDWRADDR@€ä BBH$L_FILESIZE @‡NICE_C_NODE_DUMPADDR @ STR$K_CLASS_Z ėyFSCHECK @ LKSB_K_LENGTH @NICE_C_ERROR_MIRRORINVNODE @NICE_C_READ_CHARACTERISTICS @NICE_K_ERROR_MIRRORTHIRDPARTY @CBSA$K_INDEXLBN @BSA$S_BACKSIZE @ IOSB_K_LENGTH@€ LKSB_R_VALBLK @ NFB$C_P2STRLNG @ NFB$C_READ_CLR @NICE_K_ERROR_FILE_DUMP2@€žBBH$W_CHECKSUM @ LKSB_S_VALBLK ć}$DVILST  }$JPILST @ ITEM_K_LENGTH @NICE_K_ITEM_BIT32 @’NICE_M_ITEM_TYPE @‚NICE_C_NODE_DUMPFILE @€BJL$C_FILE_LEN @NICE_C_NODE_STATE_REACHABLE @NICE_K_ITEM_BIT16 @NICE_K_NODE_BRDROUTIMER @žNICE_K_NODE_MAXBRDNONRT @'BSA$K_MAXFILES @BSA$S_MAXBLOCK @rNICE_K_NODE_HDWRADDR ™ MDL_LENGTH @NICE_C_ERROR_MIRRORUNREACHABLE @‡NICE_K_NODE_DUMPADDR @.BSA$K_FILESIZE ry DESCRIPTOR @NICE_C_OBJECT_NUMBER @NICE_K_ERROR_MIRRORINVNODE @NICE_K_READ_CHARACTERISTICS ( WORD_RELATIVE) (GENERAL) gMTPR;MTPR(%REF( ),PR$_IPL);>?(+)<,,>>Y%NAME(_, ,_CODE)(READ,NOWRITE,EXECUTE,SHARE,PIC, CONCATENATE, (GENERAL),\(%IF %IDENTICAL(%STRING( ),BYTE)%THEN%ELSE%IF %IDENTICAL(%STRING( ),WORD)%THEN%ELSE%IF %IDENTICAL(%STRING( ),LONG)%THEN%ELSE%IF %IDENTICAL(%STRING( ),LONGWORD)%THEN%ELSE%IF %IDENTICAL(%STRING( ),QUAD)%THEN%ELSE%IF %IDENTICAL(%STRING( ),QUADWORD)%THEN%ELSE%IF %IDENTICAL(%STRING( ),PAGE)%THEN %ELSE %FI%FI%FI%FI%FI%FI%FI))FACILITYLIB ALIGNMENT`Y%NAME(_, ,_DATA)(READ,WRITE, NOEXECUTE,NOSHARE,PIC, CONCATENATE, ( LONG_RELATIVE),\(%IF %IDENTICAL(%STRING( ),BYTE)%THEN%ELSE%IF %IDENTICAL(%STRING( ),WORD)%THEN%ELSE%IF %IDENTICAL(%STRING( ),LONG)%THEN%ELSE%IF %IDENTICAL(%STRING( ),LONGWORD)%THEN%ELSE%IF %IDENTICAL(%STRING( ),QUAD)%THEN%ELSE%IF %IDENTICAL(%STRING( ),QUADWORD)%THEN%ELSE%IF %IDENTICAL(%STRING( ),PAGE)%THEN %ELSE %FI%FI%FI%FI%FI%FI%FI))FACILITYLIB ALIGNMENT`TCODE=_CODE(FACILITY= ),V=_CODE(FACILITY= ),1=_DATA(FACILITY= ),2=_DATA(FACILITY= )FACILITYLIB\BLOCK[,`]r([ DSC$W_LENGTH]= ,[ DSC$B_CLASS]=%IF %IDENTICAL(%STRING( ),DYNAMIC)%THEN DSC$K_CLASS_D%ELSE%IF %IDENTICAL(%STRING( ),FIXED)%THEN DSC$K_CLASS_S%ELSE%IF %IDENTICAL(%STRING( ),UNKNOWN)%THEN DSC$K_CLASS_Z%ELSE%IF %IDENTICAL(%STRING( ),ARRAY)%THEN DSC$K_CLASS_A%ELSE %FI%FI%FI%FI,[ DSC$B_DTYPE]=%IF %IDENTICAL(%STRING( ),UNKNOWN)%THEN DSC$K_DTYPE_Z%ELSE%IF %IDENTICAL(%STRING( ),STRING)%THEN DSC$K_DTYPE_T%ELSE%IF %IDENTICAL(%STRING( ), BITSTRING)%THEN DSC$K_DTYPE_V%ELSE %FI%FI%FI,[ DSC$A_POINTER]= )LENGTHCLASSUNKNOWNDTYPEUNKNOWNBUFFERBLOCK[,`]BLOCK[,`] _QUADWORD.STATUSB.STATUS.STATUSSIGNAL(.STATUS).STATUS SIGNAL_STOP(.STATUS)8 ___STATUS:s; ___STATUS=%IF%NULL( )%THEN.STATUS%ELSE( )%FI;. ___STATUSB. ___STATUS;. ___STATUS;8 ___STATUS:s; ___STATUS=%IF%NULL( )%THEN.STATUS%ELSE( )%FI;. ___STATUSSIGNAL(. ___STATUS);. ___STATUS;8 ___STATUS:s; ___STATUS=%IF%NULL( )%THEN.STATUS%ELSE( )%FI;. ___STATUS SIGNAL_STOP(. ___STATUS);. ___STATUS; j((*%LENGTH) $$KEY_INIT( , %REMAINING)) $$KEY_ENTRY(%REMOVE( )) $$KEY_INIT( %REMAINING) ,j(%ASCIC%STRING( )), %REMAINING BLOCK[*%LENGTH,s]_( __ITM_INIT( , %REMAINING),) __ITM_ITEM( ,%REMOVE( ))n( ,%NAME(%STRING( ), )),s( , ) %IF%NULL( %REMAINING)%THEN_ITMLST(JPI$_, )%ELSE_ITMLST(JPI$_, , %REMAINING)%FI %IF%NULL( %REMAINING)%THEN_ITMLST(MNT$_, )%ELSE_ITMLST(MNT$_, , %REMAINING)%FI %IF %DECLARED(DVILST$K_SECONDARY)%THEN%IF%NULL( %REMAINING)%THEN_ITMLST(DVI$C_SECONDARY OR DVI$_, )%ELSE_ITMLST(DVI$C_SECONDARY OR DVI$_, , %REMAINING)%FI%ELSE%IF%NULL( %REMAINING)%THEN_ITMLST(DVI$_, )%ELSE_ITMLST(DVI$_, , %REMAINING)%FI%FI9 = , , , % &%NAME( STRUCT_NAME,_M_, STRUCT_PREFIX, )=^ -^ ;& = ;ö%IF %DECLARED( STRUCT_BYTE)%THENG STRUCT_BYTE=,STRUCT_SUBBYTE=, STRUCT_BIT=,STRUCT_BITWIDTH=, STRUCT_NEXT_K=, STRUCT_INCR_K=,STRUCT_SCRATCH=, STRUCT_MASK=, STRUCT_SAVED=;& STRUCT_K_R=, STRUCT_K_B=, STRUCT_K_T=, STRUCT_K_W=, STRUCT_K_=, STRUCT_K_L=, STRUCT_K_A=, STRUCT_K_G=, STRUCT_K_Q=, STRUCT_SIZE_B=, STRUCT_SIZE_R= , STRUCT_SIZE_T=, STRUCT_SIZE_W=, STRUCT_SIZE_= , STRUCT_SIZE_L= , STRUCT_SIZE_A= , STRUCT_SIZE_G= , STRUCT_SIZE_Q=;%ELSE%ASSIGN( STRUCT_BYTE,)%ASSIGN(STRUCT_SUBBYTE,)%ASSIGN( STRUCT_BIT,)%ASSIGN( STRUCT_NEXT_K,)%ASSIGN( STRUCT_INCR_K,)%ASSIGN(STRUCT_SCRATCH,)%ASSIGN( STRUCT_MASK,)%ASSIGN( STRUCT_SAVED,)%FI%IF %DECLARED(%QUOTE STRUCT_NAME)%THENA%QUOTE STRUCT_NAME;%FI9%QUOTE STRUCT_NAME=%STRING( )%;%IF %DECLARED(%QUOTE STRUCT_PREFIX)%THENA%QUOTE STRUCT_PREFIX;%FI9%QUOTE STRUCT_PREFIX=%;%IF %DECLARED(%QUOTE MDL__PARM1)%THENA%QUOTE MDL__PARM1;%FI9%QUOTE MDL__PARM1(P1,P2)=P1%;%IF %DECLARED(%QUOTE MDL__PARM2)%THENA%QUOTE MDL__PARM2;%FI9%QUOTE MDL__PARM2(P1,P2)=P2%;%IF %DECLARED(%QUOTE MDL__PARMN)%THENA%QUOTE MDL__PARMN;%FI9%QUOTE MDL__PARMN(P1,P2)= %REMAINING%;%IF %DECLARED(%QUOTE MDL__NULL1)%THENA%QUOTE MDL__NULL1;%FI9%QUOTE MDL__NULL1(P1,P2)=%NULL(P1)%;%IF %DECLARED(%QUOTE MDL__NULL2)%THENA%QUOTE MDL__NULL2;%FI9%QUOTE MDL__NULL2(P1,P2)=%NULL(P2)%;%IF %DECLARED(%QUOTE MDL__NULLN)%THENA%QUOTE MDL__NULLN;%FI9%QUOTE MDL__NULLN(P1,P2)=%NULL( %REMAINING)%;%IF %DECLARED(%QUOTE MDL__CLEANUP)%THENA%QUOTE MDL__CLEANUP;%FI9 MDL__CLEANUP=%QUOTEMDL__ERASE_SAVED() STRUCT_BYTE,STRUCT_SUBBYTE, STRUCT_BIT,STRUCT_BITWIDTH, STRUCT_NEXT_K, STRUCT_INCR_K,STRUCT_SCRATCH, STRUCT_MASK, STRUCT_SAVED, STRUCT_K_R, STRUCT_K_B, STRUCT_K_T, STRUCT_K_W, STRUCT_K_, STRUCT_K_L, STRUCT_K_A, STRUCT_K_G, STRUCT_K_Q, STRUCT_SIZE_B, STRUCT_SIZE_R, STRUCT_SIZE_T, STRUCT_SIZE_W, STRUCT_SIZE_, STRUCT_SIZE_L, STRUCT_SIZE_A, STRUCT_SIZE_G, STRUCT_SIZE_Q%%IF ! STRUCT_SAVED%THEN %QUOTENAME( STRUCT_SAVE_, STRUCT_NAME,_,%NAME( STRUCT_SAVED_, )), %QUOTENAME( STRUCT_SAVED_, ),%FI%IF   STRUCT_SAVED%THEN%ASSIGN(STRUCT_SCRATCH, +)MDL__ERASE_SAVED(%NUMBER(STRUCT_SCRATCH))%FI%IF %DECLARED( STRUCT_BYTE)%THENA MDL__CLEANUP,%QUOTE STRUCT_NAME,%QUOTE MDL__PARM1,%QUOTE MDL__PARM2,%QUOTE MDL__PARMN,%QUOTE MDL__NULL1,%QUOTE MDL__NULL2,%QUOTE MDL__NULLN,%QUOTE STRUCT_PREFIX,%QUOTE MDL__CLEANUP;%FIG%NAME( STRUCT_SAVE_, STRUCT_NAME,_, )= STRUCT_BYTE;%ASSIGN( STRUCT_SAVED, STRUCT_SAVED+)9%NAME( STRUCT_SAVED_,%NUMBER( STRUCT_SAVED))= %&%IF %DECLARED(%NAME( STRUCT_SAVE_, STRUCT_NAME,_, ))%THEN%ERROR(No saved position named , ,!)%ELSE%ASSIGN( STRUCT_BYTE,%NAME( STRUCT_SAVE_, STRUCT_NAME,_, ))%ASSIGN(STRUCT_SUBBYTE, STRUCT_BYTE)%ASSIGN( STRUCT_NEXT_K,)%ASSIGN( STRUCT_INCR_K,)%ASSIGN( STRUCT_MASK,)%ASSIGN( STRUCT_BIT,)%FI MDL__PARM1(%EXPLODE( ))P%IF MDL___UNIT( )"B%THEN%ELSE%IF MDL___UNIT( )"T%THEN%ELSE%IF MDL___UNIT( )"W%THEN%ELSE%IF MDL___UNIT( )"L%THEN%ELSE%IF MDL___UNIT( )"A%THEN%ELSE%IF MDL___UNIT( )"G%THEN%ELSE%IF%NULL( )%THEN%ELSE%IF MDL___UNIT( )"Q%THEN%ELSE%IF MDL___UNIT( )"P%THEN%ELSE%FI%FI%FI%FI%FI%FI%FI%FI%FIp%IF%STRING( MDL__PARM1(%EXPLODE( )))"B%THEN%ELSE%IF%STRING( MDL__PARM1(%EXPLODE( )))"T%THEN%ELSE%IF%STRING( MDL__PARM1(%EXPLODE( )))"W%THEN%ELSE%IF%STRING( MDL__PARM1(%EXPLODE( )))"L%THEN %ELSE%IF%STRING( MDL__PARM1(%EXPLODE( )))"A%THEN %ELSE%IF%STRING( MDL__PARM1(%EXPLODE( )))"R%THEN %ELSE%IF%STRING( MDL__PARM1(%EXPLODE( )))"G%THEN %ELSE%IF%NULL( )%THEN %ELSE%IF%STRING( MDL__PARM1(%EXPLODE( )))"Q%THEN%ELSE%FI%FI%FI%FI%FI%FI%FI%FI%FI,G MDL___BYTES=;%ASSIGN( MDL___BYTES, MDL___SIZE( ))%IF MDL___BYTES#%THEN%ASSIGN( MDL___BYTES,((( STRUCT_BYTE+ MDL___BYTES-)/ MDL___BYTES)* MDL___BYTES))%IF MDL___BYTES#%THEN%ASSIGN( MDL___BYTES,( MDL___BYTES- STRUCT_BYTE)) MDL_FIELD(,B,%NUMBER( MDL___BYTES))%FI%FIA MDL___BYTES;}%IF%NULL( )%THEN MDL__MACRO(%NAME( STRUCT_NAME,_,%IF%NULL( )%THENL%ELSE %FI,_, ),%NUMBER( STRUCT_BYTE),,%NUMBER(%NAME( STRUCT_SIZE_, )),%IF%NULL( %REMAINING)%THEN%ELSE%FI)%FI%ASSIGN(STRUCT_SUBBYTE, STRUCT_BYTE)%ASSIGN(STRUCT_BITWIDTH,%NAME( STRUCT_SIZE_, ))%ASSIGN( STRUCT_BYTE, STRUCT_BYTE+%IF%NULL( )%THEN%ELSE %FI*%NAME( STRUCT_K_, ))%ASSIGN(STRUCT_SCRATCH,( STRUCT_BYTE-STRUCT_SUBBYTE))%IF %IDENTICAL( ,R)( %IDENTICAL(%NUMBER( ),))%THEN%ASSIGN(STRUCT_SCRATCH,%NUMBER( ))%FI%IF(%NULL( ))(( %IDENTICAL(%NUMBER( ),)) %IDENTICAL( ,T) %IDENTICAL( ,Q))%THEN;&%NAME( STRUCT_NAME,_S_, )=%NUMBER(STRUCT_SCRATCH)%FI%ASSIGN( STRUCT_BIT,)%NAME( STRUCT_NAME,_K_, , )=%IF%NULL( )%THEN STRUCT_NEXT_K%ELSE %FI,%NAME( STRUCT_NAME,_C_, , )=%IF%NULL( )%THEN STRUCT_NEXT_K%ELSE %FI'%IF%COUNT"%THEN%ASSIGN( STRUCT_NEXT_K,%IF%NULL( )%THEN%ELSE %FI)%FI& MDL__DEFINE( ,%REMOVE( ))%ASSIGN( STRUCT_NEXT_K,%IF MDL__NULL2 %THEN STRUCT_NEXT_K%ELSE MDL__PARM2 %FI+%IF%NULL( )%THEN%ELSE %FI) MDL_CONSTANT(,,,(%IF%NULL( )%THENLENGTH%ELSE %FI,%NUMBER( STRUCT_BYTE)))0%IF%NULL( )%THEN MDL__MACRO(%NAME( STRUCT_NAME,_V_, , ),%NUMBER(STRUCT_SUBBYTE),%NUMBER( STRUCT_BIT),%NUMBER(%IF%NULL( )%THEN%ELSE %FI),)%IF%NULL( %REMAINING)%THEN;&%NAME( STRUCT_NAME,_M_, , )=^%NUMBER(STRUCT_SCRATCH)-^%NUMBER( STRUCT_BIT)%FI%FI&%IF STRUCT_BIT+%NUMBER( MDL__PARM2 )$STRUCT_BITWIDTH%THEN %ERRORMACRO(Bit field exceeds ,STRUCT_BITWIDTH, -bit boundary)%FI%ASSIGN(STRUCT_SCRATCH, STRUCT_BIT+%IF MDL__NULL2 %THEN%ELSE MDL__PARM2 %FI)MDL__BIT( ,%REMOVE( )%IF%NULL( )%THEN, %FI)%ASSIGN( STRUCT_BIT,STRUCT_SCRATCH)BBLOCK[ IOSB_K_LENGTH]LOCKIDBBLOCK[ LKSB_K_LENGTH]BBLOCK[ LKSB_K_VALBLK]