Mainframe COBOL and JCL Fundamentals

INFO-USERID stores the current user-id connected to demand in CICS. INFO-PREVIOUS-PROGRAM-ID tracks the prior program, INFO-PROGRAM-ID stores the program name, and INFO-CONVERSATION indicates mode status.

In COBOL, CONTINUE is a no-op statement that transfers control to the next sequential instruction, while NEXT SENTENCE transfers control to the first statement following the next period, making the statement true.

A COBOL S9(8) COMP (binary) field contains 8 decimal digits. Numeric fields with 5 to 9 digits stored in binary (COMP) format occupy exactly 4 bytes in memory. Other options specify incorrect byte sizes.

DYNAM is the COBOL compiler option used to enable dynamic calling/linking of subprograms. Options like REUS deal with reusability, and LET is a link-editor option, not a COBOL compiler option for dynamic linking.

DD (Data Definition) statements in JCL have two parameter types: Positional parameters (identified by their position) and Keyword parameters (identified by their keyword names like DISP, SPACE, etc.). Keyword/Control, Dynamic/Static, and Named/Dynamic are not the correct classifications.

The NOTIFY parameter in JCL is used to send a completion status message to a specified TSO user when a job finishes. STATUS, ENDMSG, and USER are not valid JCL parameters for this notification purpose.

The DD DUMMY statement in JCL defines a dummy dataset that doesn't require actual space allocation or disposition processing. It's used when you need to satisfy JCL syntax without allocating real DASD space or retaining output datasets.

In JCL, the OUTLIM parameter limits the number of logical records written to a SYSOUT dataset to prevent runaway jobs from consuming excessive spool space. Exceeding this limit causes a system abend (typically S722). Parameters like LIMIT, SIZE, and MAX do not perform this specific JCL function.

In modern COBOL compilers, the OCCURS clause can be specified at the 01 level. Earlier versions of COBOL had this restriction, but it has been lifted. The statement claims it 'cannot' which is false - it can be done.

In packed decimal (COMP-3) format, each digit occupies half a byte (nibble) except for the last nibble which stores the sign. The sign is encoded as C for positive, D for negative, or F for unsigned positive in the last nibble.

In COBOL, the OUTPUT mode opens a new or empty file for writing, replacing any existing content. The EXTEND mode opens a file to write records starting at the end of the existing file (appending). INPUT is read-only, and APPEND is not a valid COBOL OPEN keyword.

The RLSE (release) parameter in JCL is used to return unused space allocation to the system when a dataset is closed. RETURN is not a valid space parameter, CONTIG requests contiguous space, and CLOSE is a statement not a space parameter.

The PEND statement marks the end of an in-stream or catalogued procedure in a JCL job. STREAM is not a JCL statement, SET is used for symbolic parameters, and PROC marks the beginning of a procedure.

A physical JCL record is 80 bytes, but JCL statements can only occupy columns 1 through 71. Column 72 is reserved to signal continuation to the next line, and columns 73 to 80 are reserved for sequence numbers, making 71 bytes the maximum length for actual JCL code.

When a SECTION is performed in COBOL, all paragraphs contained within that section are executed in sequence. This is the fundamental behavior of sections - they group paragraphs together for execution.

The EVALUATE statement in COBOL allows complex conditions in WHEN clauses using AND, OR, and logical operators. The statement claims you 'cannot' give complex conditions, which is false - you absolutely can.

In COBOL, USAGE IS COMP (Computational) specifies binary format storage for numeric variables, which is highly efficient for arithmetic. USAGE IS COMP-3 defines packed decimal format, where each digit is packed into a half-byte (nibble) with the sign in the last nibble.

S9(8) COMP is a 4-byte binary integer that can store values from -2,147,483,648 to 2,147,483,647. In terms of displayable digits, the maximum is 8 digits (99999999). Option A has 7 digits, B has 9 digits, and D is far too large.

When allocating space for output datasets in JCL, three quantity categories are used: Primary (initial allocation), Secondary (extension allocation), and Directory (for PDS datasets). Options B, C, and D represent incorrect combinations.

In COBOL, level 88 is used to define condition names that specify meaningful names for specific values a data item can contain. This allows for more readable and self-documenting code when testing conditions. For example, instead of checking if STATUS = '1', you can define 88 ACTIVE-STATUS VALUE '1' and test IF ACTIVE-STATUS.