ECXAPHA2 ;ALB/TMD-Pharmacy Extracts Unusual Volumes Report ;4/9/19 15:47
Source file <ECXAPHA2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; entry point
|
|
| PRE | ; entry point for PRE data
|
|
| PRE2 | ; get Prescription data
|
|
| IVP | ; entry point for IVP Data
|
|
| UDP | ; entry point for UDP data
|
|
| BCM | ;Section added in patch 144
|
|
| CCODE(RIEN) | ; 144 get component information added in patch 144
; input - IEN of the BCMA MEDICATION LOG File ; ; output - CCIEN: pointer to a variable pointer field to file #50, #52.6, or #52.7 ; CCDORD: .02 field of file #50, #52.6, or #52.7 ; CCDGVN: .03 FIELD of file #50, #52.6, or #52.7 ; CCUNIT: .04 field of file #50, #52.6, or #52.7 ; CCTYPE: derived field, "D", "A", or "S" |
|
| FILE | ; put records in temp file to print later
|
|
| EXIT |
| FileNo | Call Tags |
|---|---|
| ^PSDRUG - [#50] | GET1^DIQ |
| ^PS(52.6 - [#52.6] | GET1^DIQ |
| ^PS(52.7 - [#52.7] | GET1^DIQ |
| ^PSB(53.79 - [#53.79] | GET1^DIQ |
