ca.portal.admin

Re: 2 copies in memory

Discussion created by ca.portal.admin on Aug 30, 2007
Looks to me like this program is defined as RESIDENT to the system. Do a
display in your sysgen and see if it's defined as resident. If you
execute it from a secondary dictionary/load area it will be loaded twice
in different locations.

HTH,
Steve Harmeson

________________________________

From: IDMS Public Discussion Forum [mailTo:IDMS-L@LISTSERV.IUASSN.COM]
On Behalf Of luish@BR.IBM.COM
Sent: Wednesday, August 29, 2007 11:50 AM
To: IDMS-L@LISTSERV.IUASSN.COM
Subject: Re: [IDMSVENDOR-L] Calling IDMSCOM
Importance: High



Hi,

I need to understand why I have 2 copies of the same program in
memory. Both are loaded from DICTDB and are exactly the same.
Both copies are in use and the times called is growing for both
copies.

We are at 15.0.

The program is a MAP and REUSABLE.

Could someone point me the pages to read about this or explain
something about that ?


From sysgen manual:
REUSable
Specifies the program can be executed repeatedly. When a request to load
the
program is issued, the system will load a copy of the program from
external
storage only if no copy exists in the program pool.







Thanks in advance.

Luis H.
IBM - VISTEON
=========================================
"
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 copies in memory
"If the pde is flagged as resident, then it must have been sysgenned in a
program statemement. Make sure the program statement is sysgenned with
the dictname parm pointing to the dictionary containing the map load
module. You have two pde's because of your loadlist search, and the
fact that the idms loader found a module in a dictionary ahead of the
sysgenned one satisfying the search criteria. That, and the fact that
you have dynamic pde building enabled. My conclusion is that you have
the map loadmodule in two places. Either in two different dictionaries,
or more likely, in a loadlib and a dictionary. Get online and do a dcmt
d pro. Then find the occurance of the program name. You should have two
entries as dcmt d pro walks the chain of pdes. If you want detail, then
do a 'look' command on the program name, version, dictionary that the
pde's say (not what think it should be). This will give you the detail
as to where the module got loaded from, etc. Then simply remove one
occurance and make sure that the sysgenned program defines the occurance
that you plan to use. By the way, OLM can dynamically build a pde when
a map is generated and a pde with the exact search criteria does not
exist. So if your developers generated a map from a different
dictionary then your sysgen program statement says, then you will have
another pde occurance of that map.

Lutz Petzold

This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna
"
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 copies in memory
"Looks to me like this program is defined as RESIDENT to the system. Do a
display in your sysgen and see if it's defined as resident. If you
execute it from a secondary dictionary/load area it will be loaded twice
in different locations.

HTH,
Steve Harmeson

________________________________

From: IDMS Public Discussion Forum [mailTo:IDMS-L@LISTSERV.IUASSN.COM]
On Behalf Of luish@BR.IBM.COM
Sent: Wednesday, August 29, 2007 11:50 AM
To: IDMS-L@LISTSERV.IUASSN.COM
Subject: Re: [IDMSVENDOR-L] Calling IDMSCOM
Importance: High



Hi,

I need to understand why I have 2 copies of the same program in
memory. Both are loaded from DICTDB and are exactly the same.
Both copies are in use and the times called is growing for both
copies.

We are at 15.0.

The program is a MAP and REUSABLE.

Could someone point me the pages to read about this or explain
something about that ?


From sysgen manual:
REUSable
Specifies the program can be executed repeatedly. When a request to load
the
program is issued, the system will load a copy of the program from
external
storage only if no copy exists in the program pool.







Thanks in advance.

Luis H.
IBM - VISTEON
=========================================
"
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 copies in memory
"I did some tests. The first PDE (16937CE4) was created using dcmt vary
dynamic program SCHEDM06 map without specifying the dictname. This
program PDE shows Ddname CDMSLIB and Type LOADLIB. I then execute the
dialog. The map is loaded from JISDICT to create a new PDE (16937EEC). I
then issue dcmt vary dynamic program jisdict.schedm06 map which I
imagine would use the first PDE created dynamically. Instead if I issue
dcmt dis program jisdict.schedm06 it shows another PDE (16937BE0) is
used. The PDE creaded when the dialog is executed is the only one
showing the map is loaded in the pool, also confirmed by look
program=schedm06. Now I am confused

, V D PROG SCHEDM06 MAP .
IDMS DC273001 V6 USER:QZHJT7 Program SCHEDM06 Added
V10 Release 16.0 SP3 >>> EDS DBA Research CV <<< Enter next task:

