STOP RUN, EXIT PROGRAM , GO BACK, NEXT STATEMENT AND CONTINUE STATEMENT.

-
STOP RUN:
It’s the last executable statement of the main program. It returns control back to OS. 
EXIT PROGRAM
It’s the last executable statement of sub-program. It returns control back to main program.
GO BACK
It can be coded in main program as well as sub-program as the last statement. It just gives the control back from where it received the control. 

NEXT Statement
It transfers control to next sentiment after the nearest period.
Example
IF A3 = B3
   IF A1 = B1
     NEXT STATEMENT
        IF A2 = B2
        ELSE
        DISPLAY “NO CONDITION “
        END-IF
    END-IF
END-IF.
     DISPLAY “NEXT STATEMENT
In above example first “IF” is true then it check 2nd “IF” is true then it come out from IF loop and display the DISPLAY STATEMENT. Else it check for 3rd “IF” statement.




CONTINUE Statement
It’s like dummy statement, transfer control after END scope terminator.
IF A1 = B1
  CONTINUE STATEMENT
     IF A2 = B2
     ELSE
         DISPLAY “NO CONDITION “
     END-IF
        DISPLAY “CONTINUE STATEMENT”
END-IF.

In above if first “IF” statement is true then it display the DISPLAY STATEMENT else it’ll check for 2nd IF statement.



    


Comments

Post a Comment

Popular posts from this blog

COBOL + DB2 complication process.

-
Image
There are various step involved before we run/execute a COBOL + DB2 program.   Below step are the various steps.   Precompile.   Compile.   Link edit.   Bind.   Package & plan. Step 1: Precompile               COBOL compiler did not understand about SQL statement so, it undergoes to precompile. In precompile.     Expands all include copybooks which are written in program.     Extracts all SQL statements into DBRM and SQL statement are convert into call statements.    Generates time-stamp for modified source codes and DBRM .there are checked at run time.   Check syndicated error of SQL statements and validates the fields based on the table declaration from dclgen copybook.    Notes: precompilation process can be executed even if DB2 is down. DSNHPC    ----------- It is the program used for precompilation. Step 2:  ...
Read more

ABEND list for 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

difference between jes2 and jes3

-
JES2 JES3       1.        Decentralization.       2.        Every processor the incoming job individually.       3.        It is prestep allocation.       4.        Dataset allowed before step is executed.       5.        It is a local process.       6.        Control statement (//*). 1. Centralization. 2. It control process and assign job to sub processor. 3. It is prejob allocation. 4. Dataset allowed before job is schedule. 5. It is global process. 6. Control statement (/*).
Read more