DGPMUTL ;ALB/MJK - SELECT PATIENT MOVEMENT FOR PATIENT ; 3/24/90 1PM ;
Source file <DGPMUTL.m>
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 5 | DGPMGLG3 DGPTFCR DGRUGC ^DGPM DGBLRV |
| Dietetics | 1 | FHMMNADM |
| Integrated Billing | 1 | IB20PT81 |
| Scheduling | 1 | SCRPW41 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- sets DIC and DIC(0) before calling DFN (*** FOR MAS USE ONLY ***)
; input: DFN ; All desired DIC variables except DIC and DIC(0) ; output: Y, X, DTOUT, DUOUT as defined by FM documentation for ^DIC |
|
| PTF(DGPTF) | ; -- determine ward at discharge
; o called by WARD AT DISCHARGE(c) field in PTF file ; input: DGPTF := ifn of ptf file |
|
| DFNQ | ||
| WARDQ | ||
| DIC | ;
|
|
| DFN | ; -- select mvt for DFN patient (*** FOR MAS USE ONLY ***)
; input: DFN ; All desired DIC variables ; output: Y, X, DTOUT, DUOUT as defined by FM documentation for ^DIC |
|
| WARD | ; -- determine ward at discharge
; o called by WARD AT DISCHARGE(c) field in pt mvt file ; input: D0 := d/c ifn of pat. mvt. file |
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DGPM - [#405] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM - [#405] | WARD+6, WARD+8, PTF+6 |
| ^DGPM("APMV" | WARD+8 |
| ^DGPM("APTF" | PTF+6 |
| ^DIC(42 - [#42] | WARD+8 |
| ^DPT - [#2] | DFN+5 |
| Name | Line Occurrences |
|---|---|
| DFN | EN+5, DFN+10, DFN+11, DFN+12 |
| DFNQ | DFN+5, DFN+7, DFN+9, DFN+11, DFN+12 |
| DIC | DFN+10, DFN+12 |
| WARD | PTF+7 |
| WARDQ | WARD+6, WARD+8 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | DFN+5, WARD+6, WARD+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | DIC+1* |
| %DT | DFN+11*! |
| CA | WARD+5~, WARD+7*, WARD+8 |
| D | DFNQ!, DIC+2* |
| D0 | WARD+6, PTF+5~, PTF+6* |
| DFN | DFN+5, DIC+2, WARD+5~, WARD+7*, WARD+8 |
| DGPTF | PTF~, PTF+6 |
| >> DIC | EN+5* |
| >> DIC("A" | DFN+6 |
| >> DIC("B" | DFN+6, DFN+8 |
| >> DIC(0 | EN+5*, DIC+1* |
| DTIME | DFN+7 |
| >> DTOUT | DFN+7*, DFN+11, DFN+12 |
| >> DUOUT | DFN+9* |
| IDT | WARD+5~, WARD+8* |
| M | WARD+5~, WARD+6*, WARD+7, WARD+8* |
| MVT | WARD+5~, WARD+8* |
| U | WARD+6, WARD+7, WARD+8, PTF+6 |
| >> X | DFN+5*, DFN+6, DFN+7*, DFN+8*, DFN+9, DFN+10, DFN+11*, WARD+5*, WARD+8* |
| >> Y | DFN+5*, DFN+7*, DFN+9*, DFN+11, DFN+12 |