Sometimes the last record of a file contains vital information. In case the file is too huge, we would not be able to open it in File Aid or normal browse option.
I found this JCL very helpful to extract the last record and see it in the SPOOL. We can also give an output file!
//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD DSN=,DISP=SHR
//OUT DD SYSOUT=*
//TOOLIN DD *
SUBSET FROM(IN) TO(OUT) KEEP INPUT TRAILER VSAMTYPE(V)
/*
I found this JCL very helpful to extract the last record and see it in the SPOOL. We can also give an output file!
//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD DSN=
//OUT DD SYSOUT=*
//TOOLIN DD *
SUBSET FROM(IN) TO(OUT) KEEP INPUT TRAILER VSAMTYPE(V)
/*
