- PSS1P23 ;BIR/MAM-DELETE PHARMACISTS SUB-FILE ;03/03/99 13:21
- ;;1.0;PHARMACY DATA MANAGEMENT;**23**;9/30/97
- ;
- ;
- S DIU=59.41,DIU(0)="DS" D EN^DIU2 K DIU
- Q
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPSS1P23 164 printed Mar 13, 2025@21:33:54 Page 2
- PSS1P23 ;BIR/MAM-DELETE PHARMACISTS SUB-FILE ;03/03/99 13:21
- +1 ;;1.0;PHARMACY DATA MANAGEMENT;**23**;9/30/97
- +2 ;
- +3 ;
- +4 SET DIU=59.41
- SET DIU(0)="DS"
- DO EN^DIU2
- KILL DIU
- +5 QUIT