Latest Answer: Declare Working storage variable01 DISP-DATE PIC X(16).In procedure Division ... use the following code to move current date to disp-date. This will give you current date, month, day, hh,mm,ss ... MOVE FUNCTION CURRENT-DATE (1:16) TO DISP-DATEThank ...
Latest Answer: The current method supported by most compiles is to use code like the following: MOVE FUNCTION CURRENT-DATE TO SOME-FIELD.This will place the system timestamp in CCYYMMDDHHMMSSmmmmmmm format into SOME-FIELD. ...
In a COBOL II perform statement, when is the conditional tested, before or after the perform execution?
In COBOL II the optional clause WITH TEST BEFORE or WITH TEST AFTER can be added to all perform statements. By default the test is performed before the perform.
The parameters passed in a call by context are protected from modification by the called program. In a normal call they are able to be modified.
Latest Answer: In call by content a copy of variable is passed to the sub program. In case of call by address the address is passed. ...
Wake up - you haven't been paying attention! It's not possible to pass an index via linkage. The index is not part of the calling programs working storage. Those of us who've made this
Latest Answer: We can pass subscript by linkage section. index cant. ...
There are at least five differences: COBOL II supports structured programming by using in line PERFORMs and explicit scope terminators, it introduces new features (EVALUATE, SET .. TO TRUE, CALL .. BY
Latest Answer: The END Delimiter --> END-READ END-PERFORM ...
A scope terminator brackets its preceding verb, eg. IF .. END-IF, so that all statements between the verb and its scope terminator are grouped together. Other common COBOL II verbs are READ, PERFORM, EVALUATE,
Latest Answer: terminators like END-PEROFRM END-EVALUTE are called explicit scope terminaotr available in COBOL 85. ...
The PERFORM and END-PERFORM statements bracket all COBOL II statements between them. The COBOL equivalent is to PERFORM or PERFORM THRU a paragraph. In line PERFORMs work as long as there are no internal
Latest Answer: In In-line PERFORM the procedure name is omitted. An In-line PERFORM must be delimited by the END-PERFORM statement.SYNTAX: PERFORM ...
NEXT SENTENCE gives control to the verb following the next period. CONTINUE gives control to the next verb after the explicit scope terminator. (This is not one of COBOL II's finer implementations).
Latest Answer: Next sentence: The sentence is the collection of statements and is always end with period(.).so next sentence means the control passes to next sentence after period.e.g.: if X=3
Compute X=X-3 Next sentence End-if ...
EVALUATE can be used in place of the nested IF THEN ELSE statements.
Latest Answer: EVALUATE statement contrusts a case structure. The explicit scope terminator for EVALUATE is END-EVALUATE. The various cases can be places between the EVALUATE and END-EVALUATE statements. Example:Here SQLCODE is a built in variable name EVALUATE SQLCODE ...
View page << Previous 11 12 13 14 [15] 16 17 Next >>
Go Top
