| Cevela about COBOL | COBOL language - Home - Site Map - About Cevela - MX COBOL <prev next> |
60-1
program-id.
Prog-1.
working-storage section.
1 Dat-2 data-spec*
..
procedure division.
..
call "Prog-4" using Dat-2 ...
|
60-1
call DatX-1 using
LitX-1
params-spec*
/ [reference] Dat-2
/ content [length of] Dat-3
...
[returning Dat-4]
[exception
imperative-statements-5*]
[not exception
imperative-statements-6*]
end-of-statement*
end-call
.
|
60-1
cancel DatX-1 ...
LitX-1
|
MX-1
entry DatX-1 [using Dat-2 ...]
|
60-1
exit
|
02-2
exit program
method
function
perform
paragraph
section
|
02-1
goback
|
02-1
invoke Datx-1 DatX-2 using
LitX-2
params-spec*
reference Dat-3
content
value
...
[returning Dat-4]
|