uplime/WOPO
uplime
/
WOPO
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Update usage statements.

This commit is contained in:
Quinn "heddwch" Evans 2018-09-14 12:56:56 -06:00
parent 70b42e1281
commit 2e2d01697a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
WOPO.COB
View File

@ -1028,7 +1028,7 @@
REWRITE USER-RECORD
INVALID KEY WRITE USER-RECORD
ELSE
MOVE "<ACCOUNT NAME> <LEVEL>$NUL$" TO R(1)
MOVE "<ACCOUNT NAME>$$<LEVEL>$NUL$" TO R(1)
MOVE 1 TO SRC
PERFORM USAGE-REPLY
ELSE
@ -1259,7 +1259,7 @@
MOVE 1 TO DEST.
PERFORM INDEX-PARAMS.
IF NUM-PARAMS OF WOPO IS LESS THAN 1 THEN
MOVE "<PROGRAM NAME> ..." TO R(1)
MOVE "<PROGRAM NAME>$$..." TO R(1)
MOVE 1 TO SRC
PERFORM USAGE-REPLY
ELSE