Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Logical segment expansion problem.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
keitholsen

New User


Joined: 07 Mar 2008
Posts: 5
Location: Elgin, IL

PostPosted: Fri Mar 07, 2008 10:31 pm    Post subject: Logical segment expansion problem.
Reply with quote

I have an logical segment that I've tried to expand by 10 bytes in the 'Intersection Data' area. When I try to use the new 10 byte area, IMS seems to ignore it.

Here is the old logical segment in the DBD:

SEGM NAME=MSMTCOM,
PARENT=((MSROOT,SNGL),(CPMROOT,V,DBCPM1)),
BYTES=098,
POINTER=(T,LTB),
RULES=PVV
FIELD NAME=(MSMTKEY,SEQ,U),
BYTES=34,
START=65

Here is the new logical segment in the DBD.

SEGM NAME=MSMTCOM,
PARENT=((MSROOT,SNGL),(CPMROOT,V,DBCPM1)),
BYTES=108,
POINTER=(T,LTB),
RULES=PVV
FIELD NAME=(MSMTKEY,SEQ,U),
BYTES=34,
START=65
FIELD NAME=MSINTLVL,
BYTES=10,
START=99,
TYPE=C

Nothing else has been changed.

I do not get any errors when I regen/reload the database PSB's and ACB's. I also do not get any errors when I do GU, REPL, ISRT in my program. But the new 10 byte area is ignored.

Thanks for any help.

Keith
Back to top
View user's profile Send private message

Bitneuker

CICS Moderator


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

PostPosted: Fri Mar 07, 2008 10:58 pm    Post subject:
Reply with quote

Did you also change the physical database DBCPM1?
Back to top
View user's profile Send private message
keitholsen

New User


Joined: 07 Mar 2008
Posts: 5
Location: Elgin, IL

PostPosted: Sat Mar 08, 2008 12:41 am    Post subject:
Reply with quote

Thanks for responding.

I didn't change the DBCPM1 database. From what I can see from the IBM manuals, this being a "Bidirectional virtually paired logical relationship", only one physical child is created and that being under the DBMER1 database. Unless I'am wrong about this being a Virtually Paired vs a Physically Paired relationship.

Here is the DBD SEGM from the DBCPM1 database.

SEGM NAME=CPMTMER,
PARENT=CPMROOT,
POINTER=PAIRED,
SOURCE=((MSMTCOM,D,DBMER1))
FIELD NAME=(CTMKEY,SEQ,U),
BYTES=30,
START=1
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


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

PostPosted: Sun Mar 09, 2008 2:33 am    Post subject:
Reply with quote

Backout/Recovery/Reload?
Back to top
View user's profile Send private message
keitholsen

New User


Joined: 07 Mar 2008
Posts: 5
Location: Elgin, IL

PostPosted: Mon Mar 10, 2008 8:25 pm    Post subject:
Reply with quote

The Backout and Reload run OK with no errors. We are not doing a Recovery.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


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

PostPosted: Mon Mar 10, 2008 11:53 pm    Post subject:
Reply with quote

Is this MSINTLVL field defined in any physical database? Also check this
Back to top
View user's profile Send private message
keitholsen

New User


Joined: 07 Mar 2008
Posts: 5
Location: Elgin, IL

PostPosted: Tue Mar 11, 2008 12:12 am    Post subject:
Reply with quote

The MSINTLVL data not in any physical database. It is only in the Intersection Data area of the logical segment.

From what I've read, this area of the logical segment is for data that is unique only for the logical relationship between 2 databases. That is exactly what I need.

I'm missing something somewhere. I'll keep you posted.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


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

PostPosted: Tue Mar 11, 2008 12:40 am    Post subject:
Reply with quote

I did some re-reading in your first post and noticed you showed a physical DBD. Check this out for the RULES parameter in a physical DBD.

Follow the first link in my signature and search for 'physical dbd' and 'logical dbd' and do some exploring.

By the way: you might also consult your DBA.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


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

PostPosted: Tue Mar 11, 2008 12:49 am    Post subject:
Reply with quote

Also check with intersection data.
Back to top
View user's profile Send private message
keitholsen

New User


Joined: 07 Mar 2008
Posts: 5
Location: Elgin, IL

PostPosted: Tue Mar 11, 2008 1:42 am    Post subject:
Reply with quote

George,

I've been reading those links you have sent me trying to find something. My fix is buried in there somewhere!!

We do have our DBA helping us. We might end up having to call IBM on this one. I will let you know if we find what it is.

Thanks again for all your help.

Keith
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Strings with double quotes having pro... raja Arumugam All Other Mainframe Topics 11 Thu Mar 30, 2017 10:34 am
No new posts Problem reading GTF trace output danik56 ABENDS & Debugging 7 Thu Mar 16, 2017 1:02 pm
No new posts ROUNDED Problem with COMPUTE statement shalem COBOL Programming 11 Thu Feb 09, 2017 8:16 pm
No new posts SYMNAMES problem jacobdng DFSORT/ICETOOL 7 Thu Dec 22, 2016 7:47 am
No new posts Problem in writing Output file vickey_dw COBOL Programming 5 Mon Nov 14, 2016 11:14 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us