ca.portal.admin

Re: IDMSRSTT Macro Statements for Restructure

Discussion created by ca.portal.admin on Jun 2, 2005
Carol,

Because you are adding the two bytes in front of the field the xl2'0' is
correct. You want to add x'0000', pl2'0' would add x'000c'.
Instead of having a user-written program, you should consider writing an
exit for your restructure to handle the conversion.

Tommy Petersen
110 Cokesbury Rd
Room 542H
Lebanon, NJ 08833

Phone:
Internal 200 - 3699
External (908) 236-3699
Fax: (908) 236-3692




""McLaughlin,
Carol@EDD""
<CMcLaugh@EDD.CA. To
GOV> IDMS-L@LISTSERV.IUASSN.COM
Sent by: IDMS cc
Public Discussion
Forum Subject
<IDMS-L@LISTSERV. IDMSRSTT Macro Statements for
IUASSN.COM> Restructure


06/02/2005 04:29
AM


Please respond to
IDMS Public
Discussion Forum
<IDMS-L@LISTSERV.
IUASSN.COM>






Hello,

We have a change to the database asking that we add 2 bytes of dollars and
2
bytes of cents to an element that is currently 9 bytes of dollars and no
cents:

Change From:

PIC S9(09) COMP-3

Change To:

PIC S9(11)V99 COMP-3



The data will need to run through the RESTRUCTURE and a user-written
program
will then need to shift the contents to the left as the RESTRUCTURE will
shift the dollars to the right.

My question is that in Appendix B of the CA-IDMS Utilities manual on page
B-13 IDMSRSTT Macro Statements it says, ""For new fields that have not been
assigned an initial value in the NEW schema, IDMSRSTC supplies an initial
value based on the usage specification in the schema, as follows:

Usage Initial Value
COMP(BINARY) XLx'0'
COMP-3(PACKED) PLx'0'

The IDMSRSTC schema compare utility that creates the IDMSRSTT macro
statements generated a XL2'0' for a COMP-3 field rather than the PL2'0'.
Will the RESTRUCTURE of the data be correct leaving the IDMSRSTT as XL2'0'
or should we change the statement to PL2'0'?

IDMSRSTT FIELD=(XL2'0',72,2,NEW) INIT 3006-UI-TAXBL-WAGE-REPTD-AMT
00000186<?xml:namespace prefix = o ns =
""urn:schemas-microsoft-com:office:office"" />

IDMSRSTT FIELD=(72,74,5) COPY 3006-UI-TAXBL-WAGE-REPTD-AMT
00000187



Carol McLaughlin
Production & Operations Management Division
Information Management Systems Section

Database Group
IDMS Support

"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: [IDMSVENDOR-L] ADSA/OLH Issue
"Thanks to Chris Hoelscher and Mike Yetto. As Jimmy Buffett said, 'it's so
simple, it plumb evaded me'. They're trying it out, but sounds like it
should work.

Linda Campbell

Outcomes