Joseph Reichman wrote on 04/02/2009 12:34:23 PM:
> I was wondering if anyone has any information regarding invoking IBM
> Sort Dynamically from a program
>
>  Converting from VSE/SyncSort to z/os/DFSORT
>
> I was wondering what a 24 bit parameter list value was
>
> The layout on page 467 of the DFSORT Application programming guide
differs
> from the example on  page  478

Complete details of calling DFSORT dynamically from a program using the
older
24-bit parameter list and the newer extended (31-bit) parameter list are
documented
in Chapter 5 of "z/OS DFSORT Application Programming Guide" at:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA30/5.0?DT=20080528171007

I don't know what you mean by "I was wondering what a 24 bit parameter list
value was".  The layout of the 24-bit parameter list is shown in the book.
I looked back at the layout and the example you refer to and they do match,
keeping
in mind that the first six words in the list must be in the order shown and
the
remaining words can be in any order.  The example shows these entries in
the list:

LISTBEG DC   A(SORTA)               BEGINNING ADDRESS OF SORT STMT
        DC   A(SORTZ)               END ADDRESS OF SORT STMT
        DC   A(RECA)                BEGINNING ADDR OF RECORD STMT
        DC   A(RECZ)                END ADDR OF RECORD STMT
        DC   A(MOD1)                ADDR OF E15 RTN
        DC   A(MOD2)                ADDR OF E35 RTN
        DC   C'ABC#'                DDNAME CHARACTERS
        DC   F'720000'              OPTIONAL MAIN STORAGE VALUE
        DC   X'FF'                  MESSAGE OPTION FLAG BYTE
        DC   C'(U)'                 MESSAGE OPTION
LISTEND EQU  *

The first four words are the starting and ending pointers for
the SORT and RECORD statements.

The fifth word is the address of an E15 routine in your program - use A(0)
if you don't have one.  The sixth word is the address of an E35 routine in
your program - use A(0) if you don't have one.

The 7th word (C'ABC#') is the 4-character prefix for 'SORT' DD statement
names.
Leave it out if you want to use 'SORT' as the prefix.

The 8th word (F'720000') is the main storage value (X'00' code). You can
leave.
this out and use the default.

The 9th word (X'FF,C'(U)') is the message option (X'FF' code) indicating
only
critical messages should be displayed.  You can leave this out if the
default
message options are ok.

Other codes can be used for other statements and parameters. For example:

X'03',AL3(MSGDDN)  for a pointer to an 8-character message ddname to
override 'SYSOUT  '.

X'07',AL3(SUMSTART) for a pointer to the start of a SUM statement.
X'00',AL3(SUMEND)   for a pointer to the end of a SUM statement.

and so on.

Actually, it's better to use the newer Extended (31-bit) parameter list if
you have a choice.

If you need more specific help with setting up your parameter list for
invoking DFSORT in a
specific way, feel free to e-mail me ([email protected]) with the details
of what you want to
do and I'll help be happy to help you do it.

Frank Yaeger - DFSORT Development Team (IBM) - [email protected]
Specialties: FINDREP, WHEN=GROUP, DATASORT, ICETOOL, Symbols, Migration

 => DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to