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

Package: Pharmacy Data Management

Routine: PSSSOLI1


Information

PSSSOLI1 ;BIR/RTR-Manual match Solutions to Orderable Items continued ; 09/01/98 7:13

Source Information

Source file <PSSSOLI1.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Pharmacy Data Management 5 EN2^PSSHL1  EN^PSSPOIDT  DIR^PSSPOIM3  (,INACT)^PSSSOLIT  SOMAT^PSSSUTIL  
VA FileMan 4 ^DIC  FILE^DICN  ^DIE  ^DIR  
National Drug File 1 $$PSJDF^PSNAPIS  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Data Management 1 PSSSOLIT  

Entry Points

Name Comments DBIA/ICR reference
ADD ;
PASS
XDIR
NEW ;Create new entry in 50.7
INPUT
CHECK ;

External References

Name Field # of Occurrence
^DIC ADD+4
FILE^DICN NEW+3
^DIE NEW+5
^DIR PASS+3, PASS+4, XDIR+1, XDIR+6, NEW+2
$$PSJDF^PSNAPIS ADD+2
EN2^PSSHL1 NEW+8
EN^PSSPOIDT NEW+8
DIR^PSSPOIM3 NEW+7
^PSSSOLIT ADD+4, PASS+3, PASS+4, XDIR+1, XDIR+6, NEW+9
INACT^PSSSOLIT NEW+7
SOMAT^PSSSUTIL PASS+4, XDIR+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,"*** Dose Form from NDF: ",PSDOSNM
  • Line Location: ADD+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+4
Function Call: WRITE
  • Prompt: !!,"Solution Name -> ",$G(PSSNAME),!," Volume -> ",$G(PSSVOL),!," Dose Form -> ",PSDOSNM
  • Line Location: PASS+0
Function Call: WRITE
  • Prompt: $C(7),!!,"There is already an Orderable Item named:",!?5,$P($G(^PS(50.7,ZZFLAG,0)),"^")_" "_$P($G(^PS(50.606,+$P(^(0),"^",2),0)),"^"),!
  • Line Location: PASS+2
Function Call: WRITE
  • Prompt: !!,"Matching: ",PSSNAME_" "_$G(PSSVOL),!," to",!,$P($G(^PS(50.7,ZZFLAG,0)),"^")_" "_$G(PSDOSNM)
  • Line Location: PASS+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PASS+4
Function Call: WRITE
  • Prompt: $C(7),!?5,"??",!
  • Line Location: XDIR+3
Function Call: WRITE
  • Prompt: !!,"Matching: ",PSSNAME_" "_$G(PSSVOL),!," to",!,$P($G(^PS(50.7,PPFLAG,0)),"^")_" "_$P($G(^PS(50.606,+$P($G(^(0)),"^",2),0)),"^")
  • Line Location: XDIR+5
Function Call: WRITE
  • Prompt: !
  • Line Location: XDIR+6
Function Call: WRITE
  • Prompt: !
  • Line Location: XDIR+6
Function Call: WRITE
  • Prompt: !!,"Matching: ",PSSNAME_" "_$G(PSSVOL),!," to",!,HOLDOI_" "_PSDOSNM
  • Line Location: NEW+1
Function Call: WRITE
  • Prompt: !!,"Unable to create entry, try again!",!
  • Line Location: NEW+3
Function Call: WRITE
  • Prompt: !!?3,"Now editing Orderable Item:",!?3,$P(^PS(50.7,PSSOI,0),"^")," ",$P($G(^PS(50.606,+$P(^(0),"^",2),0)),"^")
  • Line Location: NEW+7
Routine Call
  • DIC
  • Line Location:
    • ADD+4
Routine Call
  • DIE
  • Line Location:
    • NEW+5
Routine Call
  • DIR
  • Line Location:
    • PASS+3
    • PASS+4
    • XDIR+1
    • XDIR+6
    • NEW+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.606 - [#50.606] ADD+3, ADD+5, PASS+2, XDIR+5, NEW+7
^PS(50.7 - [#50.7] PASS+2, PASS+4, XDIR+4, XDIR+5, NEW+6*, NEW+7, CHECK+1
^PS(52.7 - [#52.7] NEW+4
^PSDRUG - [#50] ADD+1

Label References

Name Line Occurrences
CHECK PASS+1
INPUT XDIR, XDIR+3
PASS ADD+3
XDIR XDIR+3, XDIR+6, NEW+2, NEW+3

Naked Globals

Name Field # of Occurrence
^( NEW+4
^(0 ADD+3, PASS+2, XDIR+5, NEW+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA ADD+1*, ADD+2, NEW+5*
DD NEW+3!
DIC ADD+4!*, NEW+3!*
DIC("A" ADD+4*
DIC("DR" NEW+3*
DIC(0 ADD+4*, NEW+3*
DIE NEW+5!*
DIR PASS+3!, PASS+4!, XDIR!, XDIR+1!, XDIR+6!, NEW+2!
DIR("A" PASS+3*, PASS+4*, XDIR*, XDIR+6*, NEW+2*
DIR("B" PASS+3*, PASS+4*, XDIR*, XDIR+6*, NEW+2*
DIR(0 PASS+3*, PASS+4*, XDIR*, XDIR+6*, NEW+2*
DO NEW+3!
>> DR NEW+5*
>> DTOUT ADD+4, PASS+3, PASS+4, XDIR+1, XDIR+6
>> DUOUT ADD+4, XDIR+1
>> HOLDOI XDIR+2*, XDIR+4, NEW+1, NEW+3
>> INFLAG XDIR, XDIR+3, INPUT*
>> K ADD+1*, ADD+2
NEWFLAG NEW+7*, NEW+8!
>> PPFLAG XDIR+4*, XDIR+5, XDIR+7
>> PSANS PASS+2*, PASS+3*, PASS+4
>> PSDISP ADD+1
>> PSDOSNM ADD+3*, ADD+5*, PASS, PASS+4, NEW+1
>> PSDOSPTR ADD+2*, ADD+3, ADD+5*, PASS
>> PSND ADD+1*
>> PSND1 ADD+1*, ADD+2
>> PSND3 ADD+1*, ADD+2
>> PSNEWOI NEW+4*, NEW+5, NEW+6, NEW+7
>> PSOIDOSE PASS*, XDIR+4, NEW+3, CHECK+1
PSSDIR NEW+7, NEW+8!
>> PSSIEN NEW+4, NEW+5
>> PSSNAME PASS, PASS+1, PASS+4, XDIR, XDIR+5, NEW+1
>> PSSOI NEW+7*, NEW+8
>> PSSSSS NEW+8
>> PSSVOL PASS, PASS+4, XDIR+5, NEW+1
>> QQ XDIR+4*
>> SCOUNT NEW+4*, NEW+6
>> SS NEW+4*
>> SYN( NEW+4*, NEW+6
>> VV CHECK+1*
>> WW NEW+6*
>> X ADD+2*, XDIR*, XDIR+2, NEW+3*, INPUT
>> XXX PASS+1*, CHECK+1
>> Y ADD+4, ADD+5, PASS+3, PASS+4, XDIR+1, XDIR+6, NEW+2, NEW+3, NEW+4
>> ZZFLAG PASS+2, PASS+4, XDIR+7*, CHECK+1*
>> ZZXFLAG CHECK+1*
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