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
 

 

Splitting a file with known hex values(German Special Chars)

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
jpdeshai

New User


Joined: 24 Jun 2007
Posts: 57
Location: US

PostPosted: Sun Oct 07, 2007 11:31 pm    Post subject: Splitting a file with known hex values(German Special Chars)
Reply with quote

Hi,

I have a problem as given below.(I tried searching in the forum, but could not get exact solution).

My input file length is 400 and I need to check the each record (all positions) in the file and if any records contains any GERMAN special characters (eg: ä, Ä, Ö) in any location that record needs to be Omitted and written into another file.

Because we are not able type the German special characters in the parm
card we need to check the characters in Hex format

There ASCII and EBCIDIC values ofr German sepcial Chars are given below FYR:
05 EBCDIC-SPL-CHAR-GERMAN.
10 FILLER PIC X(10) VALUE X'4363517153735777CCEC'.
10 FILLER PIC X(04) VALUE X'DCFC59B1'.

05 ASCII-SPL-CHAR-GERMAN.
10 FILLER PIC X(10) VALUE X'E4C4E9C9EBCBEFCFF6D6'.
10 FILLER PIC X(04) VALUE X'FCDCDFA3'.

Please let me know how to do this using SYNCSORT.

JP
Back to top
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Mon Oct 08, 2007 12:49 am    Post subject:
Reply with quote

Syncsort does allow for Substring Comparisons. With multiple outputs, it should be do-able....
Back to top
View user's profile Send private message
jpdeshai

New User


Joined: 24 Jun 2007
Posts: 57
Location: US

PostPosted: Mon Oct 08, 2007 5:11 am    Post subject: Reply to: Splitting a file with known hex values(German Spec
Reply with quote

Hi CICS Guy,

You are right. I tried with ALTSEQ, but could not get the solution.

Can any one help me out of this?

Thanks,
JP
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Mon Oct 08, 2007 5:22 am    Post subject: Re: Reply to: Splitting a file with known hex values(German
Reply with quote

jpdeshai wrote:
You are right. I tried with ALTSEQ, but could not get the solution.
Huh?
What does ALTSEQ have to do with SS?
Have you looked at the manual?
If you need a manual a phone call or email from the company's email should do the trick...
Check out this link for more information...
Back to top
View user's profile Send private message
jpdeshai

New User


Joined: 24 Jun 2007
Posts: 57
Location: US

PostPosted: Mon Oct 08, 2007 8:14 am    Post subject:
Reply with quote

If I am not worng, ALTSEQ gives us the facility to compare each char and convert/translate to another format right?

The Link you have given me did not serve my problem.
In my case, I do not know the location. the Special Char can be in any position and out of 14 Chars, any char can come in any postion.

Can you please suggest me?
Back to top
View user's profile Send private message
William Thompson

Global Moderator


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

PostPosted: Mon Oct 08, 2007 2:41 pm    Post subject:
Reply with quote

ALTSEQ changes the sort sequence, use SS for substring comparisons...
Check the manual.
Back to top
View user's profile Send private message
Ajay Baghel

Active User


Joined: 25 Apr 2007
Posts: 205
Location: Bangalore

PostPosted: Mon Oct 08, 2007 3:09 pm    Post subject: Reply to: Splitting a file with known hex values(German Spec
Reply with quote

If you want to write records which remain after omitting records containing german characters to a file say 'goodfile':

Code:


//SYSIN    DD  *
  OPTION COPY
  OUTFIL FNAMES=GOODFILE,OMIT=(1,80,SS,EQ,X'43',OR,
             1,80,SS,EQ,X'63',OR,
             1,80,SS,EQ,X'EC')
/*
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6967
Location: porcelain throne

PostPosted: Mon Oct 08, 2007 6:36 pm    Post subject:
Reply with quote

you can not substitute a single char for the german characters with the umlaut. the umlaut signifies that the char is an abbreviation.

ä = ae
ö = oe
ü = ue
Back to top
View user's profile Send private message
jpdeshai

New User


Joined: 24 Jun 2007
Posts: 57
Location: US

PostPosted: Mon Oct 08, 2007 11:21 pm    Post subject: Reply to: Splitting a file with known hex values(German Spec
Reply with quote

Hi Ajay,

Thanks for the Sort Card. It is working perfectly for me.
I didn't knew about the 'SS' function.

Thanks a lot.
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Converting Variable block file to Fix... bhavana yalavarthi DFSORT/ICETOOL 10 Tue May 16, 2017 2:20 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 Getting error while opening a variabl... apandey1 COBOL Programming 5 Fri May 05, 2017 12:22 pm
No new posts Issue with NDM process to transmit ES... chetanambi All Other Mainframe Topics 6 Wed May 03, 2017 10:52 am
No new posts File processing vishwakotin Mainframe Interview Questions 9 Fri Apr 28, 2017 11:38 am


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