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 |