Hi,
The exit you are looking for I believe is arctvext.It should be in your
adsm server option file and look like this.
*--------------------------------------------------------------------*
*  Deletion notification exit.
*--------------------------------------------------------------------*
  DELETIONEXIT   ARCTVEXT
*
This exit is also used by DFHSM

When ADSM deletes a file from its pool you will get a message
CTTHSM06: N18494 SCRATCH OK. ATL EXPIRE FAILED

We use a STK silo and the exit between C-T and STK does'nt work properly so
we have to run a complete scratch update every day after C-T retention
management.

This is solved in Control-T v.5
----------
> Fra: Grupo PISSA <pissats AT ACNET DOT NET>
> Fra: Grupo PISSA <pissats AT ACNET DOT NET>
> Til: ADSM-L AT VM.MARIST DOT EDU
> Emne: HELP on defining ADSM to CONTROL-T
> Dato: 24. oktober 1997 17:25
>
> Hello to everyone:
>         I need a LOT of help (all I can get would be apreciated), because
I'm
> trying to define the interface between ADSM and CONTROL-T. I know how to
> define in CTL-T the ADSM as an EDM, and also know that I need to
implement
> an EXIT (Deletion EXIT) in ADSM to return the scratches to CTL-T. The
> problem here is that I have no idea about that exit. Does anyone know
about
> it? Have the source code? Hints about the pb.? The sw levels are ADSM 2.1
> for MVS and CONTROL-T 1.2.2 in MVS/ESA 5.1
> The CONTROL support says that I may need to upgrade the version, and I
> think that shouldn't be a problem at all. Thank's for your time.
>
>                         Oscar Omar Ortega Ortega