Is there a way to create a sequential file containing unformatted IDMS records using an OLQBATCH job?
Release: All supported releases.
Component: OLQ.
An easy method of creating a sequential file containing unformatted IDMS records is to use the keyword "OUTPUT ddname" in your SELECT statement and assign that ddname to the target dataset in the JCL.
Using OLQBATCH, route the records selected to be written in their unformatted condition to a sequential file by using the OUTPUT keyword in the SELECT statement and assigning a DDNAME in the JCL pointing to the target data set.
For example:
//OLQBATCH EXEC PGM=OLQBATCH,REGION=..<< olq jcl >>//OUTFILE DD DSN=output.outfile,DISP=SHR//SYSIPT DD * SET DICTNAME APPLDICT SET DBNAME EMPDEMO SIGNON SS=EMPSS01 SELECT * FROM EMPLOYEE OUTPUT OUTFILE
The data is written in its unformatted condition to the dataset specified in the OUTFILE DD.
The resulting output file will look like the following:
0023KATHERINE O'HEARN 12 EAST SPEEN ST NATICK MA02364 617880329PHINEAS FINN 79 HIGH ST WESTON MA04371 617490048NANCY TERNER 14 TYPO TERR READING MA02317 617330371BETH CLOUD 3456 PINKY LN NATICK MA02178 617430020JAMES JACOBI 555 JAKAS DR GROVER MA02976 617330081TOM FITZHUGH 450 THRUWAY ST MANSFIELD MA03458 617880049DOUGLAS KAHALLY 56 SPELLING AVE READING MA02317 617330024JANE DOUGH 15 LOCATION DR NEWTON MA02456 617440021RALPH TYRO 888 FORTITHE ST SINGER MA02254 617440341RICHARD MUNYON 17 BLACKHILL DR WESTWOOD MA02090 617320366ALAN DONOVAN 6781 CORNWALL AVE MELROSE MA02176 61766
PLEASE NOTE: The access switch must be set to OLQ to read or write sequential files.