STATIC AND DYNAMIC CALL

  

STATIC CALL

 

DYNAMIC CALL

 

1. Identified by Call literal.

Ex: CALL ‘PGM1’.

 

Identified by Call variable and the variable should be populated at run time.

01 WS-PGM PIC X(08).

Move ‘PGM1’ to WS-PGM

CALL WS-PGM

 

2.Default Compiler option is NODYNAM and so all the literal calls are considered as static calls.

If you want convert the literal calls into DYNAMIC, the program should be compiled with DYNAM option.

By default, call variables and any un-resolved calls are considered as dynamic.

3. If the subprogram undergoes change, sub program and main program need to be recompiled.

 

If the subprogram undergoes change, recompilation of subprogram is enough.

 

4. Sub modules are link edited with main module.

 

Sub modules are picked up during run time from the load library.

 

5. Size of load module will be large

 

Size of load module will be less.

 

6. Fast

 

Slow compared to Static call.

 

7. Less flexible.

 

More flexible.

 

Comments

Post a Comment

Popular posts from this blog

files and db2 abends&cics

  File error codes: 00: Successful operation. 02: Duplicate key, non-unique key, alt index. 10: End of file. 20: Invalid key VSAM KSDS/RRDS. 21: Key errors (rewrite & write). 22: Duplicate primary key found. 23: Record not found. 24: Disk filled or key outside of boundary of file. 37: Wrong mode. 39: File attributes do not match COBOL description. 91: password or authorization failed. 92: logic error. 93: Resources are not available. 95: Invalid file information. 96: No DD statement for the file. 97: Open successful. 98: File is locked. 99: Record locked. -------------------------------------------------------------------------------------------- DB2 Return code. Note: 0: means successful execution. -ve: Negative means unsuccessful with an error. +ve: Positive means successful execution with a warning. 00: Successful operation. -104: illegal symbol using. -117: no of values in the insert does not match the no of columns. -180: wrong data passing to column. -204: Object not defi...
Read more

jcl

  what is ABEND?   An ABEND (abnormal end) is an exception condition which results in the abnormal termination of a program or software. It is a common terminology used in the mainframe world where a JCL terminates with an error code.  S0CB  -   Attempting to divide by 0 and not using ON SIZE ERROR S002  -   Very large record length/ wrong record length Sx22  -  Job has been cancelled. The value of x will vary depending on the way the job was  cancelled. . S222  -   Means job was cancelled by a user or operator without a dump.               If a TSO session times out you will probably get an S522 ABEND code. S222  -   The job was cancelled (by subsystem or operator) because it violated               Some restriction. S522 ...
Read more

cics interview question

  1. What is CICS? CICS stands for Customer Information  1. What is CICS? CICS stands for Customer Information Control System. It's a middleware designed by IBM to support rapid, high-volume online transaction processing. CICS allows multiple users to access the same data concurrently, ensuring data integrity and efficient resource management. 2. Describe the basic differences between batch and online systems. Feature Batch System Online System (CICS) Execution Processes jobs sequentially, no user input Handles real-time user interactions User Interactio n Discover more middleware Middleware IMS DB DB2 IBM Information Management System IBM Db2 SDSF IEFBR14 IDCAMS None during execution Continuous user input/output Response Time Delayed (scheduled ) Discover more DB2 IBM Db2 IMS DB Middleware ...
Read more