In article <7197268685388649.wa.elardus.engelbrechtsita.co...@listserv.ua.edu> 
you wrote:
> Sri h Kolusu wrote:
> > ...  I am picking the first 5 PO's
> >I used Symbols for the number of PO's to be picked, so that you don't have 
> >to change the control cards all the time. 
> >//         EXPORT SYMLIST=*
> >//         SET NUMPO=5
> ...
> >  INCLUDE=(5001,8,UFF,LE,&NUMPO)
> Amazing! Using a SET and use that in your INCLUDE. Hmmm, very interesting, 
> that alone opens up a whole lot of possible things to do in SORT.
> Thanks for sharing this magic wand! Much appreciated!
> Goete / Greetings
> Elardus Engelbrecht

Not just SORT. I have several jobs where I like to use inline data. This
was a pain before the SYMLIST stuff. e.g. here's my SPUFI job now:

// EXPORT SYMLIST=*                                
//*SET VER='10',SSID='DB2X'                        
//*SET VER='11',SSID='DB2U'                        
// SET VER='12',SSID='DB2'                         
//DSNTIST EXEC PGM=IKJEFT01,DYNAMNBR=20            
//STEPLIB  DD  DSN=DBI.DB2.V&VER..SDSNLOAD,DISP=SHR
//SYSTSIN  DD  *,SYMBOLS=JCLONLY                   
  DSN SYSTEM(&SSID.)                               
  RUN PROGRAM(DSNTEP2) PLAN(DSNTEP&VER.) -         
      LIB('DBI.DB2.V&VER..RUNLIB.LOAD')            
  END                                              
/*                                                 
//SYSIN    DD  *,SYMBOLS=JCLONLY                   
SELECT * FROM DSN8&VER.10.PRODUCT FOR FETCH ONLY   
/*                                                 

All I need to do is change the comment and run a different version of
DB2.

-- 
Don Poitras - SAS Development  -  SAS Institute Inc. - SAS Campus Drive
sas...@sas.com           (919) 531-5637                Cary, NC 27513

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to