SDWLRNE ;;IOFO BAY PINES/TEH/ENROLLEE STATUS API WAIT LIST ; 20 Aug 2002  2:10 PM
 ;;5.3;scheduling;**263**;AUG 13 1993
 ;
 ;
 ;
 ;
EN(SDWLDFN) ;-Enrollment API
 ;
 S SDWLRNE=$$ENROLL^EASWTAPI(SDWLDFN),SDWLRNE=$S(+SDWLRNE:"E",1:"N")
END Q