©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PSGSCT ;BIR/CML3-SERVICE COST TOTALS ; 22 Jun 98 / 1:50 PM
Source file <PSGSCT.m>
| Package | Total | Call Graph |
|---|---|---|
| Inpatient Medications | 4 | ENDTS^PSGAMS ^PSGSCT0 (ENCV,ENKV)^PSGSETU EN3^PSGTI |
| Kernel | 1 | ^%ZISC |
| VA Fileman | 1 | ($$EXTERNAL,$$VFIELD)^DILFD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENQ | ;
|
|
| ADD | ; find service, if possible, or ward name
|
|
| DONE | ;
|
|
| TOT | ; set global of service, if service found, or ward if service not found
|
|
| DRG | ;
|
| FileNo | Call Tags |
|---|---|
| ^DIC(42 - [#42] | EXTERNAL^DILFD, VFIELD^DILFD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(42 - [#42] | ADD+1, ADD+2 |
| ^PS(57.6 - [#57.6] | ENQ+1, DRG+1 |
| ^UTILITY("PSG" | ENQ+1!, ENQ+2!, TOT+1, TOT+2 |
| Name | Line Occurrences |
|---|---|
| ADD | ENQ+1 |
| DRG | ADD+1 |
| ENQ | PSGSCT+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DRG+1, TOT+1*, TOT+2* |
| ^(0 | ADD+2, DRG+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> CNT | ENQ+1*, DRG+1*, DRG+2, TOT+1, TOT+2 |
| COST | DONE+1!, ENQ+1*, DRG+1*, DRG+2, TOT+1, TOT+2 |
| DRG | DONE+1!, DRG+1* |
| FD | PSGSCT+3, DONE+1!, ENQ+1 |
| HLP | PSGSCT+3*, DONE+1! |
| IO | PSGSCT+3 |
| IO("Q" | PSGSCT+3 |
| IO(0 | PSGSCT+3 |
| IOST | PSGSCT+3 |
| ND | DONE+1!, DRG+1*, TOT+1*, TOT+2* |
| NU | DONE+1! |
| P | DONE+1! |
| >> POP | PSGSCT+3 |
| PR | DONE+1!, DRG+1* |
| RTN | PSGSCT+3*, DONE+1! |
| SD | PSGSCT+3, DONE+1!, ENQ+1 |
| >> SN | ENQ+1*, ADD+1*, TOT+1 |
| ST | DONE+1!, ENQ+1*, DRG+1 |
| STOP | DONE+1! |
| STRT | DONE+1! |
| W | DONE+1!, ENQ+1*, ADD+1, ADD+2, DRG+1 |
| WD | DONE+1!, ENQ+1*, ADD+2*, TOT+2 |
| WN | DONE+1! |
| >> XQUIT | PSGSCT+3 |
| >> ZTDESC | PSGSCT+3* |