ca.portal.admin

Re: 2 PDE copies in memory

Discussion created by ca.portal.admin on Aug 31, 2007
Hello All:

I had this exact same problem one week ago and I am 1000% sure that it
was
also created by doing a DCMT VARY MEM PDE PROGRAM and changing the
first
character of the program name to an X.

After that I started getting 2 PDE's for a large number of programs and
this
was causing the developers problems so I cycled the CV and everything
was
fine after that?

I think that as Ed said it is a sorted index in memory and it probably
only
gets sorted when new entries are added?

When you change the first character of a program name it looks like
it's
throwing the search out of whack and IDMS starts creating new PDE's

Bill Allen
ARCH Consulting Associates, Ltd.

In a message dated 8/31/2007 2:00:05 A.M. Eastern Daylight Time,
luish@BR.IBM.COM writes:

This is a multipart message in MIME format.
--=_related 0020BFC383257348_=
Content-Type: multipart/alternative; boundary=""=_alternative
0020BFC383257348_=""


--=_alternative 0020BFC383257348_=
Content-Type: text/plain; charset=""US-ASCII""

Hi,

Thanks again for all comments, this is helping very much to
understand the problem.


At the beginning I had some dialogs sysgened and others not
sysgened.
Trying to solve this kind of problem I deleted all dialogs and
maps from sysgen.
Today I have no dialogs and maps sysgened, all dialogs and map
loads are dynamic. After that I receive less problems than before.

The problem I received before was:
When a program A call program B , program A receives a message that
program B not found. In fact one was loaded from default dictionary
and
the other was loaded from DICTDB. Both dictionaries shared the same
area
in my installation.


Yesterday I realize that we still with the same problem. The program
is
not abending because both copies are load from the same dictionary ( I
presume) but I can't understand why we have this 2 copies of the same
program from the same dictionary.

Trying to locate the program, i found this:

DCUF SET DICTNAME ''
IDMS DC402009 V56 DICTNAME HAS BEEN SET
V56 ENTER NEXT TASK CODE:

DCMT D PRO FSPA032M
IDMS DC262911 V56 PROGRAM FSPA032M NOT FOUND
V56 ENTER NEXT TASK CODE:
------

SET DICTNAME DICTDB
IDMS DC402009 V56 DICTNAME DICTDB HAS BEEN SET
V56 ENTER NEXT TASK CODE:


D PRO FSPA032M
Program Name FSPA032M Version 1
Type MAP Type DICTIONARY
Language ASM Dictname DICTDB
Size (bytes) 00006656 Dictnode
ISA size 00000000 Database key 00014963:015
Status ENABLED AND INSRV Storage Prot NO
Dynamic ALLOWED Residence IN POOL AT 1B926200
Reusable YES Threading CONCURRENT
Reentrant FULLY REENTRANT Overlayable NO
Tasks use ct 000 New Copy ENABLED
Times called 00000144 Times loaded 000007
PGM chk thrh 005 Pgm check ct 000
Dump thrh 000 Dump ct 000
Amode ANY Rmode ANY
PDE address 1C06D9A8 MPmode SYSTEM

Program Name FSPA032M Version 1
Type MAP Type DICTIONARY
Language ASM Dictname DICTDB
Size (bytes) 00006656 Dictnode
ISA size 00000000 Database key 00014963:015
Status ENABLED AND INSRV Storage Prot NO
Dynamic ALLOWED Residence IN POOL AT 1B905E00
Reusable YES Threading CONCURRENT
Reentrant FULLY REENTRANT Overlayable NO
Tasks use ct 000 New Copy ENABLED
Times called 00000356 Times loaded 000030
PGM chk thrh 005 Pgm check ct 000
Dump thrh 000 Dump ct 000
Amode ANY Rmode ANY
PDE address 1B061350 MPmode SYSTEM

V56 ENTER NEXT TASK CODE:

------------------------------------------------------------------------
------

This is my loadlist:

D LOADLIST
*** Loadlist Table Display for System 56 ***
System Loadlist SYSLOAD
Type Version Dictname/Dictnode

LOADLIST SYSLOAD Dict USER-DEF USER-DEF
Dict USER-DEF SYST-DEF
Loadlib USER-DEF
Dict 00001 USER-DEF
Dict 00001 SYST-DEF
Loadlib 00001
V56 ENTER NEXT TASK CODE:
------------------------------------------------------------------------
------
-
This is my DCMT D PRTo:

As Ed said, I don't have my PDEs in alphabetical order. P.S. The
X on PDE XSPA032M was changed for me using dcmt v mem command to
destroy the PDE loaded from default ('') dictionary.

P.S. May be this command was creating more problems because after
this X we have many duplicate dialogs in memory. ( I'm not sure about
that ).




************************************** Get a sneak peek of the all-new
AOL at
http://discover.aol.com/memed/aolcom30tour
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
offerings at IUA workshop ?
"will there be any 16.0 install/bridge classes offered at the IUA workshop
this fall ?




