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: PSONFI

Package: Outpatient Pharmacy

Routine: PSONFI


Information

PSONFI ;BIR/MHA - dispense drug/orderable item text display ;09/13/00

Source Information

Source file <PSONFI.m>

Entry Points

Name Comments DBIA/ICR reference
NFI ;display restriction/guidelines
DDTX ;Display drug text for the hidden action DIN
1
HLD
DIN(OI,DD) ;Setup DIN indicator
RV ;reverse video
; Saves Normal Line formatting
TD
OIT ;
DDT ;
TXT ;
TXD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"Drug restriction/guideline info:",!!
  • Line Location: 1+3
Function Call: WRITE
  • Prompt: !,"Orderable Item: "_$P(^PS(50.7,OI,0),"^")_" "_$P(^PS(50.606,$P(^(0),"^",2),0),"^")_$S($P(^PS(50.7,OI,0),"^",12):" ***(N/F)***",1:""),!!
  • Line Location: 1+4
Function Call: WRITE
  • Prompt: !,"Drug: "_$P(^PSDRUG(DD,0),"^")_$S($P(^PSDRUG(DD,0),"^",9):" ***(N/F)***",1:""),!!
  • Line Location: 1+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TD+1
Function Call: WRITE
  • Prompt: !,TX
  • Line Location: TXT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: TXD+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TXD+4
Function Call: WRITE
  • Prompt: !
  • Line Location: TXD+5
Info |  Source |  Entry Points |  Interaction Calls