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

Extra data in overlay field


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

New User


Joined: 27 Aug 2008
Posts: 30
Location: USA

PostPosted: Thu Sep 13, 2018 6:04 pm
Reply with quote

The field with extra data is starting in 105 and is the OVERLAY field. other data looks good.

I have sort card as:
Code:
 
SORT FIELDS=(1,2,CH,A,3,3,CH,A)                                     
OUTREC IFTHEN=(WHEN=INIT,                                           
       BUILD=(001:001,02,    -- CNY_CD                               
              003:003,03,    -- CNY_NUM_CD                           
              006:155,02,    -- IRS_CNY_CD                           
              008:064,55,    -- CNY_NM                               
              063:024,40,    -- CNY_COM_NM                           
              103:+055,TO=BI,LENGTH=2, -- STDPY_CNTY_NM_LEN         
              105:064,55,    -- STDPY_CNTY_NM_TXT                   
              205:161,1,     -- US_TRR_CD                           
              206:SEQNUM,4,BI,START=1,INCR=1, -- DISPLAY_SEQ_ NO     
              234:+20,TO=BI,LENGTH=2,    -- ROW_LUP_USR_ID_LEN       
              236:C'GPA026PD')), -- ROW_LUP_USR_ID_TXT               
       IFTHEN=(WHEN=(205,1,CH,EQ,C'Y'),                             
              OVERLAY=(103:+100,TO=BI,LENGTH=2,                     
                       105:C'U.S. TERRITORY - ',063,55))             


Input is:
Code:

AS161 161016AAMER SAMOAAMERICAN SAMOA                          AMERICAN SAMOA 


Output is:

    U.S. TERRITORY - AMERICAN SAMOA ..U.S. TERRITO


I want
    U.S. TERRITORY - AMERICAN SAMOA

where is the ..U.S. TERRITO coming from. I am just NOT seeing it icon_sad.gif HELP....
Back to top
View user's profile Send private message
speermb

New User


Joined: 27 Aug 2008
Posts: 30
Location: USA

PostPosted: Thu Sep 13, 2018 7:28 pm
Reply with quote

I JUST NEED TO USE THE RIGHT LENGTH IN THE OVERLAY...I WAS USING THE WRONG LENGTH!! I HAD
Quote:

IFTHEN=(WHEN=(205,1,CH,EQ,C'Y'),
OVERLAY=(103:+100,TO=BI,LENGTH=2,
105:C'U.S. TERRITORY - ',063,55))


SHOULD BE
Quote:

IFTHEN=(WHEN=(205,1,CH,EQ,C'Y'),
OVERLAY=(103:+100,TO=BI,LENGTH=2,
105:C'U.S. TERRITORY - ',063,40))

[/quote]
Back to top
View user's profile Send private message
Rohit Umarjikar

Global Moderator


Joined: 21 Sep 2010
Posts: 3053
Location: NYC,USA

PostPosted: Thu Sep 13, 2018 7:31 pm
Reply with quote

So you got it figured out by your self. Well done.
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 How to save SYSLOG as text data via P... All Other Mainframe Topics 1
No new posts Store the data for fixed length COBOL Programming 1
No new posts Data set Rec-Cnt and Byte-Cnt Testing & Performance 2
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts SCOPE PENDING option -check data DB2 2
Search our Forums:

Back to Top