Coloring source lines with COBOL and using a shortcut from within PDM

I saw the tip that explained coloring source lines using SQL. I took the liberty to translate it into COBOL+CL programs and call it from within the PDM environement. Here, you can color the remarks line in source with white color or change it as you like.

Next go to PDM (STRPDM) and choose option 9 (user options+enter) F6 to create new. Then name it AT or anything you like. The command:

Then, when you type AT near COBOL source, all the remarks lines will be highlighted.

More colors:
Hex Color
20 Green
21 Green, reverse image

Digg This!     StumbleUpon     Del.icio.us

RELATED CONTENT iSeries programmer tips Enhancing RPG with external SQL stored procedures Tracking data changes on IBM i with triggers Introduction to SQLRPGLE on IBM i: Making a report Implementing a browser interface in COBOL: Displaying database fields Taking advantage of CL advancements, starting with V5R3 TAATOOL: Useful tools for programmers on IBM i Implementing a browser interface in COBOL: Creating your graphic Web page Implementing a browser interface in COBOL: Getting started Making the most of RPG data handling on IBM i Groovy programming on IBM i iSeries COBOL programming Implementing a browser interface in COBOL: Displaying database fields Implementing a browser interface in COBOL: Creating your graphic Web page Implementing a browser interface in COBOL: Getting started Allow access to data from a stored procedure result set using COBOL or RPG Eight steps for creating program documentation using AS/400 utilities Top 10 programmer tips YTD Slow system performance Changing the font size New option within the WRKSYSACT command Retrieve a program statement/line number iSeries COBOL programming Research

RELATED RESOURCES 2020software.com, trial software downloads for accounting software, ERP software, CRM software and business software systems Search Bitpipe.com for the latest white papers and business webcasts Whatis.com, the online computer dictionary

r>22 White
23 White, reverse image
24 Green, underscore
25 Green, underscore, reverse image
26 White, underscore
27 Nondisplay
28 Red
29 Red, reverse image
2A Red, high intensity
2B Red, high intensity, reverse image
2C Red, underscore
2D Red, underscore, reverse image
2E Red, underscore, blink
2F Nondisplay
30 Turquoise, column separator
31 Turquoise, column separator, reverse image
32 Yellow, column separator
33 White, reverse image, column separator
34 Turquoise, underscore, column separator
35 Turquoise, underscore, reverse image, column separator
36 Yellow, underscore, column separator
37 Nondisplay
38 Pink
39 Pink, reverse image
3A Blue
3B Blue, reverse image
3C Pink, underscore
3D Pink, underscore, reverse image
3E Blue, underscore
3F Nondisplay

ABOUT THE AUTHOR: Yoni Tehan is iSeries Administrator at Ashtrom Group Ltd.

Rate this Tip To rate tips, you must be a member of Search400.com. Register now to start rating these tips. Log in if you are already a member. Submit a Tip DISCLAIMER: Our Tips Exchange is a forum for you to share technical advice and expertise with your peers and to learn from other enterprise IT professionals. TechTarget provides the infrastructure to facilitate this sharing of information. However, we cannot guarantee the accuracy or validity of the material submitted. You agree that your use of the Ask The Expert services and your reliance on any questions, answers, information or other materials received through this Web site is at your own risk.