OMCS/MVS Version 2.9
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.

To comment or request assistance, please email ASE Copyright ASE 2012 Last updated: 03:14 FRI 27th Jan 2012 GMT


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
ASEB209 OMCS 2.9 Base
ASEC209 OMCS IRM
ASED209 OMCS JSF
ASEE209 OMCS CICS Interface
ASEG209 OMCS SRF


PTF ASP1096

/*####################################################################
DATE: 20090305  PTF: ASP1096  FMID: ASEC209 */
++PTF(ASP1096). /*--------------------------------------------------
ASP1096 090305 ASEC209 prevent message IR669I when very large reports

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2009

_APARLIST:

ASZ3467 090304 61VNAB DD OMCSIRM V280 MSGIR669I  OMCSXWRP 090310 S__1096
Msg IR669I in report discovery while consolidating very large reports

Please contact ASE if you have any questions about this PTF.
help@ase.com.au

       */
++VER(Z038) FMID(ASEC209)
            SUP(ASZ3467).
++SRC(OMCSXWRP).
++MOD(OMCSXWRP).
download PTF: ASP1096 64k

PTF ASP1097

/*####################################################################
DATE: 20090311  PTF: ASP1097  FMID: ASEB209 */
++PTF(ASP1097). /*--------------------------------------------------
ASP1097 090311 ASEB209 Display the OMCS version from the OMCSTSSJ main panel

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2009

_APARLIST:

ASZ3469 090310 61VASE PS OMCSV2  V290 SUGG OK    OMCSTSSJ 090311 S__1097
Provide ability to display the OMCS version from the OMCSTSSJ main panel

Please contact ASE if you have any questions about this PTF.
help@ase.com.au

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3469).
++SRC(OMCSTSSJ).
++MOD(OMCSTSSJ).
++PNL(OMCSSJSM).
++PNL(OMCSTSLV) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSTSSJ).
download PTF: ASP1097 61k

PTF ASP1098

/*####################################################################
DATE: 20090316  PTF: ASP1098  FMID: ASEC209 */
++PTF(ASP1098). /*--------------------------------------------------
ASP1098 090316 ASEC209 OMCSCTLC copy all (NAME=*) did not copy anything

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2009

_APARLIST:

ASZ3470 090313 61VASE PS OMCSIRM V290 INCORROUT  OMCSCTLC 090316 S__1098
COPY...SELECT MA_RULE NAME(*) does not select any rules to copy
LC025I NO MATCHING RECORD/S FOUND FOR NAME (*)

Please contact ASE if you have any questions about this PTF.
help@ase.com.au

       */
++VER(Z038) FMID(ASEC209)
            SUP(ASZ3470).
++SRC(OMCSCTLC).
++MOD(OMCSCTLC).
download PTF: ASP1098 28k

PTF ASP1101

/*####################################################################
DATE: 20090417  PTF: ASP1101  FMID: ASEB209 */
++PTF(ASP1101). /* -------------------------------------------------
ASP1101 090417 ASEB209 ASEPRINT Incorrect line printed if file greater
        than 16M lines

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2009

_APARLIST:

ASZ3472 090417 61VNAB DD OMCSV2  V210 INCORROUT  ASEPRINT 090417 S__1101
Wrong lines printed when file contains more than 16M lines

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3472).
++MOD(ASEPRINT).
download PTF: ASP1101 13k

PTF ASP1108

/*####################################################################
DATE: 20090612  PTF: ASP1108  FMID: ASEB209 */
++PTF(ASP1108). /*-----------------------------------------------------
ASP1108 090612 ASEB209 Modernise GENISCM sample

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2009

_APARLIST:

       */
++VER(Z038) FMID(ASEB209).
++SAMP(GENISCM).
download PTF: ASP1108 1.7k

PTF ASP1109

/*####################################################################
DATE: 20090710  PTF: ASP1109  FMID: ASEB209 */
++PTF(ASP1109) REWORK(2009191). /*----------------------------------
ASP1109 090618 ASEB209 increase max filesize in OMCSAMCO OUTGROUP cntl stmt

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2009

_APARLIST:

ASZ3473 090618 61VASE GG OMCSV2  V209 SUGG  OK   OMCSAMCO 090630 S__1109
increase maximum filesize in OUTGROUP cntl stmt to approx. 100G

_SUMMARY OF CHANGES:

OPTIONS statement: FILESIZE= value maximums have been extended to:
  99999999K     ie approx 100G   100,000,000,000
  99999M        ie approx 100G   100,000,000,000
  9999999 blks  ie approx 41G (for blksize=4k) to 280G (for blksize=27998)

OPTIONS statement: SIMULATE keyword now supported:
  The program does everything except write new archive datasets.
  The AMF index is not updated.

OMCSAMCO control listing has been made more readable and more informative.

Message descriptions have been extended to include new and changed messages.

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3473).
++SRC(OMCSAMCO).
++MOD(OMCSAMCO).
download PTF: ASP1109 49k

PTF ASP1113

/*####################################################################
DATE: 20090828  PTF: ASP1113  FMID: ASEB209 */
++PTF(ASP1113). /* -------------------------------------------------
ASP1113 090828 ASEB209 OMCSJDSR fails to insert '|' in job detail record

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2009

_APARLIST:

ASZ3474 090731 61VNAB MK OMCSV2  V209 INCORROUT  OMCSJDSR 090828 S__1113
OMCSJDSR fails to insert '|' in job detail record for deleted jobs

       */
++VER(Z038) FMID(ASEB209) SUP(ASZ3474).
++MOD(OMCSJDSR).
download PTF: ASP1113 4.3k

PTF ASP1116

