********************************************************************** * DB90S 5.4 Tech note CE104.T05 January 2004 * * * * Keywords : EZTEST AGING SVCHOOK LE ACCEPT DATE ENTERPRISE COBOL * * * * When upgrading to Enterprise COBOL, you may find that 'ACCEPT ... * * FROM DATE' no longer gets aged. * * * * In Enterprise COBOL the 'ACCEPT .. FROM DATE' now uses an LE * * routine to get the date. Enterprise COBOL 'ACCEPT .. FROM DATE' * * is now processed in the same manner as the 'CURRENT-DATE' LE * * function. The LE routine uses STCK (storeclock) to get the date, * * which EZTest cannot trap (as its a machine instruction). * * * * In order to age the ACCEPT DATE you need to read and apply the * * instructions in the DB2KLE37 member of the EZDB install SRCLIB, * * which details how to change the STCK into a TIME SVC call, which * * will get trapped by the EZTest SVCHOOK. * * * **********************************************************************