diff --git a/WOPO.COB b/WOPO.COB index a8efb64..ad6a4ba 100644 --- a/WOPO.COB +++ b/WOPO.COB @@ -1028,7 +1028,7 @@ REWRITE USER-RECORD INVALID KEY WRITE USER-RECORD ELSE - MOVE " $NUL$" TO R(1) + MOVE "$$$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 " ..." TO R(1) + MOVE "$$..." TO R(1) MOVE 1 TO SRC PERFORM USAGE-REPLY ELSE