/*####################################################################
DATE: 20090914  PTF: ASP1116  FMID: ASEC209 */
++PTF(ASP1116). /*--------------------------------------------------
ASP1116 090914 ASEC209 support larger IRM report analysis rules

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2009

_APARLIST:

ASZ3475 090911 61VNAB MK OMCSV2  V209 MSGDAIO63I OMCSRASC 090924 S__1116
"DAIO63I RECORD TOO LONG" when trying to save very large analysis rule

_SUMMARY OF CHANGES:

The maximum size of a report analysis rule was limited by the size of a
database block.  PTF ASP1116 has removed that limit and the maximum size
of a rule is now slightly less than 64k.  This represents a several-fold
increase in the maximum size of a single rule, about six-fold in the
case where the database blocksize was 10k, for example.  When the user
attempts to save (EXIT from the editor) a changed rule that would now
exceed the "64k" limit it will issue a message asking the user to
modify the rule.  Alternatively the user may use the CANcel command to
discard the changes made to the rule.

The structure of Report Analysis Rules file (file "REPTANAL /IRM") in
the IRM database, will be changed after this PTF is installed.  The
first time IRM option MA (the Report Analysis Rules editor) is used
after this PTF is installed, the user will be prompted to proceed with
conversion to the new format.  This conversion must be completed before
actual changes to rules may be effected.

Note that report discovery jobs will continue to function normally
before and after the conversion has been done.

The rule editor has also been enhanced so that it no longer holds the
Report Analysis Rules file open for update during the entire user edit
session.  Two or more users may now use the editor to simultaneously
edit different rules within the same Report Analysis Rules file.
Furthermore, IRM report discovery jobs will no longer wait while the
rule editor is in use, which has been the case until now.

       */
++VER(Z038) FMID(ASEC209)
            REQ(ASP1117)
            SUP(ASZ3475).
++SRC(OMCSRASC).
++SRC(OMCSXWIR).
++MOD(OMCSRASC).
++MOD(OMCSXWIR).
++PNL(OMCSRADC) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSRAD1).
download PTF: ASP1116 60k

PTF ASP1124

/*####################################################################
DATE: 20091118  PTF: ASP1124  FMID: ASEC209 */
++PTF(ASP1124). /*--------------------------------------------------
ASP1124 091118 ASEC209 ASZ3479 stop stmt execution limit failure in irm jobs

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2009

_APARLIST:

ASZ3479 091118 61VNAB WM ASEC209 1116 SUGG  OK   OMCSXWIR 091118 S__1124
prevent stmt execution limit failure occurring in report discovery jobs

       */
++VER(Z038) FMID(ASEC209)
            PRE(ASP1116)
            SUP(ASZ3479).
++SRC(OMCSXWIR).
++MOD(OMCSXWIR).
download PTF: ASP1124 28k

PTF ASP1143

/*####################################################################
DATE: 20100811  PTF: ASP1143  FMID: ASEB209 */
++PTF(ASP1143). /*--------------------------------------------------
ASP1143 100811 ASEB209 support SJ line & primary commands in OMCSTSSJ

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2010

_APARLIST:

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1097).
++SRC(OMCSTSSJ).
++MOD(OMCSTSSJ).
++PNL(OMCHSJLC).
++PNL(OMCHSJSB).
++PNL(OMCHSJS6) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
download PTF: ASP1143 64k

PTF ASP1139

/*####################################################################
DATE: 20100818  PTF: ASP1139  FMID: ASEB209 */
++PTF(ASP1139). /*--------------------------------------------------
ASP1139 100818 ASEB209 Last report line repeated endlessly when viewing in RVF.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2010

_APARLIST:

ASZ3486 100705 61VTEL MC ASEB209 V209 INCORROUT  ASEDAMRM 100824 S__1139
Last line of report is repeated endlessly when viewing a report in RVF.

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3486).
++IF FMID(ASEC209) THEN REQ(ASP1146).
++MOD(ASEDAMRM).
++MOD(OMCSECKM).
download PTF: ASP1139 31k

PTF ASP1146

/*####################################################################
DATE: 20100824  PTF: ASP1146  FMID: ASEC209 */
++PTF(ASP1146). /*--------------------------------------------------
ASP1146 100824 ASEC209 Last report line repeated endlessly when viewing in RVF.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2010

_APARLIST:

       */
++VER(Z038) FMID(ASEC209)
            REQ(ASP1139).
++SRC(OMCSIRPP).
++SRC(OMCSIRUV).
++MOD(OMCSIRPP).
++MOD(OMCSIRUV).
download PTF: ASP1146 66k

PTF ASP1155

/*####################################################################
DATE: 20110222  PTF: ASP1155  FMID: ASEB209 */
++PTF(ASP1155) REWORK(2011053). /*----------------------------------
ASP1155 110221 ASEB200 OMCSDBEX/OMCSDBIM Increase size of work files
               to handle databases with a large number of files

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3494 110221 61VNAB TT OMCSv2  V209 MSGEX013E  OMCSDBEX 110221 S__1155
Msg OMCEX013E IRAC failed for candidate file rc=0016 if database has
a large number of directory entries.

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3494).
++MOD(OMCSDBDN).
++MOD(OMCSDBVR).
++MOD(OMCSDBEX).
++MOD(OMCSDBIM).
download PTF: ASP1155 48k

PTF ASP1157

/*####################################################################
DATE: 20110321  PTF: ASP1157  FMID: ASEB209 */
++PTF(ASP1157). /*-------------------------------------
ASP1157 110321 ASEB209 OMCSTSDB/OMCSAMFP support for job detail records
                       with absolute job number of ????????

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEB209).
++SRC(OMCSTSDB).
++SRC(OMCSAMFP).
++MOD(OMCSTSDB).
++MOD(OMCSAMFP).
download PTF: ASP1157 52k

PTF ASP1159

/*####################################################################
DATE: 20110323  PTF: ASP1159  FMID: ASEB209 */
++PTF(ASP1159). /* -------------------------------------------------
ASP1159 110323 ASEB209 OMCSDBSR Increase work file sizes
                       Set rc=4 when target freespace not reached

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3497 110322 61VNAB TT OMCSV2 V209 MSGOMCSR018 OMCSDBSR 110325 S__1159
msg OMCSR018E UNEXPECTED ERROR RCRD IN WORK FILE when FLIM parameter
value is greater than 28000.

ASZ3498 110322 61VNAB TT OMCSV2  V209 INCORROUT  OMCSDBSR 110325 S__1159
OMCSDBSR fails to set rc=4 when it fails to meet free space objective.

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3497,ASZ3498).
++MOD(OMCSDBSR).
download PTF: ASP1159 11k

PTF ASP1160

/*####################################################################
DATE: 20110323  PTF: ASP1160  FMID: ASEB209 */
++PTF(ASP1160). /*-------------------------------------
ASP1160 110323 ASEB209 OMCSAMFS Remove LABEL= from restore jobs

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3499 110322 61VODP TI OMCSV2  V209 INCORROUT  OMCSAMFS ?????? O__1160
AMF restore job fails with msg EDG4029I when LABEL= value does not
match sequence number in catalog for dataset.

       */