Chris Hoelscher
Senior IDMS & DB2 Database Administrator
Humana Inc
502-476-2538
choelscher@humana.com



The information transmitted is intended only for the person or entity to which it is addressed and may contain CONFIDENTIAL material. If you receive this material/information in error, please contact the sender and delete or destroy the material/information.
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: 2 PDE copies in memory
"Hello All:

I had this exact same problem one week ago and I am 1000% sure that it was
also created by doing a DCMT VARY MEM PDE PROGRAM and changing the first
character of the program name to an X.

After that I started getting 2 PDE's for a large number of programs and this
was causing the developers problems so I cycled the CV and everything was
fine after that?

I think that as Ed said it is a sorted index in memory and it probably only
gets sorted when new entries are added?

When you change the first character of a program name it looks like it's
throwing the search out of whack and IDMS starts creating new PDE's

Bill Allen
ARCH Consulting Associates, Ltd.

In a message dated 8/31/2007 2:00:05 A.M. Eastern Daylight Time,
luish@BR.IBM.COM writes:

This is a multipart message in MIME format.
--=_related 0020BFC383257348_=
Content-Type: multipart/alternative; boundary=""=_alternative
0020BFC383257348_=""


--=_alternative 0020BFC383257348_=
Content-Type: text/plain; charset=""US-ASCII""

Hi,

Thanks again for all comments, this is helping very much to
understand the problem.


At the beginning I had some dialogs sysgened and others not
sysgened.
Trying to solve this kind of problem I deleted all dialogs and
maps from sysgen.
Today I have no dialogs and maps sysgened, all dialogs and map
loads are dynamic. After that I receive less problems than before.

The problem I received before was:
When a program A call program B , program A receives a message that
program B not found. In fact one was loaded from default dictionary and
the other was loaded from DICTDB. Both dictionaries shared the same area
in my installation.


Yesterday I realize that we still with the same problem. The program is
not abending because both copies are load from the same dictionary ( I
presume) but I can't understand why we have this 2 copies of the same
program from the same dictionary.

Trying to locate the program, i found this:

DCUF SET DICTNAME ''
IDMS DC402009 V56 DICTNAME HAS BEEN SET
V56 ENTER NEXT TASK CODE:

DCMT D PRO FSPA032M
IDMS DC262911 V56 PROGRAM FSPA032M NOT FOUND
V56 ENTER NEXT TASK CODE:
------

SET DICTNAME DICTDB
IDMS DC402009 V56 DICTNAME DICTDB HAS BEEN SET
V56 ENTER NEXT TASK CODE:


D PRO FSPA032M
Program Name FSPA032M Version 1
Type MAP Type DICTIONARY
Language ASM Dictname DICTDB
Size (bytes) 00006656 Dictnode
ISA size 00000000 Database key 00014963:015
Status ENABLED AND INSRV Storage Prot NO
Dynamic ALLOWED Residence IN POOL AT 1B926200
Reusable YES Threading CONCURRENT
Reentrant FULLY REENTRANT Overlayable NO
Tasks use ct 000 New Copy ENABLED
Times called 00000144 Times loaded 000007
PGM chk thrh 005 Pgm check ct 000
Dump thrh 000 Dump ct 000
Amode ANY Rmode ANY
PDE address 1C06D9A8 MPmode SYSTEM

Program Name FSPA032M Version 1
Type MAP Type DICTIONARY
Language ASM Dictname DICTDB
Size (bytes) 00006656 Dictnode
ISA size 00000000 Database key 00014963:015
Status ENABLED AND INSRV Storage Prot NO
Dynamic ALLOWED Residence IN POOL AT 1B905E00
Reusable YES Threading CONCURRENT
Reentrant FULLY REENTRANT Overlayable NO
Tasks use ct 000 New Copy ENABLED
Times called 00000356 Times loaded 000030
PGM chk thrh 005 Pgm check ct 000
Dump thrh 000 Dump ct 000
Amode ANY Rmode ANY
PDE address 1B061350 MPmode SYSTEM

V56 ENTER NEXT TASK CODE:

------------------------------------------------------------------------------

This is my loadlist:

D LOADLIST
*** Loadlist Table Display for System 56 ***
System Loadlist SYSLOAD
Type Version Dictname/Dictnode

LOADLIST SYSLOAD Dict USER-DEF USER-DEF
Dict USER-DEF SYST-DEF
Loadlib USER-DEF
Dict 00001 USER-DEF
Dict 00001 SYST-DEF
Loadlib 00001
V56 ENTER NEXT TASK CODE:
------------------------------------------------------------------------------
-
This is my DCMT D PRTo:

As Ed said, I don't have my PDEs in alphabetical order. P.S. The
X on PDE XSPA032M was changed for me using dcmt v mem command to
destroy the PDE loaded from default ('') dictionary.

P.S. May be this command was creating more problems because after
this X we have many duplicate dialogs in memory. ( I'm not sure about
that ).




************************************** Get a sneak peek of the all-new AOL at
http://discover.aol.com/memed/aolcom30tour
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: 2 PDE copies in memory
"
Hi,

