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

How to specify packed decimal values in include cond in sort


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
srinivasulu.p

New User


Joined: 10 Jul 2012
Posts: 22
Location: india

PostPosted: Tue Mar 11, 2014 9:14 pm
Reply with quote

Hi
i want to use packed decimal value in Include condition to copy records using sort , please help me ... i have tried with below code its not working..
Code:


MY FILE DATA IS LIKE THIS : I WANT TO COPY  THE RECORDS B AND C FIELDS HAVING 0(ZERO)

A(AS/1-2)  !   B(PS/3-8)    C(PS/9-14)
 AB          !            0              0
 AB          !      1234.0         23.0
 AB          !            0              0
 AB          !            0        1456.0

SORT FIELDS=COPY
 INCLUDE COND=(3,5,PD,EQ,0,AND,9,5,PD,ED,0)

Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Tue Mar 11, 2014 9:56 pm
Reply with quote

8 - 2 = 6
14 - 8 = 6
Back to top
View user's profile Send private message
srinivasulu.p

New User


Joined: 10 Jul 2012
Posts: 22
Location: india

PostPosted: Tue Mar 11, 2014 10:21 pm
Reply with quote

Bill Woodger wrote:
8 - 2 = 6
14 - 8 = 6


Thanks for your reply, but i didnt get you... pls help me in extract those records
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Tue Mar 11, 2014 10:30 pm
Reply with quote

Code:
 INCLUDE COND=(3,6,PD,EQ,0,AND,9,6,PD,EQ,0)


If that doesn't work, show the sysout from the step.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Wed Mar 12, 2014 12:08 am
Reply with quote

srinivasulu.p wrote:
Bill Woodger wrote:
8 - 2 = 6
14 - 8 = 6


Thanks for your reply, but i didnt get you... pls help me in extract those records

You were getting your offsets wrong - review what you posted and relate it to what Bill posted.
Back to top
View user's profile Send private message
srinivasulu.p

New User


Joined: 10 Jul 2012
Posts: 22
Location: india

PostPosted: Wed Mar 12, 2014 9:02 am
Reply with quote

Bill Woodger wrote:
Code:
 INCLUDE COND=(3,6,PD,EQ,0,AND,9,6,PD,EQ,0)


If that doesn't work, show the sysout from the step.


Quote:
Hi Bill
please find sysout, i am not getting any error , but the records are not copied

Code:
BSAM WAS USED FOR SORTIN             
BSAM WAS USED FOR SORTOUT           
RCD IN    1929166, OUT          0   
RELEASE 1.4 BATCH 0520 TPF LEVEL 1.0
Back to top
View user's profile Send private message
srinivasulu.p

New User


Joined: 10 Jul 2012
Posts: 22
Location: india

PostPosted: Wed Mar 12, 2014 9:17 am
Reply with quote

srinivasulu.p wrote:
Bill Woodger wrote:
Code:
 INCLUDE COND=(3,6,PD,EQ,0,AND,9,6,PD,EQ,0)


If that doesn't work, show the sysout from the step.


Quote:
Hi Bill
please find sysout, i am not getting any error , but the records are not copied

Code:
BSAM WAS USED FOR SORTIN             
BSAM WAS USED FOR SORTOUT           
RCD IN    1929166, OUT          0   
RELEASE 1.4 BATCH 0520 TPF LEVEL 1.0



now its working , i have tried with below code
Code:

 INCLUDE COND=(3,6,PD,EQ,+0,AND,9,6,PD,EQ,+0)
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Need to set RC4 through JCL SORT DFSORT/ICETOOL 5
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
Search our Forums:

Back to Top