++VER(Z038) FMID(ASEB209).
++SAMP(AMFARJCL).
++SRC(OMCSAMFS).
++MOD(OMCSAMFS).
download PTF: ASP1160 6.8k

PTF ASP1161

/*####################################################################
DATE: 20110405  PTF: ASP1161  FMID: ASEB209 */
++PTF(ASP1161).  /*-------------------------------------------------
ASP1161 110405 ASEB209 OMCSAMFG to allow for empty AMFREQQ file

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3500 110404 61VNAB TT OMCSV2  V209 INCORROUT  OMCSAMFG 110406 S__1161
When AMFREQQ is empty, OMCSAMFG ends with rc=8 and message OMCAM102I.

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3500).
++SRC(OMCSAMFG).
++MOD(OMCSAMFG).
download PTF: ASP1161 41k

PTF ASP1162

/*####################################################################
DATE: 20110405  PTF: ASP1162  FMID: ASEB209 */
++PTF(ASP1162).  /*-------------------------------------------------
ASP1162 110405 ASEB209 ASZ3501 prevent "STMT FETCH COUNT LIMIT
                       EXCEEDED" in OMCSAMCO
ASP1158 110323 ASEB209 ASZ3496 OMCSAMCO Msg AMC12E - insufficient free
                       space for AMFINDEX to expand
ASP1152 110110 ASEB209 ASZ3492 OMCSAMCO rewrite incl. OMCSAMX1 4BYTEPFX option

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3492 110110 61VNAB TT OMCSV2  V209 INCORROUT  OMCSAMCO 110216 S__1152
various lack of memory failures when runing with SIMULATE on.

ASZ3496 110321 61VNAB TT OMCSV2  V209 MSGAMC12E  OMCSAMCO 110328 S__1158
Msg AMC12E when insufficient free space for AMFINDEX expansion in work
database and OMCSDBEX fails.

ASZ3501 110405 61VNAB TT OMCSV2  V209 INCORROUT  OMCSAMCO 110406 S__1162
Msg "STMT FETCH COUNT LIMIT EXCEEDED" when work database is very large.

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1109)
            SUP(ASP1152,ASP1158,ASZ3492,ASZ3496,ASZ3501).
++SRC(OMCSAMCO).
++MOD(OMCSAMCO).
++MOD(OMCSAMX1).
download PTF: ASP1162 54k

PTF ASP1163

/*####################################################################
DATE: 20110408  PTF: ASP1163  FMID: ASEB209 */
++PTF(ASP1163). /*-------------------------------------
ASP1163 110408 ASEB209 ASZ3502 Prevent OMCDF033 message when new dataset
                       name is a sub string of another dataset name

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3471 090323 61VNAB DD OMCSV2  V210 MSGOMCDT01 OMCSDDRF 090408 S__1100
DDRF INIT call fails if no space in database, unable to enqueue resource

ASZ3495 110228 61VNAB TT OMCSV2  209 MSGOMCDF031 OMCSDDRF 090408 S__1156
Incorrect msg 'OMCDF031 128 databases defined, cannot add another' when
only free database number is greater than 100

ASZ3502 110406 61VNAB MK OMCSV2 V209 MSGOMCDF033 OMCSDDRB 110406 S__1163
Msg OMCDF033 dataset already defined as DB xxx when new dataset name is
a sub string of another dataset name.

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3495,ASP1156,ASZ3502,ASP1100,ASZ3471).
++SRC(OMCSDDRF).
++MOD(OMCSDDRF).
download PTF: ASP1163 22k

PTF ASP1164

/*####################################################################
DATE: 20110414  PTF: ASP1164  FMID: ASEB209 */
++PTF(ASP1164).  /*-------------------------------------------------
ASP1164 110414 ASEB209 job viewing PRT command to support print to email

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEB209).
++SRC(OMCSPRTM).
++MOD(OMCSPRTM).
++PNL(OMCHPRT5).
++PNL(OMCHPRT6) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSPRTM).
download PTF: ASP1164 34k

PTF ASP1165

/*####################################################################
DATE: 20110414  PTF: ASP1165  FMID: ASEC209 */
++PTF(ASP1165).  /*-------------------------------------------------
ASP1165 110414 ASEC209 support IRM bundle printing to email

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEC209)
            REQ(ASP1169,ASP1171).
++SRC(OMCSCTLR).
++SRC(OMCSIRAR).
++SRC(OMCSIRBB).
++SRC(OMCSIRBM).
++SRC(OMCSIRBR).
++SRC(OMCSIRBT).
++SRC(OMCSIRFD).
++SRC(OMCSIRIB).
++SRC(OMCSIRMV).
++SRC(OMCSIRND).
++SRC(OMCSIRPR).
++SRC(OMCSIRSR).
++SRC(OMCSIRUM).
++MOD(OMCSCTLR).
++MOD(OMCSIRAR).
++MOD(OMCSIRBB).
++MOD(OMCSIRBM).
++MOD(OMCSIRBR).
++MOD(OMCSIRBT).
++MOD(OMCSIRFD).
++MOD(OMCSIRIB).
++MOD(OMCSIRMV).
++MOD(OMCSIRPR).
++MOD(OMCSIRSR).
++MOD(OMCSIRUM).
++PNL(OMCHIRMA) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCHIRMV).
++PNL(OMCHIRMW).
++PNL(OMCHIRMX).
++PNL(OMCHIRMY).
++PNL(OMCHIRMZ).
++PNL(OMCHIRND).
++PNL(OMCHIRP1).
++PNL(OMCHIU06).
++PNL(OMCHIU07).
++PNL(OMCSIRAT).
++PNL(OMCSIRMV).
++PNL(OMCSIRMW).
++PNL(OMCSIRND).
++PNL(OMCSIRPR).
++PNL(OMCSIRUM).
download PTF: ASP1165 425k

PTF ASP1166

/*####################################################################
DATE: 20110414  PTF: ASP1166  FMID: ASEB209 */
++PTF(ASP1166).  /*-------------------------------------------------
ASP1166 110414 ASEB209 OMCSJBUS fixes and enhancements

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3504 110408 61VNAB TT OMCSV2 V209 INCORROUT   OMCSJBUS 110419 S__1166
various lack of memory failures

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3504).
++SRC(OMCSJBUS).
++MOD(OMCSJBUS).
++SAMP(RUNJBUS).
download PTF: ASP1166 13k

PTF ASP1167

/*####################################################################
DATE: 20110502  PTF: ASP1167  FMID: ASEB209 */
++PTF(ASP1167). /*---------------------------------
ASP1167 110502 ASEB209 Retrofit JESJCLIN capture and batch file capture
                       to version 2

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

This PTF retrofits the JESJCLIN capture and batch file capture features
of version 4 to version 2.

JESJCLIN capture will be supported for jobs that have job processing
rule variable JPVACJCL set to Y and have their jcl captured by the
writer.  The JESJCLIN segment will be placed at the end of the captured
output prior to the job audit segment.

Batch file capture allows a writer to process a sysout file stored in
a dataset. The file to be processed is specified using keywords on the
parm field of the EXEC statement or in the XWAFIN DD control file.

The following parms can be specified:

BATCH     - Indicates the writer is to run in match mode.
JOBNAME   - The name of the job that created the file. Defaults to
            current jobname.
JOBID     - The jobid for the creating job in format JOBnnnnn. Defaults
            to current jobid.
DSN       - The name of the file to be processed.
DD        - The DD to which the file to be processed is allocated.
RUNON     - The date the file was created in format YYYYMMDD. Defaults
            to current date.
FORM      - Optional forms code for the output.

Examples of EXEC statements:

  //IEFPROC  EXEC  PGM=OMCSXWMT,REGION=6144K,TIME=1440,
  //   PARM='WTR(BATCH,JOBNAME=PROD105A,FORM=FORM101,JOBID=JOB01234,
  //             DD=REPORT)'

  The file will be read from DD statement REPORT and stored under
  jobname PROD105A with jobid JOB1234 and a forms code of FORM101.

  //IEFPROC  EXEC  PGM=OMCSXWMT,REGION=6144K,TIME=1440,
  //   PARM='WTR(BATCH,JOBNAME=DAILYRPT,JOBID=JOB02345,
  //             DSN=PROD.DAILYRPT.DATA

  The file will be read from dataset PROD.DAILYRPT.DATA and stored
  under jobname DAILYRPT with jobid JOB2345. Runon will default to
  today.

  //IEFPROC  EXEC  PGM=OMCSXWMT,REGION=6144K,TIME=1440,
  //   PARM='WTR(BATCH,JOBNAME=DAILYRPT,JOBID=JOB02345,RUNON=20110530,
  //             DSN=PROD.DAILYRPT.DATA

  The file will be read from dataset PROD.DAILYRPT.DATA and stored
  under jobname DAILYRPT with jobid JOB2345 and RUNON will be set to
  MAY30.

  //IEFPROC  EXEC  PGM=OMCSXWMT,REGION=6144K,TIME=1440,
  //   PARM='WTR(BATCH,DD=REPORT)

  The file will be read from DD statement REPORT and stored under
  current jobname with the current jobid and RUNON date of today.

EXAMPLES of XWAFIN statements:

  //XWAFIN DD *
  BATCH
  JOBNAME=PROD105A
  JOBID=JOB07856
  RUNON=20110530
  DSN=PROD.DAILYRPT.DATA
  FORM=STD4

  The file will be read from dataset PROD.DAILYRPT.DATA and stored
  under jobname PROD105A with jobid JOB7856. Runon will be set to
  20110530 and forms code set to STD4.

_APARLIST:

ASZ3490 101229 1NYMFH JD ASEB209 2.9 MSGOMCXW503 OMCSXWPS
IEF374I and IEF376I replaced by IEF032I and IEF033I

ASZ3483 100611 61VNAB NG ASEB209 V209 INCORROUT  OMCSXWNJ 100615 S__-113
Code to validate ABS number uses wrong base register and fails to detect
that next ABS number is lower than previous record.

ASZ3481 091201 61VASE PS ASEB209 V209 SUGG  OK   OMCSMJPR 100119 S__1127
Change JPVAKRJR from a user variable in JPR to a system variable

       */
