>Thanks for the tip. However, I can't find any igvdgnpp proc. With Google
>I found an older version (for PSA traps), but I don't think this is the
>one you intend.
>Where did you find the JCL or can you show yours?
Yes, the PSA one is the one. I don't remember where I originally copied it
from,
but here is the JCL:
//********************************************************//
//* *//
//* THIS PROCEDURE WILL PRIME THE RESTART OLD PSW, THE *//
//* MACHINE CHECK OLD PSW, AND THE MACHINE CHECK LOGOUT *//
//* AREA AND SAVE AREAS WITH THE VALUE SPECIFIED BY THE *//
//* V= PARAMETER, AT THE INTERVAL SPECIFIED BY THE T= *//
//* PARAMETER (T IS IN UNITS OF HUNDREDTHS OF SECONDS, *//
//* IN HEX). THE PURPOSE IS TO MAKE THESE AREAS NON-ZERO *//
//* TO CATCH PROGRAMS WHICH ACCIDENTALLY REFERENCE THEM, *//
//* AND GET LUCKY AND DO NOT ABEND BECAUSE THEY ARE *//
//* USUALLY ZERO. *//
//* *//
//* IF IGVDGNPP IS TERMINATED VIA AN MVS STOP (P) *//
//* COMMAND, IT SETS ALL MODIFIED AREAS TO ZERO BEFORE *//
//* TERMINATING. *//
//* *//
//IGVDGNPP PROC T=0000EA60,V='50404143,AAAAAAAA,55555555,FFFFFF7F'
//IGVDGNPP EXEC PGM=IGVDGNPP,TIME=1440,
// PARM='&T,&V'
Regards, Barbara
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
