Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping
Routine: SDWLP446

SDWLP446.m

Go to the documentation of this file.

SDWLP446 ;;IOFO BAY PINES/TEH - WAITING LIST-ENTER/EDIT - WAIT LISTTYPE/INSTUTITION;06/12/2002 ; 20 Aug 2002 2:10 PM  ; Compiled November 9, 2006 15:39:42

 ;;5.3;scheduling;**446**;AUG 13 1993;Build 77

EN I $D(^DD(409.3,.01,"DEL",1,0)) K ^DD(409.3,.01,"DEL",1,0)

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HSDWLP446   286     printed  Mar 13, 2025@22:08                                                                                                                                                                                                        Page 2

SDWLP446  ;;IOFO BAY PINES/TEH - WAITING LIST-ENTER/EDIT - WAIT LISTTYPE/INSTUTITION;06/12/2002 ; 20 Aug 2002 2:10 PM  ; Compiled November 9, 2006 15:39:42

 +1       ;;5.3;scheduling;**446**;AUG 13 1993;Build 77

 +2       ;

 +3       ;

 +4       ;

 +5       ;

EN         IF $DATA(^DD(409.3,.01,"DEL",1,0))

               KILL ^DD(409.3,.01,"DEL",1,0)

 +1        QUIT