++VER(Z038) FMID(ASEB209) SUP(ASP1151,ASP1136,ASP1127) PRE(ASP1169).
++MOD(OMCSXWAF).
++MOD(OMCSXWCJ).
++MOD(OMCSXWMT).
++MOD(OMCSXWNJ).
++MOD(OMCSXWPS).
++MOD(OMCSXWUF).
++MOD(OMCSTSSJ).
++SRC(OMCSTSSJ).
++MOD(OMCSMJPR).
++SRC(OMCSMJPR).
++MOD(OMCSMJPV).
++SRC(OMCSMJPV).
++PNL(OMCSSJSY).
download PTF: ASP1167 126k

PTF ASP1168

/*####################################################################
DATE: 20110506  PTF: ASP1168  FMID: ASEB209 */
++PTF(ASP1168).  /*-------------------------------------------------
ASP1168 110506 ASEB209 prevent ISPF msg ISPP289 when viewing job output
                       on terminal with width>80.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3505 110505 61VNAB MK OMCSV2 V209 MSGISPP289  OMCSTSBR 110516 S__1168
Job viewing fails with msg ISPP289 (invalid width) on 3270 terminal with
width>80 when ispf settings (option 0) specifies screen format STD.

ASZ3506 110512 61VODP MK OMCSV2 V209 ABS0C4      ASEDMSDM 110517 S__1168
Abend S0C4 in OMCS when using screen size 62x160

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3505,ASZ3506).
++MOD(ASEDMSDM).
++MOD(OMCSTSBR).
download PTF: ASP1168 25k

PTF ASP1169

/*####################################################################
DATE: 20110506  PTF: ASP1169  FMID: ASEB209 */
++PTF(ASP1169).  /*-------------------------------------------------
ASP1169 110506 ASEB209 When ISPF screen format is STD, prompt user to change
                       it to MAX

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASP1117)
            REQ(ASP1168)
            PRE(ASP1143).
++SRC(ASESTDPR).
++SRC(OMCSTSSJ).
++MOD(ASESTDPR).
++MOD(OMCSTSSJ).
++PNL(OMCHUTSF) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSUTSF) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSUTS2) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
download PTF: ASP1169 153k

PTF ASP1170

/*####################################################################
DATE: 20110520  PTF: ASP1170  FMID: ASEC209 */
++PTF(ASP1170).  /*-------------------------------------------------
ASP1170 110520 ASEC209 When ISPF screen format is STD, prompt RVF user to change
                       it to MAX

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEC209)
            REQ(ASP1169)
            PRE(ASP1146).
++SRC(OMCSIRUV).
++MOD(OMCSIRUV).
download PTF: ASP1170 39k

PTF ASP1171

/*####################################################################
DATE: 20110525  PTF: ASP1171  FMID: ASEB209 */
++PTF(ASP1171).  /*-------------------------------------------------
ASP1171 110525 ASEB209 base product support for PTF ASP1165

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1164).
++JCLIN.
//STEP1    EXEC PGM=IEWL,
//            PARM='LIST,MAP,NCAL,REUS'
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSLMOD  DD DSN=ASE.ASELIB,DISP=SHR
//AASELOAD DD DSN=ASE.AASELOAD,DISP=SHR
//SYSLIN   DD *
 INCLUDE AASELOAD(OMCSECLX,OMCSIDEN,OMCSPDEM)
 ORDER OMCSECLX
 ENTRY OMCSECLX
 NAME  OMCSPDEM(R)
++SRC(OMCSPDEM) DISTLIB(AASEECPS) SYSLIB(ASEECPS) DISTMOD(AASELOAD).
++SRC(OMCSPRTM).
++MOD(OMCSPDEM) DISTLIB(AASELOAD) LEPARM(RENT,REUS).
++MOD(OMCSPRTM).
download PTF: ASP1171 45k

PTF ASP1174

/*####################################################################
DATE: 20110603  PTF: ASP1174  FMID: ASEB209 */
++PTF(ASP1174). /*---------------------------------
ASP1174 110603 ASEB209 Prevent S0C4 in writer when WTO issued by ecp

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3514 110628 61VNAB TT OMCSV2 P1167 ABS0C4     OMCSXWUF 110629 S__1174
OMCS writer abends S0C4 when an ecp issues a WTO statement

       */
