MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Editing Packed Decimal data in File manager

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
misi01
Advanced


Joined: 02 Dec 2002
Posts: 616
Topics: 171
Location: Stockholm, Sweden

PostPosted: Wed May 17, 2023 9:52 am    Post subject: Editing Packed Decimal data in File manager Reply with quote

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 ?
_________________
Michael
Back to top
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12365
Topics: 75
Location: San Jose

PostPosted: Wed May 17, 2023 5:09 pm    Post subject: Reply with quote

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.
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
misi01
Advanced


Joined: 02 Dec 2002
Posts: 616
Topics: 171
Location: Stockholm, Sweden

PostPosted: Thu May 18, 2023 8:18 am    Post subject: Reply with quote

Thanks - I'll try that tomorrow at work.
_________________
Michael
Back to top
View user's profile Send private message Send e-mail
misi01
Advanced


Joined: 02 Dec 2002
Posts: 616
Topics: 171
Location: Stockholm, Sweden

PostPosted: Fri May 19, 2023 12:49 am    Post subject: Reply with quote

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?
_________________
Michael
Back to top
View user's profile Send private message Send e-mail
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group