ISPZIP/MVS Version 1.1
Install bucket

The install bucket provides optimal guidance for installers and maintainers of this ASE product. There may also be times when, knowing a specific APAR number, or a problem symptom, the APAR Index will be more convenient.

Watch for the Y2K Compliance Requirement statement in the body of the install bucket file.

To comment or request assistance, please email ASE Copyright ASE 2003 Last updated: 07:02 SAT 8th Feb 2003 UCT


List of Installable FMIDs

Choose the FMIDs that you are licenced for from those listed and then examine PTFs and APAR fixes for those FMIDs
ASEF200 ISPZIP 1.1 product and install guide


PTF ASP0728

/*####################################################################
DATE: 19970728  PTF: ASP0728  FMID: ASEF200 */
++PTF(ASP0728).  /* --------------------------------------------------
ASP0728 970728 ISPZIP V110 PM YEAR 2000 SUPPORT

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 1997.

_APARLIST:

ASZ2954 971030 61VVOG KB ISPZIP  V110 INCORROUT  ISPZIPC  971030 w__-pmd
Message 'ISPZ117E  FROM dataset not found on volume' if input to a
compress operation is on tape.

ASZ2955 971031 61VLLC HL ISPZIP  V110 INCORROUT  ISPZIPC  971031 B0728
STRIP option due compress has no effect if record length is greater
than 256 bytes.

    */
++VER(Z038) FMID(ASEF200) REQ(ASP0741) SUP(ASZ2954,ASZ2955).
++JCLIN.
//ASP0728  JOB 'ACCOUNTING INFO',
//            MSGLEVEL=(1,1)
//STEP1    EXEC PGM=IEWL,
//            PARM='LIST,MAP,NCAL,REUS'
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSLMOD  DD DSN=ASE.SASELMD,DISP=SHR
//AASEMOD  DD DSN=ASE.AASEMOD,DISP=SHR
//SYSLIN   DD *
 INCLUDE AASEMOD(ISPZIPS,ISPZIPX,ISPZIPM)
 ORDER ISPZIPS,ISPZIPX,ISPZIPM
 ENTRY ISPZIPS
 NAME ISPZIPS(R)
++MOD(ISPZHLPI).
++MOD(ISPZHLPD).
++MOD(ISPZIP).
++MOD(ISPZIPC).
++MOD(ISPZIPS) DISTLIB(AASEMOD) LEPARM(RENT,REUS).
++MOD(ISPZIPSR).
++MOD(ISPZIPX).
++MOD(ISPZISPF).
++PNL(ISPZA100).
++PNL(ISPZA300).
++PNL(ISPZD000).
++PNL(ISPZE000).
++PNL(ISPZF000).
++PNL(ISPZF100).
++PNL(ISPZG000).
++PNL(ISPZ2000).
++PNL(ISPZ34A0).
++PNL(ISPZ3400).
++PNL(ISPZ3600).
++PNL(ISPZ4000).
++PNL(ISPZ5A00).
++PNL(ISPZ5B00).
++PNL(ISPZ5C00).
++PNL(ISPZ5000).
++PNL(ISPZ8000).
++PNL(ISPZ9100).
++PNL(ISPZ9300).
++EXEC(ISPZXFER).
download PTF: ASP0728 318k

PTF ASP0741

/*####################################################################
DATE: 19971028  PTF: ASP0741  FMID: ASEX100 */
++PTF(ASP0741).  /* ------------------------------------------
ASP0741 971028 ASEX100 V100 PM YEAR 2000 SUPPORT FOR ISPZIP

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 1997.

_APARLIST:
ASZ1856,ASZ1996,ASZ2140,ASZ2290,ASZ2348,ASZ2351

_NEW FUNCTIONALITY
Implement &TOD4() built-in function


    */
++VER(Z038) FMID(ASEX100).
++MOD(ASEXCHXR).
++MOD(ASEXECPI).
download PTF: ASP0741 49k

Y2K Compliance Requirements Statement

For product ISPZIP/MVS Version 1.1 to be Y2K Compliant, the FMIDs and SYSMODs identified above this point in this install bucket must have been RECEIVEd and APPLYd. This requirement does not apply to SYSMODs for FMIDs that the installer is not licenced for and hence has not installed.

