Routine: APSKAMN2

Package	Total	Call Graph
IHS Changes To Pharmacy	3	START1^APSKAMN1 OUTPUT^APSKAMN3 (EXP,LN,PWR,TIME)^APSKAMN6
Kernel	1	^%ZIS
VA Fileman	1	^DIR

Package	Total	Caller Graph
IHS Changes To Pharmacy	2	APSKAMN1 APSKAMN7

Entry Points

Name	Comments	DBIA/ICR reference
CO	;===>PART OF VOL OF DISTR. CALC
R2	;===>CALC COEFFICIENT OF DETERMINATION
CALCKO
K1	;===>CALC ELIMINATION RATE
SAMTIME	;EP
V1	;===>CALC VOL OF DISTRIBUTION
CVTIME	;EP - CONVERTS ALL TIME INPUTS INTO DECIMAL HOURS
END
ERROR	;EP
LOOP3
LOOP2
LOOP1
CALC	;ENTRY POINT
LOOP5
LOOP4

External References

Name	Field # of Occurrence
^%ZIS	APSKAMN2+3
START1^APSKAMN1	ERROR+7
OUTPUT^APSKAMN3	V1+10
EXP^APSKAMN6	CO+2, CO+6, V1+1, V1+4
LN^APSKAMN6	LOOP2+1, LOOP3, LOOP5
PWR^APSKAMN6	LOOP4, LOOP5+1, R2+2, R2+5, R2+7, K1+2
TIME^APSKAMN6	CVTIME+1, CVTIME+2, CALC+1, CALCKO
^DIR	SAMTIME+5, ERROR+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"AN ERROR HAS OCCURED IN YOUR DATA COLLECTION. PLEASE REVIEW" Line Location: ERROR+1
Function Call: WRITE	Prompt: !,"YOUR DATA CAREFULLY!" Line Location: ERROR+2
Function Call: WRITE	Prompt: @IOF Line Location: ERROR+6
Routine Call	DIR Line Location: SAMTIME+5 ERROR+4
Routine Call	%ZIS Line Location: APSKAMN2+3

Label References

Name	Line Occurrences
CALCKO	CALC+3
END	SAMTIME+5, ERROR+5
ERROR	V1+3, V1+6
LOOP1	CALC+2
LOOP2	CALCKO+8
LOOP3	CALCKO+10
LOOP4	CALCKO+11
LOOP5	CALCKO+12
R2	CALCKO+13
SAMTIME	SAMTIME+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS("B"	APSKAMN2+2*
>> APSKC(	LOOP2, LOOP3, LOOP5
>> APSKC(13	CVTIME+18, CO+3
>> APSKC(4	CVTIME+18*
>> APSKC1	CO+6*, V1+5
>> APSKCO	CO+3*, V1+5
>> APSKCO1	CO+1*, CO+2
>> APSKD	CALCKO+6
>> APSKEE	CO+3, CO+6, V1+2, V1+5
>> APSKH(	LOOP1, LOOP1+1, CALCKO+9, LOOP2+2, LOOP4
>> APSKH(13	CALCKO+1, CALCKO+2, CALCKO+3*, CO+1
>> APSKK0	CALCKO+6, CALCKO+7, V1+2
>> APSKK1	K1+4*, CO+1, CO+6, V1+1, V1+4, V1+5, V1+9
>> APSKK1A	K1+1*, K1+4
>> APSKK1B	K1+3*, K1+4
>> APSKLNN	LOOP2+2, LOOP3+1, LOOP5+1
>> APSKPL	CALCKO+3
>> APSKPP	LOOP4+1, LOOP5+2, R2+3, R2+6, R2+8, K1+3
>> APSKR2	R2+10*
>> APSKR2A	R2+3*, R2+10
>> APSKR2B	R2+9*, R2+10
>> APSKRS3	R2+6*, R2+9
>> APSKRS4	R2+8*, R2+9
>> APSKS(1	CVTIME+1*, CALC+1, CALC+2, CALCKO+8, CALCKO+9, CALCKO+10, CALCKO+11, CALCKO+12, R2+1, R2+6 , R2+8, K1+1, K1+3, CO+6
>> APSKS(2	LOOP2+2*, R2+1, K1+1
>> APSKS(3	CALCKO+9*, R2+1, R2+4, K1+1, K1+2, CO+6
>> APSKS(4	LOOP3+1*, R2+1, R2+7, K1+1, CO+6
>> APSKS(5	LOOP4+1*, R2+6, K1+3
>> APSKS(6	LOOP5+2*, R2+8
>> APSKSY	R2+7*
>> APSKT(	LOOP1
>> APSKT(1	CALCKO+1, CALCKO+4
>> APSKT(13	CVTIME+3, CALCKO+1
>> APSKT(14	CVTIME+3
>> APSKT(15	CVTIME+3, CVTIME+4, CVTIME+5
>> APSKT(16	CVTIME+5, CVTIME+6, CVTIME+7, CVTIME+8
>> APSKT(2	CVTIME+5, LOOP1, CALCKO+4
>> APSKT0	CALCKO+4, CALCKO+5, CALCKO+6*, V1+1, V1+4
>> APSKT1	V1+9*
>> APSKV1	V1+7*, V1+8
>> APSKV1A	V1+2*, V1+3, V1+7
>> APSKV1B	V1+5*, V1+6, V1+7
>> APSKV2	V1+8*
>> APSKWT	V1+8
>> APSKX1	CVTIME+1, CVTIME+2, CALC+1, CALC+2, LOOP1, LOOP1+1, CALCKO, CALCKO+8, CALCKO+9, CALCKO+10 , CALCKO+11, CALCKO+12, LOOP2, LOOP2+2, LOOP3, LOOP4, LOOP5
>> APSKXX	LOOP2, LOOP3, LOOP4, LOOP5, LOOP5+1, R2+1, R2+4, R2+7, K1+2, CO+2 , CO+6, V1+1, V1+4*
>> APSKY	R2+4*
>> APSKYY	LOOP4, LOOP5+1, R2+1, K1+2
>> APSKZ(4	CVTIME+17*
>> APSKZ1	CVTIME+7*, CVTIME+8
>> APSKZ2	CVTIME+8*, CVTIME+9
>> APSKZ3	CVTIME+9*, CVTIME+10
>> APSKZ4	CVTIME+10, CVTIME+11, CVTIME+12, CVTIME+13, CVTIME+16*, CVTIME+17
>> APSKZ4A	CVTIME+13, CVTIME+14, CVTIME+16
>> APSKZ4B	CVTIME+13, CVTIME+15, CVTIME+16
>> APSKZ5	CVTIME+11*, CVTIME+12
DIR	SAMTIME+1!, ERROR+3!
DIR("A"	SAMTIME+2, SAMTIME+3, SAMTIME+4, ERROR+4
DIR("B"	SAMTIME+1*
DIR(0	SAMTIME+1, ERROR+3
>> DIRUT	SAMTIME+5, ERROR+5
>> DUOUT	SAMTIME+5, ERROR+5
IOF	ERROR+6
ION	APSKAMN2+2
>> IOP	APSKAMN2+2*
>> Y	SAMTIME+5, ERROR+5

Customize PDF page

Package: IHS Changes To Pharmacy

Routine: APSKAMN2

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Label References

Local Variables

Legend: