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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSGMAR3

Package: Inpatient Medications

Routine: PSGMAR3


Information

PSGMAR3 ;BIR/CML3-24 HOUR MAR(HEADER,BOT) ;14 Oct 98 / 4:28 PM

Source Information

Source file <PSGMAR3.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Inpatient Medications 2 $$ENDTC2^PSGMI  $$SITE^PSGMMAR2  
VA FileMan 1 C^%DTC  

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

Package Total Caller Graph
Inpatient Medications 7 PSGMAR2  PSGMIV  PSGMMAR2  PSGMMAR4  PSGMMIVC  PSJORMA2  PSJORMAR  

Entry Points

Name Comments DBIA/ICR reference
HEADER ; pat info
ATS(PSGX) ;*** Print allergies and reactions.
TMSTR ;*** Set up the Admin times to print across on the 24 hour MAR.
ADD ;
TS(X) ;
BOT ; bottom of MAR
ENB ;

External References

Name Field # of Occurrence
C^%DTC ADD+1
$$ENDTC2^PSGMI HEADER+4
$$SITE^PSGMMAR2 HEADER+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $G(PSGPG)&($Y)
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,$S(PST["C":"CONTINUOUS",1:"ONE-TIME/PRN")_" SHEET",?60,"24 HOUR MAR",?86,PSGMARSP_" through "_PSGMARFP
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !?5,$P($$SITE^PSGMMAR2(80),U,2),?101,"Printed on "_$$ENDTC2^PSGMI(PSGXDT)
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"Allergies: See attached list of Allergies/Adverse Reactions"
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,?49,"Admin"
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !?1,"Order",?8,"Start",?20,"Stop",?49,"Times"
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: ?59
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: ?59
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !,LN1
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !,"Allergies: ",PSGVALG(1)," ",PSGALG(1)," ADR: ",PSGVADR(1)," ",PSGADR(1)
  • Line Location: ATS+8
Function Call: WRITE
  • Prompt: !!,"Verified Allergies:",!
  • Line Location: ATS+10
Function Call: WRITE
  • Prompt: ?12,PSGVALG(X),!
  • Line Location: ATS+11
Function Call: WRITE
  • Prompt: !!,"Non-Verified Allergies:",!
  • Line Location: ATS+12
Function Call: WRITE
  • Prompt: ?12,PSGALG(X),!
  • Line Location: ATS+13
Function Call: WRITE
  • Prompt: !!,"Verified Adverse Reactions:",!
  • Line Location: ATS+14
Function Call: WRITE
  • Prompt: ?12,PSGVADR(X),!
  • Line Location: ATS+15
Function Call: WRITE
  • Prompt: !!,"Non-Verified Adverse Reactions:",!
  • Line Location: ATS+16
Function Call: WRITE
  • Prompt: ?12,PSGADR(X),!
  • Line Location: ATS+17
Function Call: WRITE
  • Prompt: ?59
  • Line Location: TMSTR+3
Function Call: WRITE
  • Prompt: !?7,LN2
  • Line Location: BOT+2
Function Call: WRITE
  • Prompt: !,LN1
  • Line Location: ENB+2
Function Call: WRITE
  • Prompt: !,"|",?12,"SIGNATURE/TITLE",?39,"| INIT | ALLERGIES | INJECTION SITES |",?87,"MED/DOSE OMITTED",?107,"| REASON | INIT |"
  • Line Location: ENB+3
Function Call: WRITE
  • Prompt: !,"|"_$E(LN1,1,38)_"|------|--------------|"_BLN(Q),?82,"|"_$E(LN1,1,24)_"|"_$E(LN1,1,16)_"|------|"
  • Line Location: ENB+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] HEADER+5

Label References

Name Line Occurrences
ADD TMSTR+4
ATS HEADER+9
HEADER HEADER+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AD HEADER+7
ADMINHR TMSTR+2~, TMSTR+3*
>> BD HEADER+6
>> BLN( ENB+4
>> DX HEADER+7
HRS TMSTR+3*, TMSTR+4, TMSTR+5!
>> HT HEADER+6
IOF HEADER+3
>> LN1 HEADER+13, ENB+2, ENB+4, ENB+5
>> LN2 BOT+2
>> LN4 BOT+1, BOT+2
>> LN5 BOT+1, BOT+2
>> LN7 BOT+1, BOT+2
MPH TMSTR+3*, TMSTR+4, TMSTR+5!, ADD+1*
>> MSG1 HEADER+3*, BOT+1, BOT+2
>> MSG2 HEADER+3*, BOT+1, BOT+2
>> ONHOLD TMSTR+4
>> OPST BOT+1, BOT+2
>> PAGE HEADER+6
>> PPN HEADER+5, ENB+5
>> PRB HEADER+6, ENB+5
>> PSEX HEADER+7
PSGADR ATS+1, ATS+2, ATS+6, ATS+18!
PSGADR( ATS+17
PSGADR(1 ATS+6*, ATS+8
PSGALG HEADER+8, ATS+1, ATS+2, ATS+4, ATS+18!
PSGALG( ATS+13
PSGALG(1 ATS+3*, ATS+4*, ATS+5*, ATS+8
>> PSGDT HEADER+1
>> PSGFORM HEADER+2*, ENB+5
>> PSGL HEADER+3*
>> PSGLFFD TMSTR+4
>> PSGMARFD HEADER+12, TMSTR+4
>> PSGMARFP HEADER+3
>> PSGMAROC HEADER+3*, BOT+2*
>> PSGMARSD HEADER+12, TMSTR+4
>> PSGMARSP HEADER+3
>> PSGMPG ENB+1*, ENB+5
>> PSGMPGN ENB+1*, ENB+5
>> PSGPG HEADER+3*
>> PSGPLS TMSTR+3
PSGVADR ATS+1, ATS+2, ATS+18!
PSGVADR( ATS+15
PSGVADR(1 ATS+8
PSGVALG ATS+1, ATS+2, ATS+18!
PSGVALG( ATS+11
PSGVALG(1 ATS+3, ATS+5, ATS+7*, ATS+8
PSGX HEADER+9~*, ATS~, ATS+9*
>> PSGXDT HEADER+1*, HEADER+4
>> PSJDIET HEADER+11
>> PSSN HEADER+6, ENB+5
>> PST HEADER+2, HEADER+3, TS+1
>> PWDN HEADER+5, HEADER+6, HEADER+7, ENB+5
>> Q TMSTR+4*, TS+1*, TS+5*, BOT+2*, ENB+4*
>> QQ TMSTR+4*, BOT+1*, BOT+2*
>> TD HEADER+7
TIM TMSTR+3*, TMSTR+4*, TMSTR+5!
>> TMSTR TMSTR+3
TS TS+1!*, TS+2, TS+3, TS+4, TS+5
TS( TS+1*, TS+5*
TS(1 TS+3*, TS+4*
TS(3 TS+2*, TS+4*
TS(5 TS+3*, TS+4*
U HEADER+4
>> WT HEADER+5
X HEADER+12*, ATS+11*, ATS+13*, ATS+15*, ATS+17*, ADD+1, TS~, TS+1, TS+2, TS+3
, TS+4, TS+5
>> X1 ADD+1*
>> X2 ADD+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All