/*
** Module   :SFKILL.SCR
** Abstract :
**
** Copyright (C) Link Guard Solutions
**
** Log: Wed  06/12/2000 Created
**
*/
if arg(1)='MSG_000000F2' then
do
    trace all
    say 'SafeFire PPP kill program'
    /* First check if we have connection established */
    call sf_localbase 'LIST', 'sfkill.pipes.0', '::*', 's.'
    if s.0=0 then
    do
        say 'Connection could not be established'
        call sf_postmsg 'MSG_00000043'
        return
    end

    /* Send close command */
    say "Closing remote instance"
    call sf_postmsg 'MSG_00000043', 'sfkill', 'sfkill.pipes.0.plugman', '', 'Yes'
    call sf_postmsg 'MSG_00000043'
end

