! Syntax Highlighting Patterns for Cobol ! ! Version: 1.0, April 25, 2002 ! (submitted by Andy H., Alexandre Delen ) ! ! Notice that these patterns are based on Microfocus Cobol with SQL db2 ! and there is no guarantee that they'll work correctly for other versions ! of COBOL. ! Finally, they aren't maintained by author. ! The patterns were written for NEdit version 5.1.x and above ! ! INSTALLATION ! ! In NEdit Version 5.0.1 and beyond, load this pattern by starting nedit with: ! ! nedit -import ! ! Then, check that the patterns were loaded correctly, and choose Save Defaults ! from the Preferences menu. The new patterns will now be incorporated into ! your own .nedit file, so the next time you start NEdit, you will no longer ! need to use -import. ! ! In version 5.0, without -import, you must edit your .nedit file by hand and ! add the contents of each resource below to the corresponding list in your ! .nedit file. Be sure to separate new entries with \n, and continue resource ! strings by escaping all newlines within a resource value with \ (backslash), ! leaving only the last line of the resource value not ending in \. ! nedit.highlightPatterns: \ Cobol:1:0{\n\ sql indic line:"\\$set":"\\n"::Preprocessor::\n\ sql:"exec sql":"end-exec"::Text Key::\n\ functions:"function[ | ]abs|function[ | ]acos|function[ | ]abs|function[ | ]annuity|function[ | ]asin|function[ | ]atan|function[ | ]char|function[ | ]char-national|function[ | ]cos|function[ | ]current-date|function[ | ]date-of-integer|function[ | ]day-of-integer|function[ | ]display-of|function[ | ]E|function[ | ]exp|function[ | ]exp10|function[ | ]factorial|function[ | ]fraction-part|function[ | ]integer|function[ | ]integer-of-date|function[ | ]integer-of-day|function[ | ]integer-part|function[ | ]lenght|function[ | ]lenght-an|function[ | ]log|function[ | ]log10|function[ | ]lower-case|function[ | ]max|function[ | ]mean|function[ | ]median|function[ | ]midrange|function[ | ]min|function[ | ]mod|function[ | ]national-of|function[ | ]numval|function[ | ]numval-c|function[ | ]ord|function[ | ]ord-max|function[ | ]ord-min|function[ | ]pi|function[ | ]present-value|function[ | ]random|function[ | ]range|function[ | ]rem|function[ | ]reverse|function[ | ]sign|function[ | ]sin|function[ | ]sqrt|function[ | ]standard-deviation|function[ | ]sum|function[ | ]tan|function[ | ]upper-case|function[ | ]variance|function[ | ]when-compiled":::function::\n\ calls:"[ | ]call[ | ]""":""""::function::\n\ end-calls:"[ | ]end-call":::function::\n\ header words:"identification division| program-id.| date-compiled.| author.|environment division.|configuration section.|source-computer.|object-computer.|special-names.|input-output section.|file-control.|data division.|file section.|working-storage section.|linkage section.|procedure division|[ | ]section.|declaratives.|end declaratives.":"\\n"::header::\n\ copies:"copy[ | ]""":"\\n"::String2::\n\ text:"""":"""":"\\n":Flag::\n\ conditionals:"[ | ]if|[ | ]end-if|[ | ]evaluate|[ | ]end-evaluate|[ | ]else|[ | ]when|[ | ]until|[ | ]while|[ | ]varying|[ | ]from| [ | ]by":::conditionals::\n\ keywords:"[ | ]read|[ | ]end-read|[ | ]start|[ | ]end-start|[ | ]perform|[ | ]end-perform|[ | ]go to|[ | ]write|[ | ]end-write|[ | ]rewrite|[ | ]end-rewrite|[ | ]display|[ | ]end-display|[ | ]move|[ | ]upon|environment-name|environment-value|[ | ]to|[ | ]call|[ | ]using|[ | ]value|[ | ]spaces|[ | ]space|[ | ]zero|[ | ]zeroes|[ | ]picture|[ | ]pic|[ | ]occurs|[ | ]times|[ | ]next sentence|[ | ]add|[ | ]subtract|[ | ]multiply|[ | ]divide|[ | ]compute|[ | ]end-compute|[ | ]set|[ | ]line|[ | ]pos|[ | ]high|[ | ]low|[ | ]blink|[ | ]true|[ | ]false|[ | ]initialize|[ | ]giving|[ | ]thru|[ | ]through|[ | ]length of|[ | ]and|[ | ]or|[ | ]high-values|[ | ]low-values|[ | ]exit|[ | ]paragraph|[ | ]size|[ | ]replacing|[ | ]tallying|[ | ]all|[ | ]by|[ | ]inspect|[ | ]string|[ | ]unstring|[ | ]end-string|[ | ]end-unstring|[ | ]delimited|[ | ]into|[ | ]converting":::Preprocessor::\n\ norem:"[ | ]\\* ":::Plain::\n\ rem:"^\\*| \\*|\\*>":"\\n"::Comment::\n\ comparators:"=|\\>|\\<":::green::\n\ } nedit.languageModes: Cobol:.cbl .per::Auto:None:::