Art looks around for the 'Like' button for this answer.... Doesn't see one.... says a few choice "NCO Terms" under his breath and then does an inverted 'Gibbs Slap' :) hehehehehe



Art "humor must be injected into all Thursdays! Hehehe" Bahrs



Art Bahrs, CISSP | Healthcare Information Systems Analyst/Auditor – Validation Team | Acumentra Health

2020 SW 4th Ave Suite 520 | Portland, OR 97201 |503.382.3938 [log in to unmask]

www.acumentra.org



Keep up to date with efforts to improve health care quality and safety for patients in the Pacific Northwest.

Subscribe to Acumentra Health’s free e-newsletter, Q-News.





-----Original Message-----

From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf Of Jeff Kubler

Sent: Thursday, September 03, 2015 11:13 AM

To: [log in to unmask]

Subject: Re: [HP3000-L] Fun with COBOL



You have SUPRTOOL?  That would be much easier!



-----Original Message-----

From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf Of Newton, Ernie

Sent: Thursday, September 3, 2015 10:47 AM

To: [log in to unmask]

Subject: Fun with COBOL



Greetings,



It's been a long time since I wrote COBOL, and I have an elementary question about creating a comma-delimited file.



If I want...



"item one", "item two","","","item three"



How do I create the "," between item one and item two?  Is it simply PIC "","" (quote comma quote inside double quotes?)



And the ","",""," would it be the same?  Just put that inside double quotes?



Something tells me that there is an escape sequence, but the mind is not cooperating.



Thanks,



Ernie



________________________________



This message, including any attachments, is intended solely for the use of the named recipient(s) and may contain confidential and/or privileged information. Any unauthorized review, use, disclosure or distribution of this communication(s) is expressly prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy any and all copies of the original message.



* To join/leave the list, search archives, change list settings, *

* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *



* To join/leave the list, search archives, change list settings, *

* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

IMPORTANT NOTE: The information contained in this message may be privileged, confidential, and protected from disclosure. If the reader of this message is not the intended recipient, or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any dissemination, distribution, or copying of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately and delete this message from your computer. Acumentra Health.



* To join/leave the list, search archives, change list settings, *

* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *