DFSORT - Need a Help

In this Mainframe Forum - You can post your queries on DFSORT, ICETOOL , SyncSort & JCL Utilities

Moderators: Frank Yaeger, Moderator Group

Post Reply
simo78
Member
Posts: 35
Joined: Tue Aug 11, 2009 12:20 am
Location: Munich

DFSORT - Need a Help

Post by simo78 » Mon Apr 12, 2010 7:43 pm

Hi all,

I need a help in DFSORT.

My inputfile looks like this

//xxxxxx JOB ,xxxxxx,CLASS=x,REGION=xx,MSGCLASS=x,
//*
//*ABCDEF G H I J
//*
//* COMMENT - TEST
//*
//xxxxxx DD DSN=xxx.xxxxxxx,DISP=SHR
//****************************************************
//* THIS IS ONLY A COMMENT *
//****************************************************

I want to convert my JCL into a HTML file and if
I find at line 1 until 3 a comment //* should be
written <font color=\"99CCFF\"> and at beginning of the line and </font> at the end of the line.

I tryed in this way:

Code: Select all

//SYSIN    DD *                                                  
     OPTION COPY                                                  
     INREC IFTHEN=&#40;WHEN=&#40;1,3,CH,EQ,C'//*'&#41;,                      
     BUILD=&#40;1&#58;C'<font color=\"99CCFF\">//*',3,54,55&#58;C'</font>'&#41;&#41;  
but it doesn't work.

I hope someone can help me.

Thanks in advance.

User avatar
Frank Yaeger
Moderator
Posts: 812
Joined: Sat Feb 18, 2006 5:45 am
Location: San Jose, CA
Contact:

Post by Frank Yaeger » Mon Apr 12, 2010 9:45 pm

I assume by "it doesn't work", you mean you got an ICE126A error message. That's because you have overlapping fields in the INREC BUILD operand:

1:C'<font color=\"99CCFF\">//*',3,54,55:C'</font>'

55: overlaps with the previous fields. Remove the 55: (or use the correct column number) and you'll probably get what you want, although since you didn't give the RECFM and LRECL of your input or output file, or indicate the length of the comments, I can't say that for sure.

In the future, please be more specific about what you mean by "it doesn't work" and what exactly you want to do. We can't read your mind.
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort

simo78
Member
Posts: 35
Joined: Tue Aug 11, 2009 12:20 am
Location: Munich

Post by simo78 » Tue Apr 13, 2010 12:27 pm

Thanks a lot Mr. Yaeger,

I got what I expected...and next time I try to be clearer. :D

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others