From 2e2d01697ab9accd0e505049c4101b9c696d81ec Mon Sep 17 00:00:00 2001
From: "Quinn \"heddwch\" Evans" <yoshizuki@gmail.com>
Date: Fri, 14 Sep 2018 12:56:56 -0600
Subject: [PATCH] Update usage statements.

---
 WOPO.COB | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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 "<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