++VER(Z038) FMID(ASEB209) SUP(ASZ3514) PRE(ASP1167).
++MOD(OMCSXWAF).
++MOD(OMCSXWCJ).
++MOD(OMCSXWNJ).
++MOD(OMCSXWPS).
++MOD(OMCSXWUF).
download PTF: ASP1174 39k

PTF ASP1175

/*####################################################################
DATE: 20110608  PTF: ASP1175  FMID: ASEB209 */
++PTF(ASP1175).  /*-------------------------------------------------
ASP1175 110608 ASEB209 display fails with msg ISPV006 after ASP1168

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3505 110505 61VNAB MK OMCSV2 V209 MSGISPP289  OMCSTSBR 110516 S__1168
Job viewing fails with msg ISPP289 (invalid width) on 3270 terminal with
width>80 when ispf settings (option 0) specifies screen format STD.

ASZ3506 110512 61VODP MK OMCSV2 V209 ABS0C4      ASEDMSDM 110517 S__1168
Abend S0C4 in OMCS when using screen size 62x160

ASZ3509 110527 61VNAB MK OMCSV2  V209 MSGISPV006 ASEDMSDM 110609 S__1175
Panel display fails with msg ISPV006 - Data for CHAR format variable
"XBODY" was too long.

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASP1168,ASZ3505,ASZ3506,ASZ3509).
++MOD(ASEDMSDM).
++MOD(OMCSTSBR).
download PTF: ASP1175 25k

PTF ASP1177

/*####################################################################
DATE: 20110614  PTF: ASP1177  FMID: ASEB209 */
++PTF(ASP1177). /*---------------------------------
ASP1177 110614 ASEB209 tolerate IQA print queue in user profile

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

       */
++VER(Z038) FMID(ASEB209) PRE(ASP1167).
++SRC(OMCSTSSJ).
++MOD(OMCSTSSJ).
download PTF: ASP1177 64k

PTF ASP1179

/*####################################################################
DATE: 20110615  PTF: ASP1179  FMID: ASEC209 */
++PTF(ASP1179).  /*-------------------------------------------------
ASP1179 110615 ASEC209 support print-to-email in RVF

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEC209)
            PRE(ASP1170).
++SRC(OMCSIRUV).
++MOD(OMCSIRUV).
++PNL(OMCHIRUL).
++PNL(OMCHIRUQ).
++PNL(OMCSIRU8).
download PTF: ASP1179 45k

PTF ASP1182

/*####################################################################
DATE: 20110628  PTF: ASP1182  FMID: ASEC209 */
++PTF(ASP1182).  /*-------------------------------------------------
ASP1182 110628 ASEC209 OMCSXWIR to correctly process ANALYSE/ANALYZE parm
                       alternatives

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3512 110627 61VASE PM OMCSV2  V209 INCORROUT  OMCSXWIR 110628 S__1182
Iconsistent processing of parameter alternatives ANALYSE and ANALYZE.

       */
++VER(Z038) FMID(ASEC209) PRE(ASP1124)
            SUP(ASZ3512).
