source: FOIAVistA/trunk/r/SCHEDULING-SD-SC/SDWLRNE.m@ 1770

Last change on this file since 1770 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version
File size: 239 bytes
Line 
1SDWLRNE ;;IOFO BAY PINES/TEH/ENROLLEE STATUS API WAIT LIST ; 20 Aug 2002 2:10 PM
2 ;;5.3;scheduling;**263**;AUG 13 1993
3 ;
4 ;
5 ;
6 ;
7EN(SDWLDFN) ;-Enrollment API
8 ;
9 S SDWLRNE=$$ENROLL^EASWTAPI(SDWLDFN),SDWLRNE=$S(+SDWLRNE:"E",1:"N")
10END Q
Note: See TracBrowser for help on using the repository browser.