IBM Mainframe Forum

by **Newbie123** » Wed Apr 16, 2014 8:01 pm

Hi everyone,

I looking for some help with a report i'm trying to generate. Its a summary of phone sales which should report the best performing location for each month & show their total sales. I've tried the following however i'm receiving errors:

Select all

//SORT EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN2 DD DISP=SHR,DSN=DATA1.JCL
//REVRPT DD SYSOUT=*
//TOOLIN DD *
DISPLAY FROM(IN2) LIST(REVRPT) DATE
TITLE('MONTHLY REVENUE REPORT') -
TITLE('PHONE SALES') PAGE -
HEADER('LOCATION') ON(1,17,CH) -
HEADER('MONTH') ON(24,2,ZD) -
HEADER('SALES') ON(27,7,ZD) -
TOTAL('TOTALS') AVERAGE('AVERAGES)'
SORT FIELDS=(1,17,CH,A,24,2,ZD,A)
SUM FIELDS=(27,7,ZD)
/*

The error i'm receiving is: - JCL ERROR CN(INTERNAL) & within SDSF it states that there is an issue with Display.

I've looked over the IBM:Getting started documentation,to no avail.
Could anyone help me out please?

Thanks

by **Akatsukami** » Wed Apr 16, 2014 8:47 pm

Post the relevant sections of the JES message log.

by **Newbie123** » Wed Apr 16, 2014 9:03 pm

Sure, these are the errors i've received:

Select all

DISPLAY FROM(IN2) LIST(REVRPT) DATE -
TITLE('MONTHLY REVENUE REPORT') -
TITLE('FOR SALES') PAGE -
$
ICE604A 0 ERROR IN KEYWORD, PARAMETER, OR DELIMITER
HEADER('LOCATION') ON(1,17,CH) -
HEADER('MONTH') ON(24,2,ZD) -
HEADER('SALES') ON(27,7,ZD) -
TOTAL('TOTALS') AVERAGE('AVERAGES')
ICE602I 0 OPERATION RETURN CODE: 12

ICE630I 2 MODE IN EFFECT: SCAN

SORT FIELDS=(1,17,CH,A,24,2,ZD,A)
$
ICE604A 0 ERROR IN KEYWORD, PARAMETER, OR DELIMITERICE604A 0 ERROR IN KEYWORD, PARAMETER, OR DELIMITER

SUM FIELDS=(27,7,ZD)
$
ICE614A 0 INVALID OPERATOR

OUTREC FIELDS=(1,9,2X,24,2,ZD,27,7,ZD)
$
ICE614A 0 INVALID OPERATOR

/*
$
ICE614A 0 INVALID OPERATOR
ICE601I 0 DFSORT ICETOOL UTILITY RUN ENDED - RETURN CODE: 12

by **NicC** » Wed Apr 16, 2014 9:30 pm

You have not supplied the messages relating to the JCL error. It would also help if you post the TOOLIN data that matches the ICE messages (the DISPLAY in your SYSOUT does not match the DISPLAY in your TOOLIN).

It is also a long time since I used ICETOOL but I doubt very much if you can have TITLE as a sub-keyword of TITLE. I suggest you review what you have as TOOLIN against the manual.

by **Newbie123** » Wed Apr 16, 2014 9:40 pm

This is the full JES2 JOB STATISTICS report that ive received:

Select all

----- JES2 JOB STATISTICS ------
15 APR 2014 JOB EXECUTION DATE
21 CARDS READ
87 SYSOUT PRINT RECORDS
0 SYSOUT PUNCH RECORDS
4 SYSOUT SPOOL KBYTES
0.00 MINUTES EXECUTION TIME
1 //DAT0015L JOB IVERTE,
// DAT0015, **JOB STATEMENT GENERATED BY SUBMIT**
// NOTIFY=DAT0015,CLASS=A,
// MSGLEVEL=(1,1)
2 //SORT EXEC PGM=ICETOOL
3 //TOOLMSG DD SYSOUT=*
4 //DFSMSG DD SYSOUT=*
5 //IN2 DD DISP=SHR,DSN=DATA1.JCL
6 //REVRPT DD SYSOUT=*
7 //TOOLIN DD *
CH70001I DAT0015 LAST ACCESS AT 13:18:19 ON TUESDAY, APRIL 15, 2014
EF236I ALLOC. FOR DAT0015L SORT
EF237I JES2 ALLOCATED TO TOOLMSG
EF237I JES2 ALLOCATED TO DFSMSG
GD103I SMS ALLOCATED TO DDNAME IN2
EF237I JES2 ALLOCATED TO REVRPT

by **skolusu** » Wed Apr 16, 2014 10:11 pm

Newbie123 wrote:Hi everyone,

I looking for some help with a report i'm trying to generate. Its a summary of phone sales which should report the best performing location for each month & show their total sales. I've tried the following however i'm receiving errors:
Select all
//TOOLIN DD *
DISPLAY FROM(IN2) LIST(REVRPT) DATE
TITLE('MONTHLY REVENUE REPORT') -
TITLE('PHONE SALES') PAGE -
HEADER('LOCATION') ON(1,17,CH) -
HEADER('MONTH') ON(24,2,ZD) -
HEADER('SALES') ON(27,7,ZD) -
TOTAL('TOTALS') AVERAGE('AVERAGES)'
SORT FIELDS=(1,17,CH,A,24,2,ZD,A)
SUM FIELDS=(27,7,ZD)
/*

You are missing a continuation character i.e Hyphen on the first line which would result in the error

Select all

ICE630I 0 MODE IN EFFECT: STOP

DISPLAY FROM(IN2) LIST(REVRPT) DATE
ICE613A 0 REQUIRED KEYWORD MISSING: ON
ICE602I 0 OPERATION RETURN CODE: 12

ICE630I 2 MODE IN EFFECT: SCAN

TITLE('MONTHLY REVENUE REPORT') -
$
ICE614A 0 INVALID OPERATOR

Newbie123 wrote:
The error i'm receiving is: - JCL ERROR CN(INTERNAL) & within SDSF it states that there is an issue with Display.

I've looked over the IBM:Getting started documentation,to no avail.
Could anyone help me out please?

Thanks

If you looked up the DFSORT Messages, Codes and Diagnosis Guide , you would have found the error message explained in detail

http://publibz.boulder.ibm.com/cgi-bin/ ... 60/2.2.304

Apart from that you cannot have a SORT or SUM statement along with DISPLAY operator. So remove them

The following DISPLAY control statements will give you the results

Select all

//TOOLIN DD *
DISPLAY FROM(IN2) LIST(REVRPT) DATE -
TITLE('MONTHLY REVENUE REPORT') -
TITLE('PHONE SALES') PAGE -
HEADER('LOCATION') ON(1,17,CH) -
HEADER('MONTH') ON(24,2,ZD) -
HEADER('SALES') ON(27,7,ZD) -
TOTAL('TOTALS') AVERAGE('AVERAGES')
/*

by **Newbie123** » Wed Apr 16, 2014 10:16 pm

Thats great, thank you so much for your help.

by **stadikamall2** » Thu Aug 27, 2015 7:39 pm

Hi please help to my doubt

my input file is subctrlrec010863

i need output as rec-type:subctrlrec
file-type:0
carrirer:10863
using sort
i tried using outrec,i have written jcl as outrec fields=(1:c'rec-type: ',13:1,10)
i am able to get the first field in o/p ,i need next fields in sequence

by **NicC** » Thu Aug 27, 2015 8:19 pm

stadikamall2,
What has your post to do with this topic?

by **BillyBoyo** » Thu Aug 27, 2015 8:27 pm

Don't use OUTREC with BUILD (the modern spelling of FIELDS), use OUTFIL with BUILD, as it allows the use of the slash-operator, so you can write multiple outputs from a single input.

IBM Mainframe Forum

Icetool dfsort problem

Icetool dfsort problem

Re: Icetool dfsort problem

Re: Icetool dfsort problem

Re: Icetool dfsort problem

Re: Icetool dfsort problem

Re: Icetool dfsort problem

Re: Icetool dfsort problem

dfsort problem

Re: Icetool dfsort problem

Re: Icetool dfsort problem