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

EXPDATE1.m

Go to the documentation of this file.
EXPDATE1 ;ROUTINE TO RUN EXPIRATION DRUG LOG;PAIHS/RC [ 11/28/90  2:48 PM ]

 ;

 ;

 S L=0,DIC=1991000,FLDS="[EXP.DATE (PRINT)]",BY="[EXP.DATE(SEARCH)]"

 D EN1^DIP

 Q