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

Package: DSS Extracts

Routine: ECXPHAI


Information

ECXPHAI ;MBS/BAH - Pharmacy DSS Extract IV Holding File Report ;3/5/24 11:53

Source Information

Source file <ECXPHAI.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point from option
EN1 ;Init variables
EXIT
TXTYPE ;Prompt for transaction type
; This code will pull the options from the file #728.113 field #5 DD to ensure compatibility
; in case of any future change to that field.
DATES ;Prompt for start date
PATIENT ;Prompt for patient
HEADER ;Print header
GETDATA ;Get data from IV Holding File
DETAIL ;Print report
WAIT ;End of page logic

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report requires 132 column format."
  • Line Location: EN+23
Function Call: WRITE
  • Prompt: !!,"Note that the start and end dates for the IV Holding File Report refer to the",!,"DATE/TIME field, not the ORDER DATE field."
  • Line Location: DATES+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !,"IV Holding File Report",?121,$$RJ^XLFSTR("PAGE: "_PAGE,10)
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,"Start Date: "_$$FMTE^XLFDT(SDATE),?90,"Report Run Date/Time: "_ECRUN
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"End Date: "_$$FMTE^XLFDT(EDATE),!
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,"Transaction Type Date/Time Order Number Order Date Patient"
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !," Drug Additive Strength Additive Strength Units Solution Volume Cost"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,LN
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ECX(728.113 - [#728.113] FIELD^DID
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call