Portal | Manuals | 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
 
Comparing Signed Packed decimal and packed decimal

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SYNCSORT
View previous topic :: :: View next topic  
Author Message
Virendra Shambharkar

New User


Joined: 26 Aug 2015
Posts: 55
Location: India

PostPosted: Wed Nov 14, 2018 9:37 am    Post subject: Comparing Signed Packed decimal and packed decimal
Reply with quote

Hi,

We are trying to compare same field having same values across 2 different files as follows

1. File 1- defined as 4/P ( COMP-3 PIC 9(7))
2. File 2 - defined as 4/PS ( COMP-3 PIC S9(7))

but we are getting incorrect results while comparing. Can you please advise what should be a correct sort card for comparing this.

Thanks,
Virendra
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8784
Location: Welsh Wales

PostPosted: Wed Nov 14, 2018 12:32 pm    Post subject:
Reply with quote

Unfortunately, psychic day was Monday this week .............. so

Define "incorrect results"

What sort card have YOU tried, please post your code, the expected results and the actual results.
And ... Don't forget to use the code tags

Don't forget any of the other base information needed, the release level of your sort product, the RECFM & LRECL of your input / output datasets, field positions, lengths and data formats.
What exactly should happen for a field match and what happens for a mismatch.

Without any useful information, or in this case - any information - how can you possibly expect any useful information back icon_evil.gif
Back to top
View user's profile Send private message
sergeyken

Active User


Joined: 29 Apr 2008
Posts: 474
Location: Maryland

PostPosted: Thu Nov 15, 2018 6:46 pm    Post subject:
Reply with quote

1) COMP-3 in IBM COBOL is always compiled to machine-supported signed decimal packed.
2) if you need any meaninful advice, then please, provide any meaningful info: what exactly you tried to do, and what exactly is incorrect??
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 -> SYNCSORT All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Alphanumeric to Packed Decimal Conver... Vijay_Sirisha COBOL Programming 2 Mon May 27, 2019 2:52 am
No new posts Compare fields with decimal chandan.inst SYNCSORT 6 Thu Apr 04, 2019 5:29 pm
No new posts Display Signed ZD field socker_dad DFSORT/ICETOOL 11 Thu Feb 28, 2019 1:17 am
No new posts Convert alpha numeric to signed digits Balu5491 COBOL Programming 4 Mon Feb 25, 2019 10:39 pm
No new posts RPG II Problem with unsigned Packed d... Andi1982 All Other Mainframe Topics 6 Tue Sep 11, 2018 6:11 pm

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