Data update
This commit is contained in:
parent
5150844a7d
commit
4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
|
|
@ -1,18 +0,0 @@
|
|||
identification division.
|
||||
program-id. sample.
|
||||
|
||||
data division.
|
||||
working-storage section.
|
||||
01 progname pic x(16).
|
||||
|
||||
procedure division.
|
||||
sample-main.
|
||||
|
||||
display 0 upon argument-number
|
||||
accept progname from argument-value
|
||||
display "argument-value zero :" progname ":"
|
||||
|
||||
display "function module-id :" function module-id ":"
|
||||
|
||||
goback.
|
||||
end program sample.
|
||||
Loading…
Add table
Add a link
Reference in a new issue