++SRC(OMCSXWIR).
++MOD(OMCSXWIR).
download PTF: ASP1182 28k

PTF ASP1183

/*####################################################################
DATE: 20110628  PTF: ASP1183  FMID: ASEB209 */
++PTF(ASP1183). /*--------------------------------------------------
ASP1183 110628 ASEB209 OMCSDBVR Allow other jobs to access DIRECTRY
                       SYSFILE while OMCSDBVR is running.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3513 110624 61VNAB TT OMCSV2  V209 ABS522     OMCSDBVR 111012 S__1183
Jobs abend S522 while waiting for access to DIRECTRY SYSFILE while
OMCSDBVR is running.

       */
++VER(Z038) FMID(ASEB209) PRE(ASP1155)
            SUP(ASZ3513).
++MOD(OMCSDBVR).
++MOD(OMCSDBVS).
++SRC(OMCSDBVS).
download PTF: ASP1183 44k

PTF ASP1187

/*####################################################################
DATE: 20110712  PTF: ASP1187  FMID: ASEB209 */
++PTF(ASP1187) REWORK(2011193). /*------------------------------
ASP1187 110708 ASEB209  OMCSDBEX Allow multiple backups to run if
                                 BKUP or INCR keyword not specified
                                 or NOINTRLK keyword is specified.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3516 110708 61VASE PM OMCSV2  V209 SUGG OK    OMCSDBEX 1107__ O__-PMD
Bypass open of OMCSDBBU INTRLOCK if BKUP/INCR not coded or NOINTRLK
coded.

_NOTES:

The PTF adds the NOINTRLK keyword.

OMCSDBEX opens a file OMCSDBBU INTRLOCK within the database being
backed up with update access to serialize backup jobs. This PTF prevents
this file being opened if the NOINTRLK keyword is specified in the
parm field or if the BKUP or INCR keywords are omitted. This will
allow multiple backup jobs to access the database.

In situations where the BKUP or INCR keywords are specified and the
NOINTRLK keywork is also specified, it us up to the user to ensure
that the integrity of the backup.

       */
++VER(Z038) FMID(ASEB209) PRE(ASP1155) SUP(ASZ3516).
++MOD(OMCSDBEX).
download PTF: ASP1187 13k

PTF ASP1190

/*####################################################################
DATE: 20110719  PTF: ASP1190  FMID: ASEB209 */
++PTF(ASP1190). /*----------------------------------------------
ASP1190 110719 ASEB209 ASEDAMGR Correct freespace calculation in COPY
                                 routine

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3522 110719 61VNAB TT OMCSV2  V209 ABSU3957   ASEDAMGR 110707 O__-PMD
Msg DAI057I CKBS DETECTED STRUCTURAL ERRORS IN BLK when creating + file

       */
++VER(Z038) FMID(ASEB209) SUP(ASZ3522).
++MOD(ASEDAMGR).
download PTF: ASP1190 9.2k

PTF ASP1191

/*####################################################################
DATE: 20110720  PTF: ASP1191  FMID: ASEB209 */
++PTF(ASP1191).  /*-------------------------------------------------
ASP1191 110720 ASEB209 OMCSAMCO to tolerate duplicate files in archives.
                       Allow other processes to access /AMF AMFINDEX while
                       OMCSAMCO is running.
                       Ensure AMF option 2 date range works correctly after
                       OMCSAMCO has run.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3511 110623 61VNAB TT OMCSV2  V209 INCORROUT  OMCSAMCO 110628 S__1181
Duplicate file in archive causes OMCSAMCO failure with rc=16.

ASZ3515 110630 61VNAB TT OMCSV2  V209 WAIT       OMCSAMCO 110707 S__1184
/AMF AMFINDEX held open for update causing other processes to wait

ASZ3523 110719 61VNAB TT OMCSV2  V209 INCORROUT  OMCSAMCO 110726 S__1191
After OMCSAMCO has run, for some date ranges AMF option 2 may not find
the backup datasets that it should

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1162)
            SUP(ASZ3511,ASZ3515,ASZ3523,ASP1181,ASP1184).
++SRC(OMCSAMCO).
++MOD(OMCSAMCO).
download PTF: ASP1191 54k

PTF ASP1196

/*####################################################################
DATE: 20110823  PTF: ASP1196  FMID: ASEB209 */
++PTF(ASP1196).  /*-------------------------------------------------
ASP1196 110823 ASEB209 OMCSJBUS failed with ECL error "COMPARAND > 256
                       CHARACTERS"

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3530 110823 61VNAB TT OMCSV2  1166 INCORROUT  OMCSJBUS 110824 S__1196
OMCSJBUS fails with ECL error "OMCEC046I ... COMPARAND > 256 CHARACTERS"
at either line 0141 or line 0304.

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1166)
            SUP(ASZ3530).
++SRC(OMCSJBUS).
++MOD(OMCSJBUS).
download PTF: ASP1196 13k

PTF ASP1197

/*####################################################################
DATE: 20110830  PTF: ASP1197  FMID: ASEB209 */
++PTF(ASP1197) REWORK(2011242). /*----------------------------------
ASP1197 110824 ASEB209 add file transfer assist to job viewing PRT command

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1164,ASP1169,ASP1171,ASP1177).
++SRC(ASESTDPR).
++SRC(OMCSPRTM).
++SRC(OMCSTSSJ).
++MOD(ASESTDPR).
++MOD(OMCSPRTM).
++MOD(OMCSTSSJ).
++PNL(OMCHPRT1).
++PNL(OMCHPRT5).
++PNL(OMCSPRTM).
download PTF: ASP1197 187k

PTF ASP1198

/*####################################################################
DATE: 20110830  PTF: ASP1198  FMID: ASEC209 */
++PTF(ASP1198) REWORK(2011242). /*----------------------------------
ASP1198 110824 ASEC209 add print-to-dataset to RVF with file transfer assist

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEC209)
            REQ(ASP1197)
            PRE(ASP1165,ASP1179).
++SRC(OMCSIRAR).
++SRC(OMCSIRUV).
++MOD(OMCSIRAR).
++MOD(OMCSIRUV).
++PNL(OMCHIRUL).
++PNL(OMCHIRUQ).
++PNL(OMCHIRUU) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSIRU8).
download PTF: ASP1198 96k

PTF ASP1200

/*####################################################################
DATE: 20110831  PTF: ASP1200  FMID: ASEB209 */
++PTF(ASP1200).  /*-------------------------------------------------
ASP1200 110831 ASEB209 Correct minor structural error in email bundles

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3532 110829 61VASE PS OMCSV2  1171 INCORROUT  OMCSPDEM 110831 S__1200
Email bundles are constructed incorrectly so that email clients may see
an empty or missing attachment

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1171)
            SUP(ASZ3532).
++SRC(OMCSPDEM).
++MOD(OMCSPDEM).
download PTF: ASP1200 15k

PTF ASP1202

/*####################################################################
DATE: 20110901  PTF: ASP1202  FMID: ASEB209 */
++PTF(ASP1202).  /*-------------------------------------------------
ASP1202 110901 ASEB209 Max screen size was sometimes not used when ISPF screen
                       format is 1 (Data)

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3529 110817 61VNAB TT OMCSV2  1175 INCORROUT  OMCSTSBR 110902 S__1202
max screen size sometimes not used when ISPF screen format is Data (1).

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1175)
            SUP(ASZ3529).
++MOD(ASEDMSDM).
++MOD(OMCSTSBR).
download PTF: ASP1202 24k

PTF ASP1204

/*####################################################################
DATE: 20110905  PTF: ASP1204  FMID: ASEB209 */
++PTF(ASP1204). /*---------------------------------
ASP1204 110905 ASEB209 Prevent structure error when allocation fails for
                       JESJCLIN dataset.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3535 110809 61VNAB TT OMCSV2  V209 INCORROUT  OMCSXWAF 110905 S__1204
Captured output has a structure error when allocation fails for JESJCLIN
dataset.
       */
++VER(Z038) FMID(ASEB209) SUP(ASZ3535) PRE(ASP1174).
++MOD(OMCSXWAF).
download PTF: ASP1204 7.6k

PTF ASP1205

/*####################################################################
DATE: 20110906  PTF: ASP1205  FMID: ASEC209 */
++PTF(ASP1205). /*--------------------------------------------------
ASP1205 110906 ASEC209 Enhance RVF report version list: add vertical bar (|)
                       archive flags and support R (recover) line command

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3536 110817 61VNAB TT OMCSV2  V209 SUGG  OK   OMCSIRUV 110912 S__1205
Add vertical bars to report version list to indicate that it is archived.
Support R (recover) line command on report version list.
       */
++VER(Z038) FMID(ASEC209)
            PRE(ASP1198)
            SUP(ASZ3536).
++SRC(OMCSIRUV).
++MOD(OMCSIRUV).
++PNL(OMCHIRU3).
++PNL(OMCSIRU3).
download PTF: ASP1205 48k

PTF ASP1209

/*####################################################################
DATE: 20111006  PTF: ASP1209  FMID: ASEB209 */
++PTF(ASP1209).  /*-------------------------------------------------
ASP1209 111006 ASEB209 prevent S013-20 or S002-18 abends when compiled ECL
                       programs log or trace to the screen in TSO

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ2969 971128 61VASE PS OMCSV2  P699 ABS013-20  OMCSECLX 110901 S__1201
MSGIEC141I 013-20,IGG0191A,PETER,IRMPROC,SYSPRINT,,,NULLFILE

ASZ3538 111005 61VASE PS OMCSV2  1201 ABS002     OMCSECLX 111006 S__1209
Bad LRECL in RDW when SYSPRINT allocated to RECFM(VB) dataset
IEC036I 002-18,IGC0005E,PETER,ISPFPROC,SYSPRINT,0300,ASE003,PETER.TRACE

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ2969,ASZ3538,ASP1201).
++MOD(OMCSECLX).
download PTF: ASP1209 4.7k

PTF ASP1210

/*####################################################################
DATE: 20111006  PTF: ASP1210  FMID: ASEB209 */
++PTF(ASP1210). /*--------------------------------------------------
ASP1210 111006 ASEB209 create dataset in job viewing when printing to dataset

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3533 110831 61VASE PS OMCSV2  1197 INCORROUT  OMCSPRTM 110902 S__1203
Job viewer print-to-dataset does nothing when dataset name enclosed in
apostrophes

ASZ3534 110831 61VASE PS OMCSV2  1197 INCORROUT  ASESTDPR 110902 S__1203
Report viewing print-to-dataset rejects a valid dataset name enclosed in
apostrophes with message "dataset not a valid datasetname"

ASZ3539 111004 61VNAB TT OMCSV2  1197 INCORROUT  OMCSPRTM 111013 S__1210
job viewing print with mod=y no longer creates the print output dataset

ASZ3542 111011 61VASE PS OMCSV2  V209 INCORROUT  ASEALLOC 111011 S__1213
ALLOC ECL statement with AVBLOCK(...) fails with following error
ALOC00I SVC 99 RC=12,ERR=037C INVALID LEN IN TEXT UNIT

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1164,ASP1197)
            SUP(ASZ3533,ASZ3534,ASZ3539,ASZ3542,ASP1203,ASP1213).
++SRC(ASESTDPR).
++SRC(OMCSPRTM).
++MOD(ASEALLOC).
++MOD(ASESTDPR).
++MOD(OMCSPRTM).
++PNL(OMCHPRT1).
++PNL(OMCHPRT2).
++PNL(OMCHPRT3).
++PNL(OMCHPRT4).
++PNL(OMCHPRT5).
++PNL(OMCHPRT6).
++PNL(OMCHPR00) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCHPR01) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCHPR02) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCHPR03) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCHPR04) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCHPR05) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCHPR06) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCHPR07) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSPRTA) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSPRTB) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSPRTM).
download PTF: ASP1210 143k

PTF ASP1211

/*####################################################################
DATE: 20111006  PTF: ASP1211  FMID: ASEC209 */
++PTF(ASP1211). /*--------------------------------------------------
ASP1211 111006 ASEC209 create dataset in report viewing when printing to dataset

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

       */
