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

Using ALTSEQ to replace high values by spaces


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
nithinlenin

New User


Joined: 06 Feb 2007
Posts: 19
Location: Hyderabad

PostPosted: Thu May 31, 2007 10:29 am
Reply with quote

Hi!
can anyone suggest me how to find out the high values in a file and replace them by space.
Can this be done using ALTSEQ . i tried ALTSEQ for replacing low values (ALTSEQ CODE=(0040) )and that is working fine but the same logic with high values is not working (ALTSEQ CODE=(FF40) ).

any batch method to do that would be really helpful.
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Thu May 31, 2007 2:22 pm
Reply with quote

If it worked for low values, it will work for high values.
What does your JCL look like?
Back to top
View user's profile Send private message
nithinlenin

New User


Joined: 06 Feb 2007
Posts: 19
Location: Hyderabad

PostPosted: Thu May 31, 2007 4:11 pm
Reply with quote

Code:

//STEP0010 EXEC PGM=OPNZERO,
//             PARM=SORT,
//             COND=(0,NE)
//SYSIN    DD  *
     SORT FIELDS=COPY
     ALTSEQ CODE=(FF40)
     OUTREC FIELDS=(1,6,7,8,TRAN=ALTSEQ,15,3)
/*
//SORTIN   DD  DSN=XIY1.PROJ.JCLLIB(NSORTW2),DISP=SHR
//*
//SORTOUT  DD  DSN=X1IG.SYSORT.OUTPUT2,
//             DISP=(,CATLG,DELETE),
//             UNIT=SYSDA,
//             SPACE=(CYL,(5,1),RLSE)
//SYSPRINT DD  SYSOUT=*
//SYSOUT   DD  SYSOUT=*
Back to top
View user's profile Send private message
nithinlenin

New User


Joined: 06 Feb 2007
Posts: 19
Location: Hyderabad

PostPosted: Thu May 31, 2007 4:31 pm
Reply with quote

the input files looks smthg like this

ABCD1 11111111 00
ABCD2 11111111 00
ABCD3 11111111 00
ABCD4 11111111 00
ABCD5 11111111 00
ABCD6 11111111 00
ABCD7 11111111 00
ABCD8 11111111 00
ABCD9 11111111 00
ABCE1 11111111 00
ABCE2 11111111 00
ABCE3 11111111 00
ABCE4 11111111 00
ABCE5 11111111 00
ABCE6 11111111 00
ABCE7 11111111 00
ABCE8 11111111 00
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Thu May 31, 2007 4:37 pm
Reply with quote

OK, where is the X'FF' you are trying to convert?
Back to top
View user's profile Send private message
nithinlenin

New User


Joined: 06 Feb 2007
Posts: 19
Location: Hyderabad

PostPosted: Thu May 31, 2007 4:54 pm
Reply with quote

Space in EBcidic is represented asX'40' Like wise
how will the highvalues be represented ?? ie wat is the EBcidic for X'FF'.
Also wat all comes under " high values ' in Ebcidic
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Thu May 31, 2007 5:10 pm
Reply with quote

nithinlenin wrote:
Space in EBcidic is represented asX'40' Like wise
how will the highvalues be represented ?? ie wat is the EBcidic for X'FF'.
Also wat all comes under " high values ' in Ebcidic
Huh?

"ABCE4 11111111 00" does not contain any X'FF'.
The 7,8 you are trying to convert contains eight X'F1".

I'm confused...... icon_confused.gif
Back to top
View user's profile Send private message
nithinlenin

New User


Joined: 06 Feb 2007
Posts: 19
Location: Hyderabad

PostPosted: Thu May 31, 2007 5:46 pm
Reply with quote

yaa.. i get wat u r sayingg.. so can u provide me with any data having any highvalue
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Thu May 31, 2007 5:57 pm
Reply with quote

Do you want to translate the "1"s in "ABCE4 11111111 00" to spaces?
Back to top
View user's profile Send private message
nithinlenin

New User


Joined: 06 Feb 2007
Posts: 19
Location: Hyderabad

PostPosted: Thu May 31, 2007 6:28 pm
Reply with quote

that i think will work with (F140).. !! rght
i want to know the concept of these high values ...
and how these high value data looks llike
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Thu May 31, 2007 7:32 pm
Reply with quote

nithinlenin wrote:
that i think will work with (F140).. !! rght
i want to know the concept of these high values ...
and how these high value data looks llike
Right,
Just a low values are X'00', the lowest possible value a byte can have, X'FF' is the highest possible value with all eight bits set to ones.
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Thu May 31, 2007 8:01 pm
Reply with quote

nithinlenin wrote:
that i think will work with (F140).. !! rght
i want to know the concept of these high values ...
and how these high value data looks llike


High values are x'FF' or b'11111111' they are not a displayable character thus they don't look like anything.
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 -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts leading spaces can be removed in trai... DFSORT/ICETOOL 1
No new posts Null values are considered in Total c... DFSORT/ICETOOL 6
Search our Forums:

Back to Top