|
View previous topic :: View next topic
|
| Author |
Message |
raveendra_ibm
Currently Banned
New User
Joined: 07 Jan 2006
Posts: 31
|
|
|
|
Hi,
I have unloaded the IMS database using the utility DFSRRC00.
The output unloaded file contains the one Header Record, Few details records & at end one Trailer Record.
In detail record from position 1-35, it contains the data required for IMS and actual Segment data starts from 36th position onwards.
Can anyone please provide me the actual field layout from position 1-35. By looking at data i can make out Segment name will start at 7th Position. I am not sure about the rest of the bytes in 1-35 position.
Thanks |
|
| Back to top |
|
 |
subramaniabharathi
New User
Joined: 09 Mar 2006
Posts: 9
|
|
|
|
| The o/p file will be prefixed before with 10 bytes which contains segment name rest of the information will be ur segment info as such. |
|
| Back to top |
|
|
kris_madras
New User
Joined: 04 Jul 2005
Posts: 50
|
|
|
|
| raveendra_ibm wrote: |
Hi,
I have unloaded the IMS database using the utility DFSRRC00.
The output unloaded file contains the one Header Record, Few details records & at end one Trailer Record.
In detail record from position 1-35, it contains the data required for IMS and actual Segment data starts from 36th position onwards.
Can anyone please provide me the actual field layout from position 1-35. By looking at data i can make out Segment name will start at 7th Position. I am not sure about the rest of the bytes in 1-35 position.
Thanks |
Hi,
can you please post the JCL which uses the tool DFSRRC00?
Is it a generic tool available with IMS DB? or your project specific?
We need to extract IMS DB all segments/one by one to a PS file(s) |
|
| Back to top |
|
|
guptae
Moderator
Joined: 14 Oct 2005
Posts: 1209
Location: Bangalore,India
|
|
|
|
Hi.
Here is the JCl
//ULP011 EXEC PGM=DFSRRC00,PARM='DLI,XES,PS6P011G'
//STEPLIB DD DSN=IMS6.RESLIB,DISP=SHR
// DD DSN=WORKLIB,DISP=SHR
//IMS DD DSN=IMS6.PSBLIB,DISP=SHR
// DD DSN=IMS6.DBDLIB,DISP=SHR
//DFSRESLB DD DSN=IMS6.RESLIB,DISP=SHR
//DFSVSAMP DD DSN=MSD.CARDLIB(DFSVSM10),DISP=SHR
//SYSOUT DD SYSOUT=*
//REPORT DD SYSOUT=*
//XCEFILE DD DUMMY
//SORTFILE DD DUMMY
//SYSUDUMP DD SYSOUT=*
//PRNTOUT DD SYSOUT=*
//SYSIN DD DSN=RD04.XES.CBLTDLI.DATA,DISP=SHR
//OUTFILE DD DSN=TBH2.XES6P011.DATA,
// DISP=(,CATLG),UNIT=DISK,SPACE=(CYL,(1,3),RLSE),
// DCB=(BLKSIZE=19000,LRECL=4624,RECFM=VB)
//**
RD04.XES.CBLTDLI.DATA its contain
-CBLTDLI
it may be helpful |
|
| Back to top |
|
|
PascalQ
New User
Joined: 12 May 2006
Posts: 20
|
|
|
|
raveendra_ibm,
I've been looking for this layout before and did not have success. I think it is probably not available to the public or customers.
However, if you find a documentation about the record layout, please let me know  |
|
| Back to top |
|
|
kris_madras
New User
Joined: 04 Jul 2005
Posts: 50
|
|
|
|
| guptae wrote: |
Hi.
Here is the JCl
//ULP011 EXEC PGM=DFSRRC00,PARM='DLI,XES,PS6P011G'
//STEPLIB DD DSN=IMS6.RESLIB,DISP=SHR
// DD DSN=WORKLIB,DISP=SHR
//IMS DD DSN=IMS6.PSBLIB,DISP=SHR
// DD DSN=IMS6.DBDLIB,DISP=SHR
//DFSRESLB DD DSN=IMS6.RESLIB,DISP=SHR
//DFSVSAMP DD DSN=MSD.CARDLIB(DFSVSM10),DISP=SHR
//SYSOUT DD SYSOUT=*
//REPORT DD SYSOUT=*
//XCEFILE DD DUMMY
//SORTFILE DD DUMMY
//SYSUDUMP DD SYSOUT=*
//PRNTOUT DD SYSOUT=*
//SYSIN DD DSN=RD04.XES.CBLTDLI.DATA,DISP=SHR
//OUTFILE DD DSN=TBH2.XES6P011.DATA,
// DISP=(,CATLG),UNIT=DISK,SPACE=(CYL,(1,3),RLSE),
// DCB=(BLKSIZE=19000,LRECL=4624,RECFM=VB)
//**
RD04.XES.CBLTDLI.DATA its contain
-CBLTDLI
it may be helpful |
Could you explain me the steps in detail>? |
|
| Back to top |
|
|
|
|
  |
All times are GMT + 6 Hours |
|
