IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Problem In IMS Segment extraction using DFSDDLT0


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
saithvis2

New User


Joined: 23 Dec 2005
Posts: 61
Location: Providence , US

PostPosted: Wed Feb 21, 2007 3:55 am
Reply with quote

Hi All,

I went through the fine manual and searched the forum , but still I am facing problem in extracting data from the segment. The actual problem is that I have to extract some data from production environment and load the same into my testing environment. I used to use file-aid but my shop no longer has it.

Problem :
I have a key field for the root segment that is 15 bytes long and I am trying to extract the same using DFSDDLT0 . In the sysin of my jcl
I am coding as follows :
//SYSIN DD *
S 1 1 1 1 2VFCCHS04
L 0009 GU VSCPHST (CA-SUBR- EQ 0527331981012 ) X
CONT ID-KEY
/*

Now since the SSA or the key field name is longer I tried using the CONT option but still it is abending with return code of AK stating that field name is incorrect .

DBD name : ABCCHS04
Segment Name : ABCPHST
SSA key : CA-SUBR-ID-KEY
operator: EQ
value : 12345678912 .

I would really appreciate if someone can help me out . Thanks in advance.

Regards
Vishal[/u]
Back to top
View user's profile Send private message
saithvis2

New User


Joined: 23 Dec 2005
Posts: 61
Location: Providence , US

PostPosted: Wed Feb 21, 2007 3:57 am
Reply with quote

Hi all,

My applogies :

The actual sysin :
//SYSIN DD *
S 1 1 1 1 2ABCCHS04
L 0009 GU ABCPHST (CA-SUBR- EQ 1234531981012 ) X
CONT ID-KEY
/*

Regards
Vishal
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Wed Feb 21, 2007 5:21 am
Reply with quote

The wizard of IMS, Bitneuker, is still a few hours away.... You are in good hands... icon_smile.gif
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Wed Feb 21, 2007 7:09 pm
Reply with quote

Hi Vishal,

Could you post your DBD for this segmenttype?
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Wed Feb 21, 2007 7:59 pm
Reply with quote

What I actually mean is: do you use some Cobol defined name in your SSA or the actual FIELD-name from your DBD.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Wed Feb 21, 2007 8:07 pm
Reply with quote

And, as for the continuation in a column call:
click

next time when you post put it in Code (see the row of buttons above the message inputarea icon_wink.gif
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Wed Feb 21, 2007 8:28 pm
Reply with quote

Bitneuker wrote:
What I actually mean is: do you use some Cobol defined name in your SSA or the actual FIELD-name from your DBD.


If you wonder why I asked this follow this link
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Wed Feb 21, 2007 8:34 pm
Reply with quote

William Thompson wrote:
The wizard of IMS, Bitneuker, is still a few hours away.... You are in good hands... icon_smile.gif


Thanks Bill icon_wink.gif One tries but sometimes even my magic wand failes to solve the problems icon_lol.gif
Back to top
View user's profile Send private message
saithvis2

New User


Joined: 23 Dec 2005
Posts: 61
Location: Providence , US

PostPosted: Thu Feb 22, 2007 3:11 am
Reply with quote

Quote:
Thanks Bill One tries but sometimes even my magic wand failes to solve the problems


No , George your magic wand has worked this time around too. icon_smile.gif.
This is what was adviced by George ,
Quote:
In your DBD you will notice the field is defined with a name max 8.
In the SSA's you don't code the cobol or pli defined names but the actual database fieldname.


I just did that and it started working fine.
This is how my sysin looks like now:
Code:

//SYSIN     DD     *                                     
S 1 1 1 1     2ABCCHS04                                 
L   0002 STAK                                           
L        GU    ABCPHST *----(ABCRIDD1EQ1234531981012  ) 
L        END                                             
EH8    OK                                               
/*                   


Thanks alot George . Once I am done with the Load job I will post that too in this thread .

Regards
Vishal
Back to top
View user's profile Send private message
saithvis2

New User


Joined: 23 Dec 2005
Posts: 61
Location: Providence , US

PostPosted: Thu Feb 22, 2007 3:34 am
Reply with quote

I have tried to sum up the mistake that I was making:

1: I was not using the actual field name from my DBD i.e. ABCRIDD1 .
2: We need to code the SSA in the same manner as we do in our program. This was the most important thing which we noticed. The manual does not talk about this. The manual just asks us to put the SSA name, SSA field name and Field value. But we need to set it exactly as we would do them if the call was made from a Program.

Regards
Vishal
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Thu Feb 22, 2007 4:00 am
Reply with quote

Like I might have paraphrased somewhere else, sometime earlier, "It's all Greek to me".... icon_lol.gif
And Vishal, Thanks for the closing post. icon_smile.gif
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Thu Feb 22, 2007 3:16 pm
Reply with quote

I support Bill's post: If a TS (Topic Starter) reports his problem is solved and also explains what has gone wrong we will be more inclined to look for solutions. Thanks Vishal for the way you reported; whenever you've got problems just post. We are here to help you icon_wink.gif
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Thu Feb 22, 2007 3:25 pm
Reply with quote

In addition; Long ago (1973) I read a book titled: The psychology of computer programming. What hit me most was the lesson I learned from it: egoless programming --> share your mistakes and errors, don't hide them and don't be ashamed, so all may learn and prevent making the same mistakes icon_idea.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IMS DB/DC

 


Similar Topics
Topic Forum Replies
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts z/vm installation problem All Other Mainframe Topics 0
No new posts Job scheduling problem. JCL & VSAM 9
No new posts Problem with IFTHEN=(WHEN=GROUP,BEGIN... DFSORT/ICETOOL 5
No new posts Need to add field to copybook, proble... COBOL Programming 14
Search our Forums:

Back to Top