Routine: NURA6F1

Information

NURA6F1 ;HIRMFO/JH/MD,FT-GRADE PROFILE BY SERVICE CATEGORY ;8/8/96 13:25

Source file <NURA6F1.m>

Package	Total	Call Graph
Nursing Service	9	(EN1,EN2)^NURAAGS0 EN2^NURAED3 (HEADER,NODATA,PRINT)^NURAGEN ^NURAKILL EN6^NURSAGP0 (EN12,EN2,EN3,EN5,PRD)^NURSAGSP EN1^NURSAUTL EN7^NURSUT0 CLOSE^NURSUT1
Kernel	1	$$REPEAT^XLFSTR

Name	Comments	DBIA/ICR reference
CAT
START	;
POS	;SERVICE POSITION, GRADE REPORT
START1	;
DEV	;
QUIT
CHK
HSKEEP	;
TOTALS	;

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: START+3
Function Call: WRITE	Prompt: ! Line Location: POS+2
Function Call: WRITE	Prompt: ! Line Location: START1+3
Function Call: WRITE	Prompt: ! Line Location: DEV+2
Function Call: WRITE	Prompt: !,?47,$$REPEAT^XLFSTR("-",33) Line Location: TOTALS+2
Function Call: WRITE	Prompt: !!,"TOTAL NUMBER OF ASSIGNMENTS ",?47,$J(NTCT,4,0),!!,"TOTAL NUMBER OF PERSONNEL",?47,$J(NTOT,4,0) Line Location: TOTALS+2

Name	Line Occurrences (* Changed, ! Killed)
^TMP("NURA"	START+1!, START1+1!, QUIT!
^TMP($J	START+1!, START1+1!, QUIT!

Name	Line Occurrences
CHK	START+3, START1+3
DEV	CAT+3, POS+4
HSKEEP	CAT, POS+1
QUIT	CAT, CAT+1, CAT+2, CAT+3, START+3, START+5, POS+1, POS+2, POS+3, POS+4 , START1+3, START1+5
TOTALS	START+4, START1+4

Name	Field # of Occurrence
>> ANS2	DEV+1, DEV+2
>> DIC(0	HSKEEP+2*
IO	START+1, START1+1
IOSL	TOTALS+1
>> NRPT	START+3, START1+3
>> NTCT	START+1*, TOTALS+2
>> NTOT	TOTALS+2
>> NURMDSW	HSKEEP+2, HSKEEP+3
>> NUROUT	CAT, CAT+1, CAT+2, START+3, POS+1, POS+2, POS+3, START1+3, HSKEEP+1, HSKEEP+2 , HSKEEP+3
>> NURPAGE	START+1, START1+1
NURPLSCR	HSKEEP+2, HSKEEP+3!
>> NURPLSW	HSKEEP+3
>> NURQUIT	START+1, START1+1
>> NURROU	START+3, START1+3
>> NURSLEV	START+3, START1+3
>> NURSSP	START+1, START+2, START1+1, START1+2
>> NURSTIL	START+2, START1+2
>> NURSTIL1	START+2, START1+2
>> NURSTIL2	START+2, START1+2
>> NURSW1	START+1, START1+1
>> NX	START+3, START1+3
>> POP	CAT+3, POS+4
>> ZTDESC	DEV+1*
>> ZTRTN	DEV+2*
>> ZTSK	CAT+3, POS+4