D PROG SCHEDM06
Program Name SCHEDM06 Ddname CDMSLIB
Type MAP Type LOADLIB
Language ASM Dictname
Size (bytes) 00000000 Dictnode
ISA size 00000000 Database key NOT IN DICT
Status DISABLED AND OUTSRV Storage Prot YES
Dynamic ALLOWED Residence NOT IN POOL
Reusable YES Threading CONCURRENT
Reentrant FULLY REENTRANT Overlayable YES
Tasks use ct 000 New Copy ENABLED
Times called 00000000 Times loaded 000000
PGM chk thrh 005 Pgm check ct 000
Dump thrh 000 Dump ct 000
Amode Rmode
PDE address 16937CE4 MPmode SYSTEM
Savearea NO Mult Enclave

Program Name SCHEDM06 Version 1
Type MAP Type DICTIONARY
Language ASM Dictname
Size (bytes) 00003200 Dictnode
ISA size 00000000 Database key 00101050:026
Status ENABLED AND INSRV Storage Prot YES
Dynamic ALLOWED Residence IN POOL AT 1729E800
Reusable YES Threading CONCURRENT
Reentrant FULLY REENTRANT Overlayable NO
Tasks use ct 000 New Copy ENABLED
Times called 00000006 Times loaded 000001
PGM chk thrh 005 Pgm check ct 000
Dump thrh 000 Dump ct 000
Amode ANY Rmode ANY
PDE address 16937EEC MPmode SYSTEM
Savearea NO Mult Enclave

V10 Release 16.0 SP3 >>> EDS DBA Research CV <<< Enter next task:

, V D PROGRAM JISDICT.SCHEDM06 MAP .
IDMS DC273001 V10 USER:QZHJT7 Program SCHEDM06 Dictname JISDICT
Modified
V10 Release 16.0 SP3 >>> EDS DBA Research CV <<< Enter next task:

, PROGRAM=SCHEDM06
IDMSLOOK - OPSYS=z/OS Release 16.0 Tape G0GJ3M
PROGRAM=SCHEDM06

SCHEDM06 was #LOADed From --> JISDICT
Entry Point Offset +0 - Reentrant - AMODE 31 - RMODE ANY
3,200 Bytes in Load Module SCHEDM06 loaded at 1729E800

Module Offset Date Time

SCHEDM06 +0 040924 1423

1729E800 +0 E2C3C8C5 C4D4F0F6 F0F961F2 F461F0F4 SCHEDM0609/24/04
1729E810 +10 F1F4F2F3 F3F9D9F2 00000000 00000000 142339R2........
1729E820 +20 00000C68 00000C68 00000C68 00000000 ................
1729E830 +30 00000C68 00000000 00000C78 00000C78 ................
1729E840 +40 00290050 0A000000 00000000 00000000 ...&............
1729E850 +50 00000000 D4C1D760 E2C3C8C5 C4D4F0F6 ....MAP-SCHEDM06
1729E860 +60 40404040 40404040 40404040 40404040
1729E870 +70 40404040 E6D6D9D2 60E2C3C8 C5C4C4F0 WORK-SCHEDD0
1729E880 +80 F6404040 40404040 40404040 40404040 6
1729E890 +90 40404040 C1C4E2D6 60C1D7D7 D3C9C3C1 ADSO-APPLICA
1729E8A0 +A0     E3C9D6D5 60C7D3D6 C2C1D360 D9C5C3D6 TION-GLOBAL-RECO

, D PROG JISDICT.SCHEDM06
Program Name SCHEDM06 Version 1
Type MAP Type DICTIONARY
Language ASM Dictname JISDICT
Size (bytes) 00003200 Dictnode
ISA size 00000000 Database key 00101050:026
Status ENABLED AND INSRV Storage Prot YES
Dynamic ALLOWED Residence NOT IN POOL
Reusable YES Threading CONCURRENT
Reentrant FULLY REENTRANT Overlayable YES
Tasks use ct 000 New Copy ENABLED
Times called 00000012 Times loaded 000004
PGM chk thrh 005 Pgm check ct 000
Dump thrh 000 Dump ct 000
Amode ANY Rmode ANY
PDE address 16937BE0 MPmode SYSTEM
Savearea NO Mult Enclave

V10 Release 16.0 SP3 >>> EDS DBA Research CV <<< Enter next task:

Regards,
Paul Mak
EDS | Australia ADU | Data Engineering Capability - DBA |
Level 1, 36-46 George Street, Burwood, NSW 2134 |
Office: +61 2 9012 5434 | Mobile: +61 419 398 116 |
Fax: +61 2 9012 6707 | Email: paul.mak@eds.com |

Outcomes