Routine: NURARMH0

Package	Total	Call Graph
Nursing Service	9	^NURAKILL ^NURARMH1 (BEDSEL,TIMESEL)^NURARPC0 RERUNRPT^NURARPC3 LOSER^NURARST EN8^NURSAGP1 (EN12,EN8,EN9)^NURSAGSP EN7^NURSUT0 CLOSE^NURSUT1
VA Fileman	2	^%DT ^DIC

Package

Total

Call Graph

^NURAKILL ^NURARMH1 (BEDSEL,TIMESEL)^NURARPC0 RERUNRPT^NURARPC3 LOSER^NURARST EN8^NURSAGP1 (EN12,EN8,EN9)^NURSAGSP EN7^NURSUT0
CLOSE^NURSUT1

^%DT ^DIC

Package	Total	Caller Graph
Nursing Service	2	NURAMH9 NURAPR-RES-MANHR

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
QUIT	; KILL LOCAL VARIABLES
ASKDAY	;
START	;
HSKEEP	; SET LOCAL VARIABLES
EN1	;ENTRY FROM OPTION NURAPR-RES-MANSER
EN2	;ENTRY FROM OPTION NURAPR-RES-MANLOC
WARDSEL

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?17,"Nursing AMIS 1106 Patient Care Manhours Reports" Line Location: HSKEEP+3
Function Call: WRITE	Prompt: ! Line Location: HSKEEP+4
Function Call: WRITE	Prompt: ! Line Location: HSKEEP+8
Function Call: READ	Prompt: "Select Nursing Unit: " Formatting: !! Timeout: DTIME Variable: X Line Location: WARDSEL+0
Routine Call	DIC Line Location: WARDSEL+2

FileNo	Call Tags
^NURSF(211.4 - [#211.4]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DIC(213.9 - [#213.9]	NURARMH0+2
^TMP("NURBDSM"	START+2!
^TMP($J	START+2!, QUIT+2!

Name	Line Occurrences
@(	HSKEEP+8
EN1	NURARMH0+3
EN2	NURARMH0+3
HSKEEP	EN1+2, QUIT+1
QUIT	NURARMH0+3, HSKEEP+4, HSKEEP+5, HSKEEP+6, HSKEEP+7, HSKEEP+9, HSKEEP+10
WARDSEL	HSKEEP+5, WARDSEL+3

Name	Field # of Occurrence
>> %DT	HSKEEP+1*
DIC	WARDSEL+1*, WARDSEL+2!
DIC(0	HSKEEP+4, WARDSEL+1
DTIME	WARDSEL
>> DTL(	START+1*
>> FNT(	START+1*
>> FT(	START+1*
>> HDATE	ASKDAY+2*
IOST	QUIT+1
>> NBCEN	HSKEEP+1*
>> NBDSECT	HSKEEP+1*
>> NBRK	HSKEEP+1*
>> NDATED	ASKDAY+2
>> NHOSPSW	EN1+1, EN2+1, HSKEEP+4, HSKEEP+5
>> NPTCEN	HSKEEP+1*
>> NRPTDAT	HSKEEP+2*
>> NT(	START+1*
>> NURMDSW	HSKEEP+1*, HSKEEP+4
>> NURMDSW(1	HSKEEP+1*
>> NURMDSW(3	HSKEEP+1*
>> NURMDSW(4	HSKEEP+1*
>> NUROUT	NURARMH0+3, HSKEEP+1, HSKEEP+4, HSKEEP+5, HSKEEP+6, HSKEEP+7, HSKEEP+9, QUIT+1, ASKDAY+1, WARDSEL*
>> NURPAGE	HSKEEP+1*
>> NURQUEUE	NURARMH0+3, HSKEEP+1, QUIT+1
>> NURSHDR	ASKDAY+2*
>> NURSWARD	HSKEEP+1, WARDSEL+4
>> NURSWARD(0	WARDSEL+4*
>> NURSWHEN	HSKEEP+1*, HSKEEP+8
>> POP	HSKEEP+10
>> SEL	NURARMH0+3
>> TL(	START+1*
U	ASKDAY+2
>> X	HSKEEP+1, START+1, WARDSEL*
>> Y	HSKEEP+2, WARDSEL+3, WARDSEL+4
>> Y(0	WARDSEL+4
>> ZTRTN	HSKEEP+10*
>> ZTSK	HSKEEP+10

Information