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

Package: Health Summary

Routine: GMTSPSO


Information

GMTSPSO ;SLC/JER,KER/NDBI - OP Rx Summary Component (V6) ;Apr 16, 2021@16:16:52

Source Information

Source file <GMTSPSO.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN ; OP Rx HS Comp
; Check for version 7 (or greater) MAIN^GMTSPSO7
WRT ; Writes OP Pharmacy Segment Record
PARSE ; Parses Medication Instructions
HEAD ; Prints Header

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Patient Has Archived OP Prescriptions",!
  • Line Location: MAIN+11
Function Call: WRITE
  • Prompt: "Patient Has Archived OP Prescriptions",!
  • Line Location: MAIN+13
Function Call: WRITE
  • Prompt: $P($P(GMR,U,3),";",2)
  • Line Location: WRT+10
Function Call: WRITE
  • Prompt: !,?18,$P(GMR,U,6),?31,$S($P($P(GMR,U,5),";")="S":"ACTIVE/SUSP",1:$P($P(GMR,U,5),";",2)),?45,$P(GMR,U,7),?54,ID,?65,LFD,?76,"("_$P(GMR,U,8)_")",!
  • Line Location: WRT+11
Function Call: WRITE
  • Prompt: ?2,"SIG: ",MI,!
  • Line Location: WRT+12
Function Call: WRITE
  • Prompt: ?2,"SIG: "
  • Condition for execution: GMI=1
  • Line Location: WRT+13
Function Call: WRITE
  • Prompt: ?7,MI(GMI),!
  • Line Location: WRT+13
Function Call: WRITE
  • Prompt: ?4,"Indication: "_IND,!
  • Condition for execution: IND]""
  • Line Location: WRT+14
Function Call: WRITE
  • Prompt: ?4,"Provider: ",$E(GMD,1,22)
  • Line Location: WRT+14
Function Call: WRITE
  • Prompt: ?37,"Cost/Fill: $",$J(CF,6,2)
  • Condition for execution: CF
  • Line Location: WRT+14
Function Call: WRITE
  • Prompt: ?57,"Exp/Can Dt: "_ECD
  • Line Location: WRT+15
Function Call: WRITE
  • Prompt: !
  • Line Location: WRT+16
Function Call: WRITE
  • Prompt: "Outpatient prescriptions are cancelled 72 hours after admission",!
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: "Outpatient prescriptions are cancelled 72 hours after admission",!
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: !,"Drug....................................",?65,"Last",!
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: ?18,"Rx #",?31,"Stat",?45,"Qty",?54,"Issued",?65,"Filled",?76,"Rem"
  • Line Location: HEAD+7
Info |  Source |  Entry Points |  Interaction Calls