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
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 |
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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
/*####################################################################
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: */