++VER(Z038) FMID(ASEC209)
            PRE(ASP1198,ASP1205)
            REQ(ASP1210).
++SRC(OMCSIRUV).
++MOD(OMCSIRUV).
++PNL(OMCHIRUL).
++PNL(OMCHIRUQ).
++PNL(OMCHIRUU).
++PNL(OMCHIRUV) DISTLIB(AASEPANL) SYSLIB(ASEPANL).
++PNL(OMCSIRU8).
download PTF: ASP1211 49k

PTF ASP1212

/*####################################################################
DATE: 20111010  PTF: ASP1212  FMID: ASEB209 */
++PTF(ASP1212). /*--------------------------------------------------
ASP1212 111010 ASEB209 prevent ECL errors "INVALID DATE EXPRESSION" in OMCSAMUT
                       and "STMT FETCH COUNT LIMIT EXCEEDED" in OMCSAMCO

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3540 111010 61VNAB TT OMCSV2  V209 INCORROUT  OMCSAMUT 111018 S__1212
ADJUSTDISCARD function fails with ECL error
OMCEC046I 01 ?        LINE# 0945 &DATE(...) INVALID DATE EXPRESSION

ASZ3541 111010 61VNAB TT OMCSV2  V209 INCORROUT  ASECATIF 111018 S__1212
OMCSAMCO fails with ECL error
OMCEC046I 01 OMCSAMCO LINE# 0789 STMT FETCH COUNT LIMIT EXCEEDED

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3540,ASZ3541).
++SRC(ASECATIF).
++SRC(OMCSAMUT).
++MOD(ASECATIF).
++MOD(OMCSAMUT).
download PTF: ASP1212 32k

PTF ASP1214

/*####################################################################
DATE: 20111114  PTF: ASP1214  FMID: ASEB209 */
++PTF(ASP1214). /*---------------------------------
ASP1214 111114 ASEB209 OMCSJDFX Only report records that were incorrect.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3544 111107 61VODP TI OMCSV2  V209 SUGG  OK   OMCSJDFX 111114 S__1214
Only report records that were actually incorrect

       */
++VER(Z038) FMID(ASEB209).
++SRC(OMCSJDFX).
++MOD(OMCSJDFX).
download PTF: ASP1214 2.3k

PTF ASP1215

/*####################################################################
DATE: 20111124  PTF: ASP1215  FMID: ASEB209 */
++PTF(ASP1215). /* IMPACT: CRITICAL -------------------
ASP1215 111124 ASEB209 AMF index updates running concurrently with OMCSAMCO may
                       damage AMFINDEX.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3545 111121 61VNAB MK OMCSV2  1184 INCORROUT  OMCSAMCO 111128 S__1215
AMF index updates running concurrently with OMCSAMCO may damage AMFINDEX

  Please contact ASE if you have any questions about this PTF.
  help@ase.com.au

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1191)
            SUP(ASZ3545).
++SRC(OMCSAMCO).
++MOD(OMCSAMCO).
download PTF: ASP1215 54k

PTF ASP1216

/*####################################################################
DATE: 20111130  PTF: ASP1216  FMID: ASEB209 */
++PTF(ASP1216). /*-------------------------------------
ASP1216 111130 ASEB209 OMCSAMCO archive consolidation to support OMCSDBUT
                       backups.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

_APARLIST:

ASZ3546 111121 61VNAB MK OMCSV2  V209 INCORROUT  OMCSAMCO 111205 S__1216
OMCSAMCO archive consolidation does not support OMCSDBUT backups

  Please contact ASE if you have any questions about this PTF.
  help@ase.com.au

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1215)
            SUP(ASZ3546).
++SRC(OMCSAMCO).
++MOD(OMCSAMCO).
download PTF: ASP1216 55k

PTF ASP1218

/*####################################################################
DATE: 20111209  PTF: ASP1218  FMID: ASEB209 */
++PTF(ASP1218). /*--------------------------------------------------
ASP1218 111209 ASEB209 Support LRECL up to SMTP maximum of 1023 in job viewing
                       print-to-email

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

       */
++VER(Z038) FMID(ASEB209)
            PRE(ASP1210).
++IF FMID(ASEC209) THEN REQ(ASP1219).
++SRC(ASESTDPR).
++SRC(OMCSPRTM).
++MOD(ASESTDPR).
++MOD(OMCSPRTM).
download PTF: ASP1218 130k

PTF ASP1219

/*####################################################################
DATE: 20111209  PTF: ASP1219  FMID: ASEC209 */
++PTF(ASP1219). /*--------------------------------------------------
ASP1219 111209 ASEC209 Support LRECL up to SMTP maximum of 1023 in report
                       viewing print and IRM bundle printing to email

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2011

       */
++VER(Z038) FMID(ASEC209)
            PRE(ASP1165,ASP1211)
            REQ(ASP1218).
++SRC(OMCSIRBT).
++SRC(OMCSIRUV).
++MOD(OMCSIRBT).
++MOD(OMCSIRUV).
download PTF: ASP1219 97k

PTF ASP1223

/*####################################################################
DATE: 20120127  PTF: ASP1223  FMID: ASEB209 */
++PTF(ASP1223). /*--------------------------------------------------
ASP1223 120127 ASEB209 Stop R line command in job selection list from restoring
                       files already resident in the database

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2012

_APARLIST:

ASZ3548 120125 61VNAB TT OMCSV2  V209 INCORROUT  OMCSTSSJ 120127 S__1223
R line command in job selection list will restore a file that still
resides in the database.

Please contact ASE if you have any questions about this PTF.
help@ase.com.au

       */
++VER(Z038) FMID(ASEB209)
            SUP(ASZ3548)
            PRE(ASP1197).
++SRC(OMCSTSSJ).
++MOD(OMCSTSSJ).
download PTF: ASP1223 64k
/*####################################################################
DATE: 20120127  END BUCKET  PRODUCT:  */