By FMID, the full list of SYSMODs identified above this point in this install bucket are:

  1. FMID:ASEF200 ISPZIP 1.1 product and install guide
    sysmod_id type fmid___ description______________________
    ASP0728 PTF ASEF200 Y2K Compliance - 1/2
    ASP0741 PTF ASEX100 Y2K Compliance - 2/2

Last updated: 07:02 SAT 8th Feb 2003 UCT

PTF ASP0805

/*####################################################################
DATE: 19990127  PTF: ASP0805  FMID: ASEF200 */
++PTF(ASP0805).  /* --------------------------------------------------
ASP0805 990127 ISPZIP  V110 PM IZIPISPF SUPPORT FOR ISPPLIB LIBDEF

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 1999.

_APARLIST:

ASZ3052 990127 61VLLC HL ISPZIP  V110 SUGG OK    ISPZIP   990127 w__-PMD
Support for LIBDEF allocation of ISPPLIB dataset.

NOTE: Refer to samplib member ISPZLIBD for details on how to allocate
      ISPZIP panel libraries using a LIBDEF statement.

*/
++VER(Z038) FMID(ASEF200) REQ(ASP0806) PRE(ASP0728) SUP(ASZ3052).
++MOD(ISPZISPF).
++SAMP(ISPZLIBD) DISTLIB(AASESMP) SYSLIB(SASESMP).
download PTF: ASP0805 77k

PTF ASP0806

/*####################################################################
DATE: 19990127  PTF: ASP0806  FMID: ASEX100 */
++PTF(ASP0806).  /* --------------------------------------------------
ASP0806 990127 ASEX100 V100 PM ASEXDSDM SUPPORT FOR ISPPLIB LIBDEF

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 1999.

_APARLIST:

ASZ3052 990127 61VLLC HL ISPZIP  V110 SUGG OK    ISPZIP   990127 w__-PMD
Support for LIBDEF allocation of ISPPLIB dataset.

*/
++VER(Z038) FMID(ASEX100).
++MOD(ASEXDSDM).
download PTF: ASP0806 17k

PTF ASP0823

/*####################################################################
DATE: 19990609  PTF: ASP0823  FMID: ASEF200 */
++PTF(ASP0823).  /* --------------------------------------------------
ASP0823 990609 ISPZIP  V110 PM IZIPISPF SUPPORT FOR NO TSO PREFIX

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 1999.

_APARLIST:

ASZ3074 990520 61VASE PM ISPZIP  V110 INCORROUT  IZIPISPF ......
Support for no TSO prefix.

ASZ3075 990520 61VASE PM ISPZIP  V110 INCORROUT  IZIPISPF ......
Single high level qualifier is not handled correctly when entered as
a dataset list argument.

NOTE: This PTF allows the prefix used by ISPZIP for the control
      dataset and temporary datasets to be overridden. The default
      prefix is the TSO prefix. If the TSO prefix is null, then the
      TSO userid is used. If the TSO prefix is not null but is not
      the same as the TSO userid then prefix.userid will be used.

      The user can override the prefix by specifying a PREFIX=
      parameter when invoking ISPZISPF.

      E.g.

      ISPEXEC SELECT PGM(IZIPISPF) PARM(PREFIX=ABC) NEWAPPL(IZIP)

      ABC will be used as the high level qualifier for datasets
      created by ISPZIP.

*/
++VER(Z038) FMID(ASEF200) PRE(ASP0805) SUP(ASZ3074,ASZ3075).
++MOD(ISPZISPF).
download PTF: ASP0823 77k

PTF ASP0825

/*####################################################################
DATE: 19990702  PTF: ASP0825  FMID: ASEF200 */
++PTF(ASP0825).  /* --------------------------------------------------
ASP0825 990702 ISPZIP  V110 PM ISPZIPC SUPPORT LONG PC FILENAMES

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 1999.

_APARLIST:

ASZ3083 990702 61VASE PM ISPZIP  V110 SUGG OK    ISPZIPC  990707 ??00825
Add support to ISPZIP to create long PC filenames.

ASZ3030 980915 61VNAB CC ISPZIP  V110 ABS80A     ISPZIPC  980915 W  -PMD
Abend S80A after ISPZIP is called repeatedly to compress data.

ASZ2987 980224 61VGIO EG ISPZIP  V110 INCORROUT  ISPZIPC  980224 W  -PMD
File transfer of zip file fails if zip file record format is VB and
BLKSIZE is more than 8 bytes larger than LRECL or BLKSIZE=0

NOTE: This PTF allows the creation of filenames up to 255 characters
      inside a zip file. An additional parameter (PCFN=) has been
      added to the member selection control statement to allow a
      long file name to be specified.

      E.g.

      S prod.dat pcfn=PROD199907031023
      S test.dat pcfn='application test data'

      prod.dat will be stored as 'PROD19907031023'.
      test.dat will be stored as 'application test data'
*/
++VER(Z038) FMID(ASEF200) PRE(ASP0728) SUP(ASZ2987,ASZ3030,ASZ3083).
++MOD(ISPZIP).
++MOD(ISPZIPC).
++MOD(ISPZHLPI).
++MOD(ISPZHLPD).
download PTF: ASP0825 210k

PTF ASP0864

/*####################################################################
DATE: 20000509  PTF: ASP0864  FMID: ASEX100 */
++PTF(ASP0864).  /* --------------------------------------------------
ASP0864 000509 ASEX100 V100 PM RUN ASEXDBGR IN 31 BIT MODE

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2000.

_APARLIST:

ASZ3110 991109 61VASE PS ASEX100 V100 ABS0C4     ASEXDBGR 991109 ??00836
Abend S0C4 when using ISPZIP under ISPF to compress a large PDS.

ASZ3151 000509 411PAS TB ASEX100 P836 ABS806     ASEXDBGR 000509 ??00864
Abend S806 for module OMCSARC after applying ASP0836.

_PROBLEM DESCRIPTION:
Abend S0C4 occurs when using the ISPZIP ISPF option to compress a PDS
that has a large number of members.

_PROBLEM SUMMARY:
USERS AFFECTED: All users of ISPZIP under ISPF
ISPZIP calls ASEXDBGR to manage the listing file created by the compress
operation. ISPZIP runs in amode 31. ASEXDBGR expects it's caller to
be in amode 24.  ASEXDBGR incorrectly switched to amode 24 before
returning to ISPZIP which caused a subsequent abend in ISPZIP.

_PROBLEM CONCLUSION
RECOMMENDATION: Apply PTF ASP0864.

ASEXDBGR will be modified to accept callers in amode 24 or 31.

NEED FURTHER HELP?  CALL ASE FOR ASSISTANCE OR EMAIL: HELP@ASE.COM.AU
*/
++VER(Z038) FMID(ASEX100) SUP(ASZ3110,ASP0836).
++JCLIN.
//STEP1    EXEC PGM=IEWL,
//            PARM='LIST,MAP,NCAL,REUS,AMODE=31'
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSLMOD  DD DSN=ASE.SASELMD,DISP=SHR
//AASEMOD  DD DSN=ASE.AASEMOD,DISP=SHR
//SYSLIN   DD *
 INCLUDE AASEMOD(ASEXARC2)
 NAME ASEXARC2(R)
++MOD(ASEXARC2) DISTLIB(AASEMOD) LEPARM(RENT,REUS).
++MOD(ASEXDBGR).
++MOD(ASEXDBRM).
++MOD(ASEXDBIO).
++MOD(ASEXDBBM).
++MOD(ASEXDBIM).
++MOD(ASEXDBFM).
++MOD(ASEXDBDM).
++MOD(ASEXDBCF).
download PTF: ASP0864 63k

PTF ASP0870

/*####################################################################
DATE: 20000707  PTF: ASP0870  FMID: ASEF200 */
++PTF(ASP0870).  /* --------------------------------------------------
ASP0870 000707 ISPZIP  V110 Reduce Inflate storage usage

COPYRIGHT ASE 2000.

COVERLETTER FROM ASP0869:

ASP0869 000626 ISPZIP  V110 Add support for recfm FB and U zip files

 This ptf adds support for the creation of zip files in recfm FB and U
 datasets.  ISPZIP can now write ZIP files in VB, FB and U record
 format datasets.

 This PTF also contains performance improvements for compression
 operations. The CPU time required to compress a dataset has been
 reduced and output zip files are smaller.

 A new keyword COMPLEVL(n) has been added to the EXT control card for
 compress operations.  This keyword controls the level to which ISPZIP
 searches for repeated strings in the dataset being compressed.

 COMPLEVEL can have a value of 1 to 6.  As the COMPLEVEL value
 increases the number of searches will increase.  This will result in
 a smaller output file but at an increased CPU cost.

 The default value is COMPLEVL(1). This will create a zip file using
 the least CPU time.

 Control card example:

 EXT DAT ASCII CRLF COMPLEVL(3)


COVERLETTER FROM ASP0868:

 ASP0868 000626 ISPZIP  V110 Support for user supplied translate tables

 This ptf adds support for user supplied translate tables.

 The TRMOD(modname) operand has been added to the EXT control statement
 to allow the internal ASCII to EBCDIC and EBCDIC to ASCII tables
 to be overridden. Modname must be the name of a 512 byte load module.
 The first 256 bytes of the load module are used during compression
 to convert from EBCDIC to ASCII.  The EBCDIC character is used as
 an index from the start of the load module. The EBCDIC character
 will be translated into the character at the index position.

 The second 256 bytes are used during uncompress operations to
 translate from ASCII to EBCDIC. The value of the ASCII character
 is used as an index into the second 256 bytes of the load module and
 it is translated into the character at that position.

 User supplied translate tables are not supported by the ISPF
 front-end for ISPZIP

 Control card example:

 EXT DAT ASCII CRLF TRMOD(ETOATAB)

 Load module ETOAMOD will be used to translate EBCDIC to ASCII chars.

CHANGES TO CRLF PROCESSING:

 ISPZIPX has been modified to recognize both a single line feed
 character and a carriage return/line feed pair as a record terminator
 during uncompress operations.

 The CRLF operand of the parm field and EXT control cards will cause
 both CRLF character pairs and single LF characters to be recognized
 as a record terminator. When either is encountered, they will be
 removed from the output record, the current record will be output and
 a new record started.


COVERLETTER FROM ASP0866 AND ASP0867:

 ASP0867 000626 ISPZIP  V110 Use unsigned arithmetic when counting chars
 ASP0866 000623 ISPZIP  V110 PM Enhanced Deflate support

 This PTF enhances ISPZIP support for the Deflate compression
 method.  Significant enhancements have been made to improve
 compression ratios.

 Additional Enhancements:

 Support for the addition of a single line feed character to the
 end of each record to act as a record terminator.

 Support for the creation of Data Descriptors in the output zip
 files.  This allows zip files to be created on serial devices
 that do not support re-writing blocks (.eg. tape volumes)

 New Control Card options:

 The following operands have been added to the EXT control card:

 LF   -   causes a line feed to be appended to each input record
          prior to compression.  The line feed character is used as
          an end of line indicator on UNIX systems.

 DESC -   causes a data descriptor to be written to the zip file
          after the compressed data. This option should be specified
          if you are creating a zip dataset on a non-disk device.
          Note: Zip files containing data descriptors cannot
          be uncompressed by the current version of ISPZIP. Therefore
          this option should only be used to create a zip file
          for another system. Full support will be available in
          version 1.2.

 SPEED -  causes fixed code tables to be used during compression.
          This reduces the time required to compress a file but
          produces a slightly larger output file.

 Please note that these option can only be specified in a batch job.
 The ISPF front end for ISPZIP does not currently support these
 options. ISPF support for these options will be available in version
 1.2

_APARLIST:

ASZ3161 000615 61NAAP VP ISPZIP  V110 SUGG OK    ISPZIPX  000616 S__-PMD
Add support for line feed character (x'0a') as record terminator.

ASZ3163 000615 61VASE PM ISPZIP  V110 SUGG OK    ISPZIPC  000616 O__-
Add support for Data Descriptors.

ASZ3164 000623 61VASE PM ISPZIP  P730 INCORROUT  ISPZIPC  000623 ??_S866
Incorrect decode table built when compressing non text input.

ASZ3165 000626 1NJAAP SG ISPZIP  P866 INCORROUT  ISPZIPC  000626 ??_S867
Incorrect byte counts reported when compressing a file larger than 2GB

ASZ3166 000626 61VASE PM ISPZIP  P866 INCORROUT  ISPZIPC  000626 ??_S867
Bad decode table msg when an empty file has been compressed.

ASZ3171 000720 1NJAAP SG ISPZIP  P869 ABS878-10  ISPZIPX  000720 ??_S870
Abend S878-10 when uncompressing a large number of files.

*/
++VER(Z038) FMID(ASEF200) PRE(ASP0825,ASP0728)
            SUP(ASP0730,ASP0866,ASP0867,ASP0868,ASP0869,
                ASZ3164,ASZ3166,ASZ3161,ASZ3171).
++HOLD(ASP0870) FMID(ASEF200) SYSTEM REASON(DOC)
      COMMENT(CRLF OPERAND CHANGE. REFER TO COVER LETTER).
++MOD(ISPZIP).
++MOD(ISPZIPC).
++MOD(ISPZIPX).
++MOD(ISPZIPM).
download PTF: ASP0870 98k

APAR ASZ3187

/*####################################################################
DATE: 20001031  APAR ASZ3187  FMID: ASEX100 */
++APAR(ASZ3187). /*-----------------------------------------------------

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2000.

ASZ3187 001031 44LNOR AW ISPZIP  P741 INCORROUT  ASEXCHXR 000726 ??_S871
Msg ISPZ288 not valid for mvs job statement OR BLANK when a continuation
line is specified on a JOB card statement.

_PROBLEM DESCRIPTION:

Msg ISPZ288 not valid for mvs job statement OR BLANK when a continuation
line is specified on a JOB card statement.

_PROBLEM SUMMARY:

USERS AFFECTED: All users

&INDEX code in ASEXCHXR does not process the not character (^) in the
second operand correctly.

_PROBLEM CONCLUSION

RECOMMENDATION: Apply apar fix ASZ3187

 ASEXCHXR will be modified to process the correct not character.

NEED FURTHER HELP?  CALL ASE FOR ASSISTANCE.

       */
++VER(Z038) FMID(ASEX100) PRE(ASP0741).
++ZAP(ASEXCHXR).
NAME ASEXCHXR
IDRDATA ASZ3187
VER 0F70 95B0
REP 0F70 955F

PTF ASP0919

