Dynamic input allocation for JCL

kudamala · New User Joined: 12 Sep 2008 Posts: 51 Location: Bangalore

Hello

I have a requirement and it is as follows:

I receive 'N' number of files everyday and at the end of the day I need to concatenate them into one file and need to update the DB2. The file format would be like, PRD.FILE.xxxx.FTP.DATA. Where xxxx would be vendor code. We have around 1000 vendors. But daily I get only a few vendor files for processing. Like

PRD.FILE.ven1.FTP.DATA
PRD.FILE.ven2.FTP.DATA...... may be 10 or 20 or 30 files a day. But that number is not known and vendor also not known.

Can anybody help, how can I pickup the available files for the day for processing in my JCL?

Thanks in advance

superk · Posted: Mon Apr 05, 2010 4:40 pm

Use the same method shown here in this previous topic.

kudamala · New User Joined: 12 Sep 2008 Posts: 51 Location: Bangalore

Hello Kevin

Thanks for your suggestion. I have looked into the topic mentioned by you. But it is related to GDG and we know the file name. But in my case its a flat file and each file name is different. Do you think that this works with LISTCAT?

Thanks & Regards

vasanthz · Posted: Mon Apr 05, 2010 5:38 pm

Hi,

The IDCAMS LISTCAT works for flatfiles as well.
Remove the GDG keyword alone on the LISTCAT statement.

kudamala · New User Joined: 12 Sep 2008 Posts: 51 Location: Bangalore

Hello Vasanth & Kevin

Thanks a lot for your help. It works fine.

kudamala · New User Joined: 12 Sep 2008 Posts: 51 Location: Bangalore

Hello

Again, using LISTCAT ENT, I am getting all the datasets, but also other statistics. If I want to have only the name of the datasets without any other information, is is possible? Do we have any option with LISTCAT?

Thanks in advance

expat · Posted: Wed Apr 07, 2010 4:24 pm

At least post what your control statements look like, and also the output.
Please also post the output you require.

Have you bothered to read the IDCAMS manual to see if the various options might help you.
What else have you tried for yourself, possibly adapting the sort include / omit criteria.

Marso · Posted: Wed Apr 07, 2010 4:55 pm

Just remove the "ALL" parameter!

Use your free time to click on "IBM Manuals" on top of this page, scroll down to "Tools & Data Access methods" section,
and click on VSAM Services for DFSMS link.
Chapter 27 explains all the parameters for LISTCAT

expat · Posted: Wed Apr 07, 2010 8:03 pm

Hi Marso,

Methinks that the OP gets the info he wants but not in the correct format, hence my comment relating to the linked thread suggesting a play with the sort control statements.

I know it can be done easily as I have done this myself a couple of times.

Marso · Posted: Wed Apr 07, 2010 8:39 pm

kudamala · New User Joined: 12 Sep 2008 Posts: 51 Location: Bangalore

Hi

Yes, what you said is correct. We need some clean up. I tried to sort using outrec, but I couldn't succeed. Can anybody provide correct sort code to copy only dataset names to output file from the above file?

Thanks in advance

expat · Posted: Thu Apr 08, 2010 11:34 am

Please provide your sort code and we will try to help you.

kudamala · New User Joined: 12 Sep 2008 Posts: 51 Location: Bangalore

Hello

Here is what I use.

//SORTIN DD DSN=DEV.EUM.SELL.LIST.DATA0,DISP=SHR
//SORTOUT DD DSN=DEV.EUM.SELL.LIST.DATA,DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(TRK,(150,150),RLSE),
// RECFM=VB,
// LRECL=125

Sort card:

SORT FIELDS=COPY
OUTREC FIELDS=(5:23,40)

Input data:

=COLS> ----+----1----+----2----+----3----+----4----+--
****** ***************************** Top of Data *****
000001 0NONVSAM ------- DEV.EUM.MKT.SELL.ABCD.FTP.DATA
000002 0NONVSAM ------- DEV.EUM.MKT.SELL.ALCK.FTP.DATA
000003 0NONVSAM ------- DEV.EUM.MKT.SELL.BCDA.FTP.DATA
000004 0NONVSAM ------- DEV.EUM.MKT.SELL.ARPD.FTP.DATA

Error:
ICE201I E RECORD TYPE IS V - DATA STARTS IN POSITION 5
ICE150I 0 VLSHRT NOT USED FOR SORT, MERGE, INCLUDE, OMIT OR SUM STATEMENT
ICE126A 0 INCONSISTENT *OUTREC IFTHEN 0 REFORMATTING FIELD FOUND

Both input and output files are in VB format. What I need is to copy only file names from input to out.

thanks in advance

expat · Posted: Thu Apr 08, 2010 12:28 pm

This is what works for me, getting the output into an FB 80 dataset
Also, I do not try and override the DCB parameters from the LISTCAT, I let it use VBA, 125

kudamala · New User Joined: 12 Sep 2008 Posts: 51 Location: Bangalore

Thank you all

It works with the above parameters.

Anuj Dhawan · Posted: Thu Apr 08, 2010 5:30 pm

For such an exercise I usually prefer using (gives rather neat output):

expat · Posted: Thu Apr 08, 2010 6:35 pm

Huh, it certainly works for me.
What results are you getting. My CSI utility works fine with HLQ.**.LLQ

Of course it may be my interpretation of what you are saying Anuj, as it has been one of THOSE DAYS.
Is it legal to shoot users ?

Anuj Dhawan · Posted: Thu Apr 08, 2010 7:27 pm

ah..My observation sucks - take my words back

. Why the hell do I work on Thrusday and now idiots have asked me to give support on coming Sunday while for that day my ex is waiting to meet Her on Her B'day ... my timing stinks!Yuck!

Robert Sample · Posted: Thu Apr 08, 2010 7:39 pm

expat · Posted: Thu Apr 08, 2010 8:02 pm

Robert Sample · Posted: Thu Apr 08, 2010 8:04 pm

expat, some days I think the season should be year-round .....

Anuj Dhawan · Posted: Fri Apr 09, 2010 6:27 pm

LOL - expat, you know this kid now quite well...

expat · Posted: Mon Apr 12, 2010 2:56 pm