diff --git a/DECASCII.COB b/DECASCII.COB
index d347579..8f4b81d 100644
--- a/DECASCII.COB
+++ b/DECASCII.COB
@@ -188,7 +188,7 @@
        ELSE IF ASCII-PND THEN
            MOVE "<PND>" TO COBOL-STRING
        ELSE IF ASCII-DLR THEN
-           MOVE "<$>" TO COBOL-STRING
+           MOVE "$" TO COBOL-STRING
        ELSE IF ASCII-PCNT THEN
            MOVE "<PCNT>" TO COBOL-STRING
        ELSE IF ASCII-AMP THEN