MVSFORUMS.com :: View topic - Editing Packed Decimal data in File manager

Editing Packed Decimal data in File manager

through

[^/[Print]\]

MVSFORUMS.com -> TSO and ISPF

#1: Editing Packed Decimal data in File manager Author: misi01, Location: Stockholm, Sweden

Posted: Wed May 17, 2023 9:52 am
—
Probably its too much to ask, but you never know.

I use File Manager IMS a lot to browse/edit an IMS database. A lot of them have packed fields so to be able to dive right in at the correct root segment, I have to "convert" the root key to its packed equivalent. For example, for an SSN number of, say, 98855004530, I have to enter the hex on command, and then paste in the value

Quote:

985050
85043C

into the key value field. The relevant panel is FMN1PE7 and it would be neat if I could simply run a Rexx script that "converts" the input value to the correct hex value and then pasted it into the relevant field.

Any ideas/suggestions ?

#2: Author: kolusu, Location: San Jose

Posted: Wed May 17, 2023 5:09 pm
—
misi01,

In edit/View mode use FORMAT LHEX (top right corner) and the data is now shown in Horizontal way rather than vertical way(hex on). Now you can just copy the numeric data as is and adjust the Sign value which on the last byte

Also you don't need a rexx exec to convert the numbers to packed format.

Look up the command DX and XD

https://www.ibm.com/docs/en/file-manager-for-zos/14.1?topic=interface-using-hexadecimal-values-in-file-manager

PS: Please use meaningful topics (don't use the Program name/ language/forum name for the topic). Use a descriptive Title to explain your problem.

#3: Author: misi01, Location: Stockholm, Sweden

Posted: Thu May 18, 2023 8:18 am
—
Thanks - I'll try that tomorrow at work.

#4: Author: misi01, Location: Stockholm, Sweden

Posted: Fri May 19, 2023 12:49 am
—
That didn't seem to work (or, more likely, I misunderstood what you meant).

I started FMI and selected option browse. On panel FMN1PB1, I specified my database name and the view member. Pressed enter.
On the following panel, the insurance number is shown as the key value for the root segment. This is a packed, 6 byte field (shown as 6 positions).
I entered LHEX in the format field in the top right-hand corner.
I was expecting the key value field to change from a 6 character input field to a 12 character field, but that didn't happen.

I then tried entering (wasn't sure what to expect as a result) the command

Quote:

dx 61523706006

but received the message "Value out of range".

What am I missing?

MVSFORUMS.com -> TSO and ISPF

output generated using printer-friendly topic mod. All times are GMT - 5 Hours

Page 1 of 1