Does anyone have JCL to assemble and link the CTABGEN macro outside of
SMP? A copy would be greatly appreciated.
Tia,
Bob
Bob Wiklund
Tiburon Technologies
623 594-6022
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
Re: CTABGEN
"Thanks to all who responded!
=20
Naturally, as soon as I sent the email looking for a copy, I found one =
in a totally unrelated library....ARGGGGHHHHH!!!
=20
Bob Wiklund
Tiburon Technologies
623 594-6022
________________________________
From: IDMS 3rd-party providers forum on behalf of Bob Wiklund
Sent: Tue 10/27/2009 12:04 PM
To:
IDMSVENDOR-L@LISTSERV.IUASSN.COM
Subject: CTABGEN
Does anyone have JCL to assemble and link the CTABGEN macro outside of =
=3D
SMP? A copy would be greatly appreciated.
=3D20
Tia,
=3D20
Bob
=3D20
Bob Wiklund
Tiburon Technologies
623 594-6022
______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit
http://www.messagelabs.com/email
______________________________________________________________________
______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit
http://www.messagelabs.com/email
______________________________________________________________________
"
IDMS 3rd-party providers forum
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
IDMSVENDOR-L@LISTSERV.IUASSN.COM
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
Re: CTABGEN
"Thanks to all who responded!
Naturally, as soon as I sent the email looking for a copy, I found one in a totally unrelated library....ARGGGGHHHHH!!!
Bob Wiklund
Tiburon Technologies
623 594-6022
________________________________
From: IDMS 3rd-party providers forum on behalf of Bob Wiklund
Sent: Tue 10/27/2009 12:04 PM
To:
IDMSVENDOR-L@LISTSERV.IUASSN.COM
Subject: CTABGEN
Does anyone have JCL to assemble and link the CTABGEN macro outside of =
SMP? A copy would be greatly appreciated.
=20
Tia,
=20
Bob
=20
Bob Wiklund
Tiburon Technologies
623 594-6022
______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit
http://www.messagelabs.com/email
______________________________________________________________________
______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit
http://www.messagelabs.com/email
______________________________________________________________________
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
XA REENTRANT PROGRAM POOL SIZE
"Gary,=20
Better check your math. Your pool is exactly 64 MB. 1MB =3D 1,048,576
bytes.
John
-------------------
Date: Tue, 27 Oct 2009 20:40:52 +1030
=46From: ""Cherlet, Gary (JTS)"" <
Gary.Cherlet@SA.GOV.AU>
Subject: FW: XA REENTRANT PROGRAM POOL SIZE
As you can see from the following display our XA Reentrant Pool is
66,867,200 bytes ( approx 67 Mb) and we have no problems.=20
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
P Please consider the environment before printing this e-mail
Cleveland Clinic is ranked one of the top hospitals
in America by U.S. News & World Report (2008). =20
Visit us online at
http://www.clevelandclinic.org for
a complete listing of our services, staff and
locations.
Confidentiality Note: This message is intended for use
only by the individual or entity to which it is addressed
and may contain information that is privileged,
confidential, and exempt from disclosure under applicable
law. If the reader of this message is not the intended
recipient or the employee or agent responsible for
delivering the message to the intended recipient, you are
hereby notified that any dissemination, distribution or
copying of this communication is strictly prohibited. If
you have received this communication in error, please
contact the sender immediately and destroy the material in
its entirety, whether electronic or hard copy. Thank you.
"
IDMS 3rd-party providers forum
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
IDMSVENDOR-L@LISTSERV.IUASSN.COM
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
XA REENTRANT PROGRAM POOL SIZE
"Gary,
Better check your math. Your pool is exactly 64 MB. 1MB = 1,048,576
bytes.
John
-------------------
Date: Tue, 27 Oct 2009 20:40:52 +1030
From: ""Cherlet, Gary (JTS)"" <
Gary.Cherlet@SA.GOV.AU>
Subject: FW: XA REENTRANT PROGRAM POOL SIZE
As you can see from the following display our XA Reentrant Pool is
66,867,200 bytes ( approx 67 Mb) and we have no problems.
===================================
P Please consider the environment before printing this e-mail
Cleveland Clinic is ranked one of the top hospitals
in America by U.S. News & World Report (2008).
Visit us online at
http://www.clevelandclinic.org for
a complete listing of our services, staff and
locations.
Confidentiality Note: This message is intended for use
only by the individual or entity to which it is addressed
and may contain information that is privileged,
confidential, and exempt from disclosure under applicable
law. If the reader of this message is not the intended
recipient or the employee or agent responsible for
delivering the message to the intended recipient, you are
hereby notified that any dissemination, distribution or
copying of this communication is strictly prohibited. If
you have received this communication in error, please
contact the sender immediately and destroy the material in
its entirety, whether electronic or hard copy. Thank you.
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
Re: Technique for changed a chained set to sorted chained set
"i do not know if altering the set followed by an unload/reload would
work but
being a one-time thing - you could do the following:
disconnect all members from all set occurrances (using a temp schema if
necessary), saving off owner symbolic key, member (new) symbolic key,
member dbkey
make schema change
sort output file by owner symbolic key (ascending) , member symbolic
key (descending)
for each record in sorted extract file
find xxxxx dbkey is
connect to xxxxxxxx set
this would allow to to build the set from back to front for each set
occurrance
others can enhance this - just something i thought of off the top of my
head at halftime
GO BUCKEYES!!!!!
William M. Allen, Jr. wrote:
Hello All:
Can you share with me your method for converting a chained set to a sorted
chained set?
William M. Allen, Jr.
ARCH Consulting Associates, Ltd.
(704) 641-0296
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
Re: Technique for changed a chained set to sorted chained set
"i do not know if altering the set followed by an unload/reload would
work but
being a one-time thing - you could do the following:
disconnect all members from all set occurrances (using a temp schema if
necessary), saving off owner symbolic key, member (new) symbolic key,
member dbkey
make schema change
sort output file by owner symbolic key (ascending) , member symbolic
key (descending)
for each record in sorted extract file
find xxxxx dbkey is
connect to xxxxxxxx set
this would allow to to build the set from back to front for each set
occurrance
others can enhance this - just something i thought of off the top of my
head at halftime
GO BUCKEYES!!!!!
William M. Allen, Jr. wrote:
Hello All:
Can you share with me your method for converting a chained set to a sorted
chained set?
William M. Allen, Jr.
ARCH Consulting Associates, Ltd.
(704) 641-0296
"
IDMS 3rd-party providers forum
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
IDMSVENDOR-L@LISTSERV.IUASSN.COM
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
Technique for changed a chained set to sorted chained set
"Hello All:
Can you share with me your method for converting a chained set to a sorted
chained set?
William M. Allen, Jr.
ARCH Consulting Associates, Ltd.
(704) 641-0296
"
IDMS 3rd-party providers forum
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
IDMSVENDOR-L@LISTSERV.IUASSN.COM
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
Technique for changed a chained set to sorted chained set
"Hello All:
Can you share with me your method for converting a chained set to a sorted
chained set?
William M. Allen, Jr.
ARCH Consulting Associates, Ltd.
(704) 641-0296
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
Re: Technique for changed a chained set to sorted chained set
"This is a multi-part message in MIME format.
------_=_NextPart_001_01CA5B8A.73E66637
Content-Type: text/plain;
charset=""US-ASCII""
Content-Transfer-Encoding: quoted-printable
Trying to attach programs here
UDMSMDIS ( Disconnect the members and store in flat file with DBKeys)
UDMSRCON ( Reconnect members using flatfile with DBKEYs)
#FMODJPA ( macro called by MDIS & RCON to find subschema in JPA during
runtime, so the set option can be dynamically set to Optional from
Mandatory -- so no new schema/subschema needed).
* extract record format...
DBCBUF DSECT ,
DBCXLN DS H EXTRACT REC LENGTH
DS H FILLER
DBCRID DS H SCHEMA RID
DBCREC DS 9H RECORD NAME (MAX PRACTICAL)
DBCDBK DS F SOURCE DB DBKEY (OR ~F-O,~CON)
DBCPFXL EQU *-DBCBUF DBC RECORD PREFIX LENGTH
DBCDATA DS 999F AMPLE SPACE
*
Vary DB OFF/RET=20
Execute MDIS=20
Modify Schema
Restructure DB (If needed (converting to Index, not sorted set))
Execute RCON
Vary DB ON
Regards,
dem