Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ADGSRVC

Package: IHS Changes To ADT

Routine: ADGSRVC


Information

ADGSRVC ; IHS/ADC/PDW/ENM - HSA-202 CALCULATE ; [ 09/25/2000 4:00 PM ]

Source Information

Source file <ADGSRVC.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS Changes To ADT 3 ^ADGSRVP  ^ADGSRVP1  KILL^ADGUTIL  
Kernel 1 ^%ZISC  
Registration 1 ^DGPMLOS  
VA Fileman 1 C^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Changes To ADT 1 ADGSRVQ  

Entry Points

Name Comments DBIA/ICR reference
A ; -- driver
AB ; -- authorized beds by category
LRD ; -- loop days
NB ; -- # of non-beneficiaries discharged
LTX ; -- loop census file
EOM ; -- patients in service (end of month)
SS() ; -- special service 3 ob, 4 nb, 5 tb, 6 mh, 7 al ;non SS
; -- ts ihs code 08 07 13 12 15 ;------
Q ; -- cleanup
INI ; -- initialize variables
SC ; -- counts, special service
PK ; -- peak and minimum
OS ; -- counts, other service
BOM ; -- patients in service (beginning of month)
; -- special service

External References

Name Field # of Occurrence
C^%DTC INI+3
^%ZISC Q+1
^ADGSRVP A+1
^ADGSRVP1 A+1
KILL^ADGUTIL Q+1
^DGPMLOS NB+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No data",!!
  • Line Location: ADGSRVC+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: Q+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ADGTX - [#9009011.5] ADGSRVC+4, LTX+1, BOM+2, BOM+4, BOM+5, LRD+1, LRD+2, EOM+1, EOM+2, EOM+3
^ADGTX(0 ADGSRVC+4
^AUPNPAT - [#9000001] NB+4
^DGPM("AMV1" NB+2, NB+3, NB+5
^DIC(42 - [#42] AB+3, AB+4, AB+7, AB+8
^DIC(45.7 - [#45.7] SS+2

Label References

Name Line Occurrences
$$SS BOM+2, LRD+3, SC+1, SC+2, SC+3, SC+4, SC+5, SC+6, SC+7, SC+13
, SC+15, EOM+1
AB A+1
BOM LTX+1
EOM LTX+1
INI ADGSRVC+4
LRD LTX+1
LTX A+1
NB A+1
OS LRD+3
PK A+1
Q A+1
SC LRD+3

Naked Globals

Name Field # of Occurrence
^("IHS1" AB+4
^(1 BOM+2, LRD+2, EOM+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADU ADGSRVC+3~, LRD+2*, SC+1, SC+2, SC+3, SC+4, SC+6, SC+7, SC+9, SC+10
, SC+11, SC+13, OS+1, OS+3, OS+4, OS+5, OS+6, OS+7, OS+8, OS+9
, OS+10, OS+11
C AB+1~, AB+2*, AB+5*, AB+6
>> DFN NB+3*, NB+4, NB+5
DGA Q+1!
DGA( INI+1*, BOM+2*, SC+1*, SC+2*, SC+3*, SC+4*, SC+5*, SC+6*, SC+7*, EOM+1*
DGA(1 BOM+4*, SC+9*, SC+10*, OS+3*, OS+4*, OS+5*, OS+6*, OS+7*, OS+8*, OS+9*
, OS+10*, EOM+2*
DGA(2 BOM+5*, SC+20*, SC+21*, OS+13*, OS+14*, OS+15*, OS+16*, OS+17*, OS+18*, OS+19*
, OS+20*, EOM+3*
DGA(4 SC+16*, SC+17*
>> DGBED( AB+2*, AB+6*
>> DGBED("I" AB+7*
>> DGBED("P" AB+8*
>> DGC( LRD+2*, SC+13*, OS+1*, PK+1, PK+2, PK+3, PK+4
>> DGC(0 PK+1
>> DGCNT NB+1*, NB+6*
>> DGLOS NB+1*, NB+6*
>> DGLOS( INI+2*
>> DGLOS(1 SC+11*, OS+11*
>> DGLOS(2 SC+22*, OS+21*
>> DGLOS(4 SC+18*
DGMAX PK+1*, PK+3*, Q+1!
DGMIN PK+1*, PK+4*, Q+1!
DGMON INI+3, INI+4, Q+1!
DGPMIFN NB+6*, Q+1!
DGX Q+1!
ED ADGSRVC+3~, INI+4*, LRD+1, NB+2
I INI+1~*, INI+2*
IEN ADGSRVC+3~, NB+5*, NB+6
IOF Q+1
J INI+1~*
LD ADGSRVC+3~, LRD+3*, EOM+1, EOM+2, EOM+3
LN ADGSRVC+3~
N AB+1~, AB+4*, AB+6
ND ADGSRVC+3~
P AB+1~, AB+5*, AB+6*
PD ADGSRVC+3~, ADGSRVC+4, INI+3*, BOM+2, BOM+4, BOM+5, LRD+1, NB+1
PED ADGSRVC+3~, LRD+2*, SC+1, SC+2, SC+3, SC+5, SC+6, SC+7, SC+13, SC+16
, SC+17, SC+18, SC+20, SC+21, SC+22, OS+1, OS+13, OS+14, OS+15, OS+16
, OS+17, OS+18, OS+19, OS+20, OS+21
RD ADGSRVC+3~, LRD+1*, LRD+2, LRD+3, SC+13, OS+1, PK+1*, PK+2*, PK+3, PK+4
, NB+1*, NB+2*, NB+3, NB+5
>> TS LTX+1*, BOM+2, BOM+4, BOM+5, LRD+1, LRD+2, EOM+1, EOM+2, EOM+3, SS+2
U BOM+2, BOM+4, BOM+5, SC+1, SC+2, SC+3, SC+4, SC+5, SC+6, SC+7
, SC+9, SC+10, SC+11, SC+13, SC+16, SC+17, SC+18, SC+20, SC+21, SC+22
, OS+1, OS+3, OS+4, OS+5, OS+6, OS+7, OS+8, OS+9, OS+10, OS+11
, OS+13, OS+14, OS+15, OS+16, OS+17, OS+18, OS+19, OS+20, OS+21, EOM+1
, EOM+2, EOM+3, AB+6, AB+7, AB+8, NB+4, NB+6, SS+2
WD AB+1~, AB+3*, AB+4, AB+7, AB+8
X ADGSRVC+3~, INI+3, NB+6, SS+2~*, SS+3
X1 ADGSRVC+3~, INI+3*
X2 ADGSRVC+3~, INI+3*
Y ADGSRVC+3~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All