Thanks again for all comments, this is helping very much to understand the problem.


At the beginning I had some dialogs sysgened and others not sysgened.
Trying to solve this kind of problem I deleted all dialogs and maps from sysgen.
Today I have no dialogs and maps sysgened, all dialogs and map loads are dynamic. After that I receive less problems than before.

The problem I received before was:
When a program A call program B , program A receives a message that program B not found. In fact one was loaded from default dictionary and the other was loaded from DICTDB. Both dictionaries shared the same area in my installation.


Yesterday I realize that we still with the same problem. The program is not abending because both copies are load from the same dictionary ( I presume) but I can't understand why we have this 2 copies of the same program from the same dictionary.

Trying to locate the program, i found this:

DCUF SET DICTNAME ''
IDMS DC402009 V56 DICTNAME HAS BEEN SET
V56 ENTER NEXT TASK CODE:

DCMT D PRO FSPA032M
IDMS DC262911 V56 PROGRAM FSPA032M NOT FOUND
V56 ENTER NEXT TASK CODE:
------

SET DICTNAME DICTDB
IDMS DC402009 V56 DICTNAME DICTDB HAS BEEN SET
V56 ENTER NEXT TASK CODE:


D PRO FSPA032M
Program Name FSPA032M Version 1
Type MAP Type DICTIONARY
Language ASM Dictname DICTDB
Size (bytes) 00006656 Dictnode
ISA size 00000000 Database key 00014963:015
Status ENABLED AND INSRV Storage Prot NO
Dynamic ALLOWED Residence IN POOL AT 1B926200
Reusable YES Threading CONCURRENT
Reentrant FULLY REENTRANT Overlayable NO
Tasks use ct 000 New Copy ENABLED
Times called 00000144 Times loaded 000007
PGM chk thrh 005 Pgm check ct 000
Dump thrh 000 Dump ct 000
Amode ANY Rmode ANY
PDE address 1C06D9A8 MPmode SYSTEM

Program Name FSPA032M Version 1
Type MAP Type DICTIONARY
Language ASM Dictname DICTDB
Size (bytes) 00006656 Dictnode
ISA size 00000000 Database key 00014963:015
Status ENABLED AND INSRV Storage Prot NO
Dynamic ALLOWED Residence IN POOL AT 1B905E00
Reusable YES Threading CONCURRENT
Reentrant FULLY REENTRANT Overlayable NO
Tasks use ct 000 New Copy ENABLED
Times called 00000356 Times loaded 000030
PGM chk thrh 005 Pgm check ct 000
Dump thrh 000 Dump ct 000
Amode ANY Rmode ANY
PDE address 1B061350 MPmode SYSTEM

V56 ENTER NEXT TASK CODE:

------------------------------------------------------------------------------
This is my loadlist:

D LOADLIST
*** Loadlist Table Display for System 56 ***
System Loadlist SYSLOAD
Type Version Dictname/Dictnode

LOADLIST SYSLOAD Dict USER-DEF USER-DEF
Dict USER-DEF SYST-DEF
Loadlib USER-DEF
Dict 00001 USER-DEF
Dict 00001 SYST-DEF
Loadlib 00001
V56 ENTER NEXT TASK CODE:
-------------------------------------------------------------------------------
This is my DCMT D PRTo:

As Ed said, I don't have my PDEs in alphabetical order. P.S. The X on PDE XSPA032M was changed for me using dcmt v mem command to destroy the PDE loaded from default ('') dictionary.

P.S. May be this command was creating more problems because after this X we have many duplicate dialogs in memory. ( I'm not sure about that ).








Best Regards
Luis H.
IBM Global Services - VISTEON
=========================================



""Mckinney, Edward F"" <Edward.Mckinney@CA.COM>
Sent by: IDMS Public Discussion Forum <IDMS-L@LISTSERV.IUASSN.COM>

30/08/2007 15:04
Please respond to
IDMS Public Discussion Forum <IDMS-L@LISTSERV.IUASSN.COM>

To
IDMS-L@LISTSERV.IUASSN.COM
cc
Subject
Re: 2 PDE copies in memory







Hi all.. Steve may be correct - but these PDEs are not sysgenned I
believe.
Both the PDEs that Luis posted here were probably created when a MAP was
called for. They are not a result of a GENERATE of the MAP because the
date is 07/12/00 (2000). The PDEs do not look to be predefined in the
SYSGEN because PDENUL flag is set (PDENUL flag x'80' at offset '5E' in
the PDE).
It is a mystery how they could be exactly the same.
The PDT INDEX is sorted by Program name and SLE (LIBRARY DEFINITION
TABLE ELEMENT) and both these indexes are exactly the same - and that is
not allowed. It will eventually cause a corrupt index.
Perhaps the index is already completely corrupt. That's why a DCMT D PRO
will show the correct order and if there are many programs not in
alphabetical order, then there is a problem that could have occurred
long ago.
?
Regards, Ed McKinney

Outcomes