Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
INREC - SHORT RECORD - Please help

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

New User


Joined: 02 Nov 2009
Posts: 73
Location: Mumbai

PostPosted: Mon Jun 21, 2010 4:13 pm    Post subject: INREC - SHORT RECORD - Please help
Reply with quote

When trying to solve below problem posted by someone using Syncsort:

example:

Input:
ID001.................ID002................ID003AB10....................
ID001.................ID003EF07..............ID004......................
ID001.................ID003CH02..............ID004......................
ID001.................ID002................ID003CB01....................

Output:
ID001.................ID002................ID003CB01....................
ID001.................ID003CH02..............ID004......................
ID001.................ID003EF07..............ID004......................
ID001.................ID002................ID003AB10....................

Problem: In ID003, there is a subkey (two-digit) which I'd like to sort. However, ID003's position is variable because not all IDs are always present, like the 2nd record, where ID002 is omitted.

File is VB and LRECL 29998.

I tried using below sort card -

Code:
INREC PARSE=(%00=(STARTAFT=C'ID003',FIXLEN=4)),   
BUILD=(1,29998,%00)                               
SORT FIELDS=(5,5,CH,A,30001,02,CH,A)               
OUTREC BUILD=(1,29998)             


But I get the following error -
Code:

SORTIN   : RECFM=VB   ; LRECL= 29998; BLKSIZE= 30002           
INREC RECORD LENGTH = 30002                                     
POTENTIALLY INEFFICIENT USE OF INREC                           
OUTREC RECORD LENGTH = 29998                                   
SORTOUT  : RECFM=VB   ; LRECL= 29998; BLKSIZE= 30002           
23,592K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
   0 BYTES RESERVE REQUESTED, 23,592K BYTES USED               
G=1068,SEGLEN=23000                                             
INREC  - SHORT RECORD                                           
SYNCSMF  CALLED BY SYNCSORT; RC=0000   


Can someone please help me.
Thanks.
Back to top
View user's profile Send private message

Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Mon Jun 21, 2010 5:37 pm    Post subject:
Reply with quote

Anshul,

Please check the below links:

http://www.ibmmainframes.com/viewtopic.php?t=48468&highlight=vlshrt
http://www.ibmmainframes.com/viewtopic.php?t=34799&highlight=vlshrt
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Mon Jun 21, 2010 5:39 pm    Post subject:
Reply with quote

Also, in this case your description about the problem gave a good hint. However, it's good if you post the "messgae identifiers" too, when you post the SYSOUT messages.
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 Jun 21, 2010 8:12 pm    Post subject:
Reply with quote

anshul_gugnani wrote:
Code:

SORTIN   : RECFM=VB   ; LRECL= 29998; BLKSIZE= 30002           
INREC RECORD LENGTH = 30002                                     
POTENTIALLY INEFFICIENT USE OF INREC                           
OUTREC RECORD LENGTH = 29998                                   
SORTOUT  : RECFM=VB   ; LRECL= 29998; BLKSIZE= 30002           
23,592K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
   0 BYTES RESERVE REQUESTED, 23,592K BYTES USED               
G=1068,SEGLEN=23000                                             
INREC  - SHORT RECORD                                           
SYNCSMF  CALLED BY SYNCSORT; RC=0000                           
There are message IDs in front of each of these lines, why did you not bother to include them?
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 query to fetch record which has only ... maxsubrat DB2 9 Mon Dec 11, 2017 5:03 pm
No new posts Extract record for change in combinat... Trinadh DFSORT/ICETOOL 6 Thu Nov 23, 2017 3:32 pm
No new posts Extract Record using range of Data scorp_rahul23 DFSORT/ICETOOL 3 Wed Nov 15, 2017 11:54 pm
No new posts Squeeze record left so that zeroes ar... Vignesh Sid SYNCSORT 5 Fri Nov 10, 2017 1:40 pm
No new posts Formatting multiple records to a sing... Vignesh Sid SYNCSORT 3 Tue Nov 07, 2017 12:22 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us