FBLOCK | Back to Index page |
Prolog Control Block Contents FBLOCK DSECT Storage Layout Cross Reference (Contains links to field and bit definitions) |
|
FBLOCK Prolog | Top of page |
NAME : FBLOCK DESCRIPTION: EXEC File Execution Control Block DSECT : FBLOCK FUNCTION : FBLOCK contains information used by EXEC2 or REXX/VM to run an exec. A pointer to the FBLOCK is provided in the PLIST when the appropriate interpreter is called to run the exec. FBLOCK is found in FBLOCK macro. NOTES : When an EXEC or XEDIT macro has been loaded into storage via the EXECLOAD command and the EXEC or XEDIT macro is invoked via a CMSCALL on which a FBLOCK is supplied, the high-order bit of the FBLOCK address (Word 4 of the Extended PLIST) must be set on in order for the usage count reported by the EXECMAP command to be incremented. A high-order bit of 1 in the address of the FBLOCK indicates that the EXEC is in storage as a result of an EXECLOAD command. |
FBLOCK Control Block Content | Top of page |
|
FBLOCK Storage Layout | Top of page |
*** FBLOCK - EXEC File Execution Control Block * * +-------------------------------------------------------+ * 0 | FBLNAME | * +-------------------------------------------------------+ * 8 | FBLTYPE | * +-------------+-------------+---------------------------+ * 10 | FBLMODE | FBLEXTL | FBLDLS | * +-------------+-------------+---------------------------+ * 18 | FBLDLE | FBLPREF- | * +---------------------------+---------------------------+ * 20 | -(01C) | FBLENAME- | * +---------------------------+---------------------------+ * 28 | -(024) | FBLSEXIT | * +---------------------------+---------------------------+ * 30 | FBLEUSER | 34 * +---------------------------+ * *** FBLOCK - EXEC File Execution Control Block |
FBLOCK Cross Reference | Top of page |
Symbol Dspl Value -------------- ---- ----- FBLDLE 0018 FBLDLS 0014 FBLENAME 0024 FBLEUSER 0030 FBLEXTL 0012 FBLLEND 0030 00000007 FBLLENL 0030 00000034 FBLLFI 0010 00000012 FBLMODE 0010 FBLNAME 0000 FBLPREF 001C FBLSEXIT 002C FBLTYPE 0008 |
Copyright IBM Corporation, 1990, 2018