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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: GMTSPSO8

Package: Health Summary

Routine: GMTSPSO8


Information

GMTSPSO8 ;RS/DLC - OP Rx Summary Component by VA Drug Class ;Jun 14, 2021@12:10:02

Source Information

Source file <GMTSPSO8.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN ; OP Rx HS Component
WRT ; Writes OP Pharmacy Segment Record
HEAD ; Prints Header
; Only write the next line when there is data

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Patient Has Archived OP Prescriptions",!
  • Line Location: MAIN+8
Function Call: WRITE
  • Prompt: "Patient Has Archived OP Prescriptions",!
  • Line Location: MAIN+10
Function Call: WRITE
  • Prompt: $P($P(GMR,U,3),";",2)
  • Line Location: WRT+12
Function Call: WRITE
  • Prompt: !,?18,$P(GMR,U,6),?31,$S($G(GMR)["SUSPENDED":"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+13
Function Call: WRITE
  • Prompt: ?2,"SIG: "
  • Condition for execution: GMSIG=1
  • Line Location: WRT+18
Function Call: WRITE
  • Prompt: ?7,MI,!
  • Line Location: WRT+18
Function Call: WRITE
  • Prompt: ?4,"Indication: "_IND,!
  • Condition for execution: IND]""
  • Line Location: WRT+19
Function Call: WRITE
  • Prompt: ?4,"Provider: ",$E(GMD,1,22)
  • Line Location: WRT+19
Function Call: WRITE
  • Prompt: ?37,"Cost/Fill: $",$J(CF,6,2)
  • Condition for execution: CF
  • Line Location: WRT+19
Function Call: WRITE
  • Prompt: ?57,"Exp/Can Dt: "_ECD
  • Line Location: WRT+20
Function Call: WRITE
  • Prompt: !
  • Line Location: WRT+21
Function Call: WRITE
  • Prompt: "Outpatient prescriptions are cancelled 72 hours after admission",!
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: "Outpatient prescriptions are cancelled 72 hours after admission",!
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: "VA drug class(es) selected: "
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: GMNAME
  • Line Location: HEAD+16
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+17
Function Call: WRITE
  • Prompt: !?65,"Last",!
  • Line Location: HEAD+18
Function Call: WRITE
  • Prompt: ?18,"Rx #",?31,"Stat",?45,"Qty",?54,"Issued",?65,"Filled",?76,"Rem"
  • Line Location: HEAD+20

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call