|
View previous topic :: View next topic
|
| Author |
Message |
nagalakshmi
New User
Joined: 23 Feb 2005
Posts: 7
|
|
|
|
Questions at the Interview Panel.
1. What is the JCL statement & Cobol Select, FD entry for Variable Length records file
2. What is the JCL coding for a file being read with Alternate Key.
Thanks
Lakshmi |
|
| Back to top |
|
 |
mcmillan
Site Admin
Joined: 18 May 2003
Posts: 1215
Location: India
|
|
|
|
DCB=
LRECL = Specify the maximum length, in bytes, for variable-length records.
RECFM = V (Varible length) or VB (Variable length Blocked)
indicates that the records are variable length; variable records cannot be in ASCII.
Example:
| Code: |
//DD1A DD DSNAME=PHYF,DISP=(NEW,KEEP),UNIT=3380,
// DCB=(RECFM=VB,LRECL=80,BLKSIZE=800),
// SPACE=(23472,(200,40)) |
same as Fixed Length File
Example:
| Code: |
| SELECT LOGF ASSIGN TO DD1A |
RECORD IS VARYING IN SIZE FROM Integer-6 TO integer-7 CHARACTERS DEPENDING ON data-name-1
Example:
| Code: |
FD LOGF.
RECORD CONTAINS 1 TO 80 CHARACTERS DEPENDING ON VAR1. |
| Quote: |
| JCL coding for a file being read with Alternate Key |
If Base Cluster Name is DD1A then use DD1A1 as Alternative Index ddnames.
Ex:
| Code: |
DD1A DD DSN=BaseCluster
DD1A1 DD DSN=AIXPath
-
-
-
DD1A253 DD DSN=AixPath |
Check this topic to know more about AIX:
www.ibmmainframes.com/viewtopic.php?t=148 |
|
| Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003
Posts: 1592
|
|
|
|
Hi MM,
I think you got the DD wrong. It s/b:
| Code: |
//DD1A DD DSNAME=PHYF,DISP=(NEW,KEEP),UNIT=3380,
// DCB=(RECFM=VB,LRECL=84,BLKSIZE=800),
// SPACE=(23472,(200,40))
|
Notice the LRECL s/b 84 (or the FD s/b 76) |
|
| Back to top |
|
|
mcmillan
Site Admin
Joined: 18 May 2003
Posts: 1215
Location: India
|
|
|
|
Oh sorry!
I have to code LRECL=84 to have 10 logical records in the block.
The maximum logical record length is 80 and the remaining 4 chars will contain the actual run time length of each record in that file.
Thanks mmwife. |
|
| Back to top |
|
|
|
|
