Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PSSCLDRG

Package: Pharmacy Data Management

Routine: PSSCLDRG


Information

PSSCLDRG ;BIR/SAB,WRT-CLOZAPINE DRUG ENTER AND EDIT ; 09/05/97 14:30

Source Information

Source file <PSSCLDRG.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
END
CHECK
PSIU ;
UNMARK
ASKIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),$C(7),!!,"This drug is marked for Lab Monitor purposes. You must unmark it as a",!,"Lab Monitor before you can mark it as a Clozapine drug."
  • Line Location: PSSCLDRG+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !,$P(^PSDRUG(DA,0),"^")_" is now marked as a Clozapine drug",!
  • Line Location: ASK+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PSIU+4
Function Call: WRITE
  • Prompt: !
  • Line Location: UNMARK+3
Function Call: WRITE
  • Prompt: !,"Do you wish to mark this drug as a Lab Monitor drug?"
  • Line Location: ASKIT+0
Info |  Source |  Entry Points |  Interaction Calls