 Related Questions 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 ... Partial list: REMARKS, NOMINAL KEY, PAGE-COUNTER, CURRENT-DAY, TIME-OF-DAY, STATE, FLOW, COUNT, EXAMINE, EXHIBIT, READY TRACE and RESET TRACE. Explain the difference between an internal and an external sort, the pros and cons, internal sort syntax etc? An external sort is not COBOL; it is performed through JCL and PGM=SORT. It is understandable without any code reference. An internal sort can use two different syntaxes: 1.) USING, GIVING sorts are Comp is a binary usage, while comp-3 indicates packed decimal. The other common usages are binary and display. Display is the default. 3/28/00 Dave Herrmann: 'I was reading your FAQ on Cobol, as Latest Answer : Binary representation of data item are called 'comp', while comp-3 is the packed decimal.comp-1 & comp-2 are another usage. ... 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. What is the default value(s) for an INITIALIZE and what keyword allows for an override of the default? INITIALIZE moves spaces to alphabetic fields and zeros to alphanumeric fields. The REPLACING option can be used to override these defaults.
Sponsored Links
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
