ECXAPHA ;ALB/TMD-Pharmacy Extracts Unusual Volumes/Costs Report ;5/31/17 16:18
Source file <ECXAPHA.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; entry point
|
|
BEGIN | ; display report description
|
|
SELECT | ; user inputs for report option, threshold volume/cost and date range
|
|
PROCESS | ; entry point for queued report
|
|
; process temp file and print report
|
||
CLOSE | ;
|
|
HEADER | ;header and page control
|
|
SIG(ORDNO,PATNO) | ;Get ordering instructions for unit dose order. API added in patch 136
|
|
COST | ;Section added in 144, entry point for unusual cost report
|
|
SIGPRE(ORDNO) | ;Get SIG for Prescription Order - 178
|
|
SIGIVP(ORDNO,PATNO) | ;Get SIG for IV Order - 178
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|