Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSSPRUTL

Package: Pharmacy Data Management

Routine: PSSPRUTL


Information

PSSPRUTL ;BIR/RTR-Edit IV Solution ;04/19/08

Source Information

Source file <PSSPRUTL.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIE  ^DIR  
Pharmacy Data Management 2 EN2^PSSHL1  EN^PSSPOIDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Data Management 1 PSS MARK PREMIX SOLUTIONS  

Entry Points

Name Comments DBIA/ICR reference
EDIT ;Edit IV Solution
GETD ;See if generic drug is inactive in file 50, code cloned from line tag GETD Of routine PSSVIDRG
MESS ;
UN ;Unlock File
EDITM ;

External References

Name Field # of Occurrence
^DIC EDITM+4
^DIE EDITM+6
^DIR MESS+1
EN2^PSSHL1 EDITM+11, EDITM+12
EN^PSSPOIDT EDITM+11, EDITM+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,"Sorry, you need the 'PSJI MGR' key to access this option.",!
  • Line Location: EDIT+4
Function Call: WRITE
  • Prompt: !!!,"Sorry, someone else is editing entries in the IV SOLUTIONS (#52.7) File.",!
  • Line Location: EDIT+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EDITM+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EDITM+16
Function Call: WRITE
  • Prompt: $C(7),$C(7),!!,"This drug is inactive and will not be selectable during IV order entry.",!
  • Line Location: GETD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: MESS+1
Routine Call
  • DIE
  • Line Location:
    • EDITM+6
Routine Call
  • DIC
  • Line Location:
    • EDITM+4
Routine Call
  • DIR
  • Line Location:
    • MESS+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.7 - [#52.7] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.7 - [#52.7] EDIT+5, EDITM+5, EDITM+10, UN+1, GETD+1*
^PSDRUG - [#50] EDITM+10, GETD+1
^XUSEC("PSJI MGR" EDIT+4

Label References

Name Line Occurrences
EDITM EDITM+16
MESS EDIT+4, EDIT+6
UN EDITM+4

Naked Globals

Name Field # of Occurrence
^("I" GETD+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EDIT+3~, EDITM+1!
%DT EDIT+3~, EDITM+1!
D EDIT+3~, EDITM+1!
D0 EDIT+3~, EDITM+1!
DA EDIT+1~, EDITM+1!, EDITM+6!*
DIC EDIT+1~, EDITM+1!, EDITM+4!*
DIC(0 EDITM+4*
DIDEL EDIT+1~, EDITM+1!
DIE EDITM+6!*
>> DILOCKTM EDIT+5
DIR EDIT+1~, EDITM+1!, MESS+1!
DIR("A" MESS+1*
DIR(0 MESS+1*
DIROUT EDIT+1~, EDITM+1!
DIRUT EDIT+1~, EDITM+1!
DLAYGO EDIT+1~, EDITM+1!
DR EDIT+1~, EDITM+1!, EDITM+6!*
DRUGEDIT EDIT+1~, EDITM+3*
DT GETD+1
DTOUT EDIT+1~, EDITM+1!, EDITM+4!
DUOUT EDIT+1~, EDITM+1!, EDITM+4!
DUZ EDIT+4
I EDIT+3~, EDITM+1!
J EDIT+3~, EDITM+1!
MSG EDIT+3~, EDITM+1!
PSJCLEAR EDIT+3~, EDITM+1!
PSPOINT EDIT+3~, EDITM+1!
PSSCROSS EDIT+3~, EDITM+1!, EDITM+11!, EDITM+12!
PSSEDSAR EDIT+1~, EDITM+3!
PSSEDSDA EDIT+1~, EDITM+3!, EDITM+5*, EDITM+6, EDITM+10, GETD+1
PSSEDSDR EDIT+1~, EDITM+3!, EDITM+10*
PSSEDSGG EDIT+1~, EDITM+3!, EDITM+10*, EDITM+12
PSSEDSXX EDIT+1~, EDITM+3!, EDITM+5*
PSSEDSZZ EDIT+1~, EDITM+3!, EDITM+10*, EDITM+11, EDITM+12
PSSIVID EDIT+3~, EDITM+1!
SYNIEN EDIT+3~, EDITM+1!
X EDIT+1~, EDITM+1!, EDITM+4!, GETD+1
XX EDIT+3~, EDITM+1!
Y EDIT+1~, EDITM+1!, EDITM+4, EDITM+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All