Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to test the comp-3 data.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
ramanatcs

New User


Joined: 23 Dec 2008
Posts: 7
Location: Bangalore

PostPosted: Tue Jan 13, 2009 6:13 pm    Post subject: How to test the comp-3 data.
Reply with quote

A Cobol Program populating the data from a table into a file. The file contains COMP-3 data items. It contains the junk data in the file. How to test the comp-3 values, whether the data written to the file is same or different. Simply By looking into the file we can not understand the comp-3 filelds data.
The data in the file looks like
country{!'hýåf........
How to test the data after country which is in comp-3 items.
Back to top
View user's profile Send private message

acevedo

Active User


Joined: 11 May 2005
Posts: 344
Location: Spain

PostPosted: Tue Jan 13, 2009 6:32 pm    Post subject:
Reply with quote

view/edit your file and type HEX ON.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8117
Location: East Dubuque, Illinois, USA

PostPosted: Tue Jan 13, 2009 6:57 pm    Post subject:
Reply with quote

Quote:
How to test the data after country which is in comp-3 items.
I'm sure this is clear to you -- but what are you talking about? Do you want to use a COBOL test like an IF statement? Do you want to see the value of the data (HEX ON in ISPF) in the file? Same or different than what?
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Jan 13, 2009 7:39 pm    Post subject:
Reply with quote

Hi,

Do you have file-aid at your shop, if yes - create a COPYBOOK for the file & open it with that copybook. (FILE-AID BROWSE (F.1) or F.2 to edit)

If you don't have file aid - in your COBOL program move the values to displayable variables & write that output to a seprate file.
Back to top
View user's profile Send private message
ramanatcs

New User


Joined: 23 Dec 2008
Posts: 7
Location: Bangalore

PostPosted: Thu Jan 15, 2009 3:28 pm    Post subject:
Reply with quote

Anuj D. wrote:
Hi,

Do you have file-aid at your shop, if yes - create a COPYBOOK for the file & open it with that copybook. (FILE-AID BROWSE (F.1) or F.2 to edit)

If you don't have file aid - in your COBOL program move the values to displayable variables & write that output to a seprate file.


Thanks to all...

I got it...
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Thu Jan 15, 2009 11:24 pm    Post subject:
Reply with quote

Please share your solution for the benefit of others.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Fri Jan 16, 2009 5:20 pm    Post subject:
Reply with quote

You are welocme and as Terry said - Please share your solution for the benefit of others.

-Ad
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts copying data without knowing location arunsoods DFSORT/ICETOOL 6 Thu Jul 20, 2017 1:03 pm
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Loading data to table gives wrong for... Raghu navaikulam DB2 18 Thu Jul 13, 2017 2:11 pm
No new posts SQL - select data available in index Nileshkul DB2 3 Mon Jun 26, 2017 1:30 am
No new posts NDM syntax checking without actually ... GAPX1 All Other Mainframe Topics 0 Wed Jun 07, 2017 2:36 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us