Routine: NURCROP2

Information

NURCROP2 ;HIRMFO/RM-CARE PLAN RANK ORDER PRINT ;12/23/93

Source file <NURCROP2.m>

Package	Total	Call Graph
Nursing Service	1	($$HDRINT,$$HEADER,$$WRTOPT,$$WRTORD,$$WRTPPT,$$WRTPROB)^NURCROP1
VA Fileman	1	^DIR

Package	Total	Caller Graph
Nursing Service	2	NURCRL0 NURCROP0

Name	Comments	DBIA/ICR reference
PRINT	; ENTRY FROM NURCROP0 TO PRINT THIS REPORT
RPRTID()	; Select the Ward/Group Report ID for the header
SORTYP()	; Function that returns: ; 1 = sort by admitting location ; 2 = sort by all locations during patient stay ; 0 = user did not select location ; -1 = user abnormally exited.

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: RPRTID+5
Routine Call	DIR Line Location: SORTYP+7 RPRTID+3 RPRTID+6

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	PRINT+7, PRINT+16, PRINT+18, PRINT+23

Name	Field # of Occurrence
DIR	SORTYP+6!, RPRTID+3!, RPRTID+5!, RPRTID+6!
DIR("?"	SORTYP+7, RPRTID+3, RPRTID+5*
DIR("A"	SORTYP+6, RPRTID+3, RPRTID+5*
DIR("B"	RPRTID+5*
DIR(0	SORTYP+7, RPRTID+3, RPRTID+5*
>> DIRUT	RPRTID+3, RPRTID+6
DTOUT	SORTYP+5~, SORTYP+8
DUOUT	SORTYP+5~, SORTYP+8
>> NURCBS5	PRINT+16, PRINT+23
>> NURCFREQ	PRINT+7*, PRINT+15
>> NURCFRQ1	PRINT+18*, PRINT+22
NURCLID	RPRTID+1~, RPRTID+2, RPRTID+3, RPRTID+4, RPRTID+5, RPRTID+6, RPRTID+8
>> NURCOTRM	PRINT+18*, PRINT+22, PRINT+23
>> NURCOUT	PRINT+6, PRINT+7, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+22, PRINT+23
>> NURCPAGE	PRINT+28*
>> NURCPTRM	PRINT+7*, PRINT+15, PRINT+16, PRINT+18, PRINT+23
>> NURCRANK	PRINT+6, PRINT+7, PRINT+15
>> NURCRNK1	PRINT+15, PRINT+18, PRINT+22
>> NURSNLOC(	RPRTID+3, RPRTID+4
>> NURSNLOC(""	RPRTID+2, RPRTID+5
>> Y	SORTYP+8, RPRTID+3, RPRTID+6