IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Identifying Packed Decimal data in a dataset


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sojivarkey

New User


Joined: 07 Dec 2019
Posts: 1
Location: USA

PostPosted: Sat Dec 07, 2019 5:36 am
Reply with quote

Hi,

I'm working on a project where we have to move around 300K datasets to a Cloud location. Many of these datasets contain packed Decimal data but identifying the copybooks for all these 300K datasets is going to take forever. My question is , is there any tool or utility available that will tell me if a particular dataset has any COMP-3 data in it. If I can have the datasets with COMP-3 data identified, I can just focus on those datasets alone to pick a copybook rather than looking for 300K datasets.

Any help is much appreciated.

Thank You
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8700
Location: Dubuque, Iowa, USA

PostPosted: Sat Dec 07, 2019 9:10 am
Reply with quote

There is no way to tell if data is packed decimal without an external reference. X'97994D' could be "pr(" if it is character data but it could be packed decimal -97994. Which is correct? Only a program or copy book can tell you.
Back to top
View user's profile Send private message
Phrzby Phil

Senior Member


Joined: 31 Oct 2006
Posts: 1042
Location: Richmond, Virginia

PostPosted: Sun Dec 08, 2019 1:58 am
Reply with quote

A few ideas here from a retiree who can therefore no longer test these ideas.

Perhaps a (small?) number of datasets could be confirmed as to not having packed decimal data if they have no nybbles containing valid rightmost nybble values in the same positions of all records.

Datasets with variable length records would be a problem.

I don't remember if all low-values (so rightmost byte x'00') is handled as zero for certain arithmetic operations. If so that would be a problem.

Spaces (x'40') in what should be packed decimal fields would also cause an analysis problem if programs know that can happen and check for numeric before using such fields, so some records might have x'40' in a rightmost byte where other records show packed decimal.
Back to top
View user's profile Send private message
sergeyken

Senior Member


Joined: 29 Apr 2008
Posts: 2119
Location: USA

PostPosted: Mon Dec 09, 2019 9:02 pm
Reply with quote

sojivarkey wrote:
Hi,

I'm working on a project where we have to move around 300K datasets to a Cloud location. Many of these datasets contain packed Decimal data but identifying the copybooks for all these 300K datasets is going to take forever. My question is , is there any tool or utility available that will tell me if a particular dataset has any COMP-3 data in it. If I can have the datasets with COMP-3 data identified, I can just focus on those datasets alone to pick a copybook rather than looking for 300K datasets.

Any help is much appreciated.

Thank You

How do you plan to check "around 300K datasets" in TSO/ISPF environment (as per the forum you have chosen)?
Back to top
View user's profile Send private message
sergeyken

Senior Member


Joined: 29 Apr 2008
Posts: 2119
Location: USA

PostPosted: Mon Dec 09, 2019 9:09 pm
Reply with quote

In general, it is possible only to detect the "text-only uppercase only" datasets.

All other types of data can be anything; cannot detect without a copybook.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts External data queue (changes?) CLIST & REXX 0
No new posts Pull data using date difference betwe... DB2 6
No new posts fast data scrambling PL/I & Assembler 10
No new posts small int to zoned decimal conversion DFSORT/ICETOOL 3
No new posts Reading Empty Dataset DFSORT/ICETOOL 5
Search our Forums:

Back to Top