/*####################################################################
DATE: 20011123  PTF: ASP0919  FMID: ASEF200 */
++PTF(ASP0919). /*-----------------------------------------------------
ASP0919 011123 ASEF200 V110 Implement PASSWORD facility - batch only

ASP0916 011107 ASEF200 Prevent loop when EOF reached on bad zip files

ASP0907 010604 ASEF200 P907 Suppress COND CODE 0004 on wrap when WRAP
                            keyword specified.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2002

_APARLIST:

ASZ3188 001031 44LNOR AW ISPZIP  P870 ABS0C4     ISPZIPC  ...... O__0907
Abend S0C4 when ISPZIP operand is specified in parm field.

ASZ3189 001031 44LNOR AW ISPZIP  P870 ABS0C4     ISPZIPC  ...... O__0907
Abend S0C4 when ISPZIP is invoked without a PC filename and the input
file is sequential.

ASZ3202 010202 61VNAB CC ISPZIP  P870 ABS878     ISPZIPC  000205 S__0907
AbendS878 if ISPZIP is called multiple times within the same step and
DCB=BUFNO=nn is specified on input or output DD statement.

ASZ3205 010213 44BEDS PH ISPZIP  P870 INCORROUT  ISPZIPX  010213 S__0907
When multiple files are uncompressed, TRMOD option is reset after the
first file is processed.

ASZ3210 010315 61VASE PS ASEF200 V201 INCORROUT  ISPZIPC  ...... s__0900
Incorrect CRC when uncompressing file created using the SHIP operand.

ASZ3211 010330 61VASE GG ASEF200 V201 SUGG OK    ISPZIPC  ...... s__0900
Force ISPZIP to use the same compression algorithm as ASAP when
operating in ASAP compatability mode.

ASZ3216 010529 44DREA NC ASEF200 V110 SUGG OK    ISPZIPX  ...... S__0907
suppress COND CODE 0004 on wrap when WRAP keyword was specified

ASZ3240 011031 61VPCS JL ASEF200 V1   LOOP       ISPZIPX  ...... S__0916
Loop when input ZIP dataset is invalid.

_NOTES:

This PTF includes changes made by PTFs ASP0907 AND ASP0916

This PTF adds support for data encryption to ISPZIP. Data encrytion
improves the security of data held in a zip file by restricting access
to the data to those that know a password associated with the file. When
a file is compressed it can be encrypted by specifying a password on the
SELECT statement. The file can only be uncompressed correctly by
specifying the same password during the uncompress operation.

The SELECT statement has been enhanced to support specification of
the password via the PASS= or PASSWORD= keywords.  The password is
case sensitive i.e. OPENSESAME and opensesame are different passwords.
The password can be up to 64 characters.

The report produced by ISPZIP has been enhanced to include an extra
flag (P) in the OPTION column to indicate that a file is or has been
encrypted using a password.

Example:

  The following example compresses members of a PDS into the file
  ASE.ZIP and encrypts them using three different passwords.

  //COMP     EXEC PGM=ISPZIP,
  //  PARM='COMP FDD=* TODD=ISPZOUT ZIP'
  //ISPZOUT  DD DISP=SHR,DSN=ASE.ZIP
  //IN1      DD DISP=SHR,DSN=ASE.ASE.CNTL
  //ISPZPRNT DD SYSOUT=*
  //ISPZCNTL DD *
  EXT CTL ASCII CRLF LOG INC
  FROMDD IN1
  S A*.CTL PASSWORD=mysecret
  S B*.CTL PASSWORD=DONTTELL
  S C*.CTL PASSWORD=OpenSesame

  The following job uncompresses all files beginning with A from
  ASE.ZIP. The password mysecret is required to decrypt the files.

  //UNCOMP   EXEC PGM=ISPZIP,
  //    PARM='UNCOMP FDD=* TDD=*'
  //ISPZIN   DD DISP=SHR,DSN=ASE.ZIP
  //OUT1     DD DISP=SHR,DSN=ASE.NEW.CNTL
  //ISPZPRNT DD SYSOUT=*
  //ISPZCNTL DD *
  EXT CTL ASCII CRLF TRUNC PADC( ) REP TODD(OUT1)
  S A*.CTL PASSWORD=mysecret

Example compress report:

ISPZIP 1.1.0 - Copyright ASE 2000                           Serial No:
ISPZ110I  Processing from DD IN4
ISPZ103I  Input DSN: ASE.CLEARWTR.DATABASE
Mode Charset Filename Ext  I/p-size Strips-to  O/p-size Save Member-- Options
ZIP  EBCDIC  DB       DAT  13171200 (NOSTRIP)   4975778  62%              IDP
Totals ----- Files     1   13171200 (NoStrip)   4975778  62%
ISPZ070I  Return code=  0

Example uncompress report:

ISPZIP 1.1.0 - Copyright ASE 2000                           Serial No:
ISPZ017I  Input  DSN=ASE.BIG.ZIP
ISPZ019W  WARNING output lrecl shorter than input lrecl - wrapping data
ISPZ022I OLD o/p DSN=ASE.TEMP.DATABASE                          10976 10
Filename Ext Date------ Time- Orig-Size Comp-Size Save Method-- Member-- Options
DB       DAT 2002/01/09 18:21  13171200   4975778  62% DEFLATE              WRP
Totals   Files:       1        13171200   4975778  62%
ISPZ070I  Return code=  0

In both reports the P in the Options column signifies that the file is
encrypted and a password is required to unzip the file.


ASP0907 Changes.

ASP0907 changes the return code set during an UNCOMP operation when
the WRAP keyword is specified and uncompressed records are longer than
the output dataset LRECL.  Prior to ASP0907 the following message:

ISPZ019W  WARNING output lrecl shorter than input lrecl - wrapping data

would be issued if the records were wrapped and a return code 4 would
be set.  With ASP0907 applied, the ISPZ019W message will be issued but
the return code will be set to 0 if the WRAP keyword was explicitly
specified on the control cards or in the PARM field.  If the WRAP
keyword was not specified and wrapping occured by default then a return
code 4 will be set.

*/
++VER(Z038) FMID(ASEF200) PRE(ASP0870)
            SUP(ASZ3188,ASZ3189,ASZ3202,ASZ3205,ASZ3210,ASZ3211,
            ASP0900,ASZ3216,ASP0907,ASZ3240,ASP0916).
++HOLD(ASP0907) FMID(ASEF200) SYSTEM REASON(DOC)
   COMMENT(THE RETURN CODE SET WHEN DATA IS WRAPPED HAS CHANGED.
           REFER TO ASP0919 COVER LETTER NOTES).
++MOD(ISPZIPC).
++MOD(ISPZIPX).
++MOD(ISPZIPM).
download PTF: ASP0919 74k

PTF ASP0924

/*####################################################################
DATE: 20020225  PTF: ASP0924  FMID: ASEF200 */
++PTF(ASP0924). /*-----------------------------------------------------
ASP0924 020225 ASEF200 V110 ASZ3252 Bad CRC when blocks are stored

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2002

_APARLIST:

ASZ3252 020225 61VASE PM ISPZIP  P919 INCORROUT  ISPZIPC  020227 O__-PMD
CRC check fails when uncompressing a file created by ISPZIP that
contains blocks that were stored instead of deflated.

*/
++VER(Z038) FMID(ASEF200) PRE(ASP0919)
            SUP(ASZ3252).
++MOD(ISPZIPC).
download PTF: ASP0924 32k

PTF ASP0937

/*####################################################################
DATE: 20020606  PTF: ASP0937  FMID: ASEF200 */
++PTF(ASP0937). /*-----------------------------------------------------
ASP0937 020606 ASEF200 V110 Set Rc=4 if Select control card is not match
ASP0926 020325 ASEF200 V110 Support EXT keyword on select statement

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2002

_APARLIST:

ASZ3255 020325 61VASE PM ISPZIP  P919 INCORROUT  ISPZIPX  020325 S__0926
EXT keyword on SELECT statement is ignored during uncompress.

ASZ3266 020607 61VASE GG ISPZIP  P926 INCORROUT  ISPZIPX  020607 S__0937
Support FROMDD statement during uncompress.

ASZ3267 020607 61NCYP AR ISPZIP  P926 ABU978     ISPZIPX  020607 S__0937
Abend S978 if open fails for ISPZIN DD statement during uncompress

ASZ3268 020607 61NSGB MP ISPZIP  P926 INCORROUT  ISPZIPX  020607 S__0937
Set RC=4 if selection control card is not matched during uncompress.

ASZ3269 020607 61VASE PM ISPZIP  P926 INCORROUT  ISPZIPX  020607 S__0937
Control statements in error are not printed correctly.

_NOTES:

After ASP0937 is applied ISPZIP sets a return code of 4 if any Select
control card in an uncompress operation does not match at least one file
in the input ZIP dataset.  A message 'ISPZ000W Unmatched Selection
Statement' is also issued.

A new keyword NOSELECT=OK has also been added to the Select control
card.  This can be used to force ISPZIP to ignore the fact that the
control card does not match any files and set a return code of zero.

e.g.
    S FRED.DAT
    S FRED.ERR NOSELECT=OK

If FRED.DAT is not found in the input ZIP dataset then a return code of
4 will be set.   If FRED.DAT is found but FRED.ERR is not then a return
code of 0 will be set as the NOSELECT=OK keyword has been specified.

*/
++VER(Z038) FMID(ASEF200) PRE(ASP0919)
           SUP(ASZ3255,ASP0926,ASZ3255,ASZ3266,ASZ3267,ASZ3268,ASZ3269).
++HOLD(ASP0937) FMID(ASEF200) SYSTEM REASON(DOC)
   COMMENT(THE RETURN CODE SET WHEN A SELECT STMT IS NOT MATCHED
           HAS CHANGED. REFER TO COVER LETTER NOTES).
++MOD(ISPZIPX).
download PTF: ASP0937 28k
/*####################################################################
DATE: 20030208  END BUCKET  PRODUCT:  */