Long ago (before Pipes) we had a need to determine if a LISTING filetype used ANSI or MC control characters, and wrote a CHECKCC MODULE. Early comments on the code contained:
EYEBALL DC CL8'CHECKCC',CL8'&SYSDATE',CL8'&SYSTIME',C'V1R1.0' C *********************************************************************** C * * C * CHECKCC reads the first 100 lines of the specified file looking * C * for the Carriage Control type. Valid types are NONE, ANSI and * C * CODE (Machine Control Characters). * C * * C * This module should be generated to run in the transient area. * C * E.G. LOAD CHECKCC ( CLEAR ORIGIN TRANS * C * GENMOD CHECKCC * C * * C * Return codes: * C * 0 - No CC * C * 4 - ANSI only * C * 8 - CODE only * C * 12 - ANSI and CODE, but more ANSI * C * 16 - ANSI and CODE, but more CODE * C * 20 - FSREAD error (perhaps file not found). * C * * C *********************************************************************** C Nowadays, Pipes might be easier. But just ask of you want the old, unsupported CHECKCC ASSEMBLE file. Mike Walter Aon Corporation The opinions expressed herein are mine alone, not my employer's. -----Original Message----- From: CMSTSO Pipelines Discussion List [mailto:CMS-PIPELINES@VM.MARIST.EDU] On Behalf Of Mark Boonie Sent: Tuesday, November 26, 2013 11:06 AM To: CMS-PIPELINES@VM.MARIST.EDU Subject: Re: Stage to convert carriage controls to "real" text Yes, I thought I'd provide a parameter that allows the user to specify the number of lines on a page and then issue blank lines to fill out the page. If I get really fancy, the user will be able to specify a delimited string that would be issued as a page separator so they can more easily identify the start of a new page. If I get even fancier, additional parameters would allow the user to specify where the various other channels are located on a page. I looked at the BROWSE stage that Mike mentioned. Supposedly the CC option supports both ASA and machine control characters. I was trying to figure out how it knew which one to use. Suppose the contents of column 1 was the character C -- as an ASA character, it means skip to channel 12 and print the data portion of the line, but as a machine character it means skip to channel 8 and don't print any data. I have some experimenting to do in the next few days. :-) - mb > From: Paul Gilmartin <paulgboul...@aim.com> > To: CMS-PIPELINES@vm.marist.edu, > Date: 11/26/2013 11:41 AM > Subject: Re: Stage to convert carriage controls to "real" text > Sent by: CMSTSO Pipelines Discussion List <CMS-PIPELINES@vm.marist.edu> > > I've done this in various languages: Pascal, Rexx, even PostScript. > If I were doing it in Pipelines, I'd write a procedural Rexx stage > because that's what I'm more familiar with. > > How would you expect to handle Skip to Channel 1? Issue blank lines > until the specified page depth? (In PostScript I use "showpage".) > > -- gil >
