SUBROUTINE (PASSER)
** Version# 0.0002[2] - 04/29/2014 - 04:07pm - TSMITH - eclipse
*** V0.0002 Change - Custom Coding . - 04/29/2014 - TSMITH - eclipse
*** V0.0001 Change - Custom Coding . - 04/29/2014 - TSMITH - eclipse
*** SUBROUTINE: DELETE.PIPE
*** -------------------------------------------------------------------------*
**
**
CONFIRM.DEL SURE
IF NOT(SURE) THEN RETURN


UT.OPEN.FILE 'INITIALS.PIPELINE',PIPEFILE,ERR.MSG
                IF NOT(ERR.MSG) THEN
                   PIPE = @ID
                   DELETE PIPEFILE,PIPE
END
CLEAR.SCREEN
!TSMITH~04/29/14~16:07
