|
View previous topic :: View next topic
|
| Author |
Message |
Bhuvanakp
New User
Joined: 29 Aug 2007
Posts: 19
Location: Chennai
|
|
|
|
Hi,
My input file is FBA & based on the below FileAid condition the records
are filtered & copied as VBA Output file.
FileAid condition:
$$DD01 COPY RDW=3,IF=(COND)
I need to replace the same with Sort Card. Please guide me. |
|
| Back to top |
|
 |
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
|
|
|
|
Hello,
What is the criteria for filtering records? Post a few sample records and input/output LRECL.
Thanks,
Arun |
|
| Back to top |
|
|
Bhuvanakp
New User
Joined: 29 Aug 2007
Posts: 19
Location: Chennai
|
|
|
|
Hi,
The criteria is:
$$DD01 COPY RDW=3,IF=(40,EQ,C'OOBOSZYK-THO003539')
Input: RECFM=FBA/LRECL - 1145
Output: RECFM=VBA/LRECL - 1145 |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
I think it may be easier if you put your question like
I have a FBA file which I want to copy to a VBA file on certain conditions.
The conditions are
And show an example of the input data too |
|
| Back to top |
|
|
Bhuvanakp
New User
Joined: 29 Aug 2007
Posts: 19
Location: Chennai
|
|
|
|
Hi,
Ya, the concept that you have famed is 100% right. Thanks.
I have a FBA file which I want to copy to a VBA file on the below
conditions.
$$DD01 COPY RDW=3,IF=(40,EQ,C'OOBOSZYK-THO003539')
Sample Input Data:
----+----1----+----2----+----3----+----4----+----5----+----6----+---
***************************** Top of Data **************************
1PROXYTEL41387510 STD1* Í 41387510OOBOSZYK-THO003539019341833 |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
And have you read the documentation of your sort product to look at OMIT INCLUDE parameters.
I think not. Do you know which sort product you use at your shop ? |
|
| Back to top |
|
|
hchinnam
New User
Joined: 18 Oct 2006
Posts: 73
|
|
|
|
I am bit confused, I think RDW will be used if your input is VB, not your output.
In either case read about sort FTOV and VTOF features. You might also need to read about SKIPREC and STOPAFT |
|
| Back to top |
|
|
Aaru
Senior Member
Joined: 03 Jul 2007
Posts: 1287
Location: Chennai, India
|
|
|
|
Bhuvana,
| Code: |
| $$DD01 COPY RDW=3,IF=(40,EQ,C'OOBOSZYK-THO003539') |
The actual meaning of this condition is
| Quote: |
| This will lists all records of this variable-length dataset that contain the string OOBOSZYK-THO003539 in the 40th byte of the data (not including the 4-byte system RDW). |
But your post says your input is FBA. Is that correct? |
|
| Back to top |
|
|
Bhuvanakp
New User
Joined: 29 Aug 2007
Posts: 19
Location: Chennai
|
|
|
|
Hi,
I have checked the input files. It is FBA only.. |
|
| Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
|
|
|
|
Bhuvana,
As pointed out earlier your input file should be VB for using the control card provided by you. File-aid will simply skip the statement if you try this on a fixed length file.
I just tried with a sample FBA file and got the below error. I think you are missing something on the requirement.
| Code: |
DD01 DSN=XXXX.YYYY.ZZZ OPENED AS PS,
RECFM=FBA,LRECL=80,BLKSIZE=27920,VOL=TSO001
$$DD01 LIST RDW=3,IF=(1,EQ,A)
RDW OPTION ALLOWED FOR VARIABLE FILES ONLY
.....SKIPPING TO NEXT $$DD CARD |
Thanks,
Arun |
|
| Back to top |
|
|
Bhuvanakp
New User
Joined: 29 Aug 2007
Posts: 19
Location: Chennai
|
|
|
|
Hi Arun,
Thanks 
The input file count stood upto 5. I again checked those files 4 files remained FBA only. One file remained as a GDG Tape Entry. That too created as FBA File only.
The below is the FileAid Step's output file confirming as VBA.
| Code: |
//STEP01.DD010 DD DISP=SHR,
// DD DSN=XXXXX
// DISP=(NEW,CATLG,DELETE),
// DCB=(MBB.MODEL,LRECL=1145,BLKSIZE=0,RECFM=VBA,BUFNO=10) |
|
|
| Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
|
|
|
|
Hello,
What do you see inside the File-aid SYSPRINT? Can you post here the messages issued by File-aid on executing the mentioned card?
Thanks,
Arun |
|
| Back to top |
|
|
|
|
