Hi Glenn,
Yes, the skeleton program you provided definitely helped me structure my program properly and use the reference modification/navigate the decimal point.
Looking at it now - it's not as complex as I first thought thanks to everyones advice. Getting more and more used to this verbose...
Hi Guys,
Sorry for the slow reply.
the first VSAM contains the records like so:
KEY DATA
CLAUAP1H, N0002640000000000000...
CLAUAP2H, N0002640000000000000...
etc...
the second VSAM contains
key start pos length data type in this position
CLBC0009, 0046 0003 S999V99...
After taking these posts into consideration I think my main problem is that the input packed decimal is in a character string.
I need to move this to an S9 of the appropriate size, which can vary from record to record, so that it becomes 'unpacked', and then move the unpacked S9 to my...
I should have mentioned that I have a separate VSAM file that contains the PIC description of the field i'm reading in. So say my current read in data is 'xxx' then I also have a variable telling me that it's pic is 'PIX x(3)'
cheers!
Good evening folks.
This is a real peach....
Consider this problem: an input string from a VSAM file is a packed decimal of one of the following forms:
S9...9V9...9
S9...9V9(#)
S9(#)V9...9
S9(#)V9(#)
where # is 1 to 9 and s9...9 will at most be nine 9's.
What I'm trying to do is unpack this...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.