Portal | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Identifying Packed Decimal data in a dataset

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
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    Post subject: Identifying Packed Decimal data in a dataset
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: 8560
Location: Dubuque, Iowa, USA

PostPosted: Sat Dec 07, 2019 9:10 am    Post subject:
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: 1010
Location: Richmond, Virginia

PostPosted: Sun Dec 08, 2019 1:58 am    Post subject:
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

Active Member


Joined: 29 Apr 2008
Posts: 825
Location: Maryland

PostPosted: Mon Dec 09, 2019 9:02 pm    Post subject: Re: Identifying Packed Decimal data in a dataset
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

Active Member


Joined: 29 Apr 2008
Posts: 825
Location: Maryland

PostPosted: Mon Dec 09, 2019 9:09 pm    Post subject:
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    IBMMAINFRAMES.com Support Forums -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts To convert numeric to Packed Decimal vinu78 DFSORT/ICETOOL 9 Fri Jul 31, 2020 7:14 pm
No new posts Extract part of data from file and wr... sathyajes DFSORT/ICETOOL 9 Thu Jul 16, 2020 10:49 am
No new posts Fetch the Dataset names from inside m... kalyan94 TSO/ISPF 18 Wed Jun 17, 2020 2:06 pm
No new posts Write 9(07) comp-3 data into output file clearskynot DFSORT/ICETOOL 4 Thu Apr 16, 2020 11:00 pm
No new posts what is the DSORG(Datset orgnisation)... sandeep prajapati JCL & VSAM 8 Mon Mar 30, 2020 9:09 pm

Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us