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
 

 

Using ALTSEQ to replace high values by spaces

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
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    Post subject: Using ALTSEQ to replace high values by spaces
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: 3158
Location: Tucson AZ

PostPosted: Thu May 31, 2007 2:22 pm    Post subject:
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    Post subject:
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    Post subject:
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: 3158
Location: Tucson AZ

PostPosted: Thu May 31, 2007 4:37 pm    Post subject:
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    Post subject:
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: 3158
Location: Tucson AZ

PostPosted: Thu May 31, 2007 5:10 pm    Post subject:
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    Post subject:
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: 3158
Location: Tucson AZ

PostPosted: Thu May 31, 2007 5:57 pm    Post subject:
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    Post subject:
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: 3158
Location: Tucson AZ

PostPosted: Thu May 31, 2007 7:32 pm    Post subject:
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    Post subject:
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    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Sorting of hex values Saurabh_mi DFSORT/ICETOOL 11 Thu May 25, 2017 3:49 pm
No new posts Fileaid Update Replace with null string descann Compuware & Other Tools 4 Mon May 15, 2017 3:00 pm
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
No new posts Compare two files and subtract values ameetmund DFSORT/ICETOOL 7 Fri Mar 31, 2017 3:35 pm
No new posts Check Binary Values for symbols gandikk CA Products 3 Tue Mar 21, 2017 5:11 am


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