ca.portal.admin

Re:JDBC/ODBC

Discussion created by ca.portal.admin on Apr 4, 2009
Is anyone using the JDBC/ODBC Bridge to access IDMS information?

If so how are you using it?
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
a few quickie jobs to help (maybe) with your 17.0 conversion ....
"if you want to add dataset names to your DMCL jourmal definitions later -
but would like to expand them to the 17.0-expected length during your
conversion - here is program to build the corrective DDL
DATABASE DICTNAME=SYSDIRL DBNAME=SYSTEM
IN 3000 F DB(D) SS=IDMSNWKG,IDMSNTWK
PATH01 JOURNAL-1043
01SORT DMCL-1043 NAME-1043
01OUT 080 D PS DD=OFA
01510001 'ALTER DISK JOURNAL '
01510023 DMCL-1043 SZ=008
01510031 '.'
01510032 NAME-1043 SZ=018
01510050 ';'
01520001 'ALTER ARCHIVE JOURNAL '
01520023 DMCL-1043 SZ=008
01520031 '.'
01520032 NAME-1043 SZ=018
01520050 ';'
017 IF TYPE-1043 = 'AR' 020
017 B 010
017 DROP
017010 TAKE 1
017020 TAKE 2

also - if you have never applied the fix to catch symbolic definitions
with index displacement larger that the # pages in the area - here is
program to build the corrective DDL

DATABASE DICTNAME=SYSDIRL DBNAME=SYSTEM
IN 3000 F DB(D) SS=IDMSNWKG,IDMSNTWK
PATH01 AREA-1026 SYMBOL-1048
010 TEMP-VALUE 0
01SORT SEGMENT-1048 AREA-1048 NAME-1048
01OUT 080 D PS DD=OFA
01510001 ' ALTER'
01520001 ' PHYSICAL AREA '
01520020 SEGMENT-1048
01520028 '.'
01520029 AREA-1048
01530001 ' INCLUDE SYMBOLIC INDEX '
01530033 NAME-1048
01540001 ' BLOCK CONTAINS '
01540029 VALUE1-1048 FM '999'
01540033 'KEYS DISPLACEMENT '
01540051 TEMP-VALUE FM '99999'
01540057 'PAGES'
01550001 ' ;'
017 IF TYPE-1048 NE 3 DROP
017 IF NUMPAGES-1026 GT VALUE2-1048 DROP
017 NUMPAGES-1026 - 1 TEMP-VALUE


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 3rd-party providers forum
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
IDMSVENDOR-L@LISTSERV.IUASSN.COM
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
a few quickie jobs to help (maybe) with your 17.0 conversion ....
"if you want to add dataset names to your DMCL jourmal definitions later -
but would like to expand them to the 17.0-expected length during your
conversion - here is program to build the corrective DDL
DATABASE DICTNAME=SYSDIRL DBNAME=SYSTEM
IN 3000 F DB(D) SS=IDMSNWKG,IDMSNTWK
PATH01 JOURNAL-1043
01SORT DMCL-1043 NAME-1043
01OUT 080 D PS DD=OFA
01510001 'ALTER DISK JOURNAL '
01510023 DMCL-1043 SZ=008
01510031 '.'
01510032 NAME-1043 SZ=018
01510050 ';'
01520001 'ALTER ARCHIVE JOURNAL '
01520023 DMCL-1043 SZ=008
01520031 '.'
01520032 NAME-1043 SZ=018
01520050 ';'
017 IF TYPE-1043 = 'AR' 020
017 B 010
017 DROP
017010 TAKE 1
017020 TAKE 2

also - if you have never applied the fix to catch symbolic definitions
with index displacement larger that the # pages in the area - here is
program to build the corrective DDL

DATABASE DICTNAME=SYSDIRL DBNAME=SYSTEM
IN 3000 F DB(D) SS=IDMSNWKG,IDMSNTWK
PATH01 AREA-1026 SYMBOL-1048
010 TEMP-VALUE 0
01SORT SEGMENT-1048 AREA-1048 NAME-1048
01OUT 080 D PS DD=OFA
01510001 ' ALTER'
01520001 ' PHYSICAL AREA '
01520020 SEGMENT-1048
01520028 '.'
01520029 AREA-1048
01530001 ' INCLUDE SYMBOLIC INDEX '
01530033 NAME-1048
01540001 ' BLOCK CONTAINS '
01540029 VALUE1-1048 FM '999'
01540033 'KEYS DISPLACEMENT '
01540051 TEMP-VALUE FM '99999'
01540057 'PAGES'
01550001 ' ;'
017 IF TYPE-1048 NE 3 DROP
017 IF NUMPAGES-1026 GT VALUE2-1048 DROP
017 NUMPAGES-1026 - 1 TEMP-VALUE


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
SET IDMS-L MAIL
"> SET IDMS-L MAIL
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Upgrade question
"I would like to get other people's opinion on this question:
When upgrading to a new release of IDMS, which is the better policy - apply=
ing all published APAR's, or applying only HYPER APAR's? It seems to me th=
at you are taking some risks either way.

Kay Rozeboom
State of Iowa
Information Technology Enterprise
Department of Administrative Services
Telephone: 515.281.6139 Fax: 515.281.6137
Email: Kay.Rozeboom@Iowa.Gov
"
IDMS 3rd-party providers forum
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
IDMSVENDOR-L@LISTSERV.IUASSN.COM
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Upgrade question
"I would like to get other people's opinion on this question:
When upgrading to a new release of IDMS, which is the better policy - applying all published APAR's, or applying only HYPER APAR's? It seems to me that you are taking some risks either way.

Kay Rozeboom
State of Iowa
Information Technology Enterprise
Department of Administrative Services
Telephone: 515.281.6139 Fax: 515.281.6137
Email: Kay.Rozeboom@Iowa.Gov
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: Upgrade question
"I like To:=20
1. apply all apars published on install;
2. test throughly
3. put into production
4. Apply hyper apars and site specific only


Dick

Richard Pierce
(617) 973-8911
richard.pierce@state.ma.us

Outcomes