Routine: NURSEPD1

Information

NURSEPD1 ;HIRMFO/GLB-INCOMPLETE NURSING MANDATORY INSERVICE CLASS DATA PART 2 OF 2 ;4/19/89 09:37

Name	Comments	DBIA/ICR reference
HDR	; PRINT REPORT HEARDER

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"INDIVIDUAL EMPLOYEE DEFICIENCY REPORT FOR "_$S(TYP="C":"CY ",TYP="F":"FY ",1:" ") Line Location: HDR+2
Function Call: WRITE	Prompt: $S(TYP="C"!(TYP="F"):$G(NYR),1:$G(YRST(1))_" - "_$G(YREND(1))) Line Location: HDR+3
Function Call: WRITE	Prompt: ?$S(NURS132:101,1:62),$$FMTE^XLFDT(DT,2),?$S(NURS132:121,1:71),"PAGE: ",COUNT Line Location: HDR+4
Function Call: WRITE	Prompt: !!,?$S(NURS132:56,1:35),"ANNIVERSARY",!,"EMPLOYEE NAME",?$S(NURS132:46,1:25),"UNIT",?$S(NURS132:56,1:35),"DATE",?$S(NURS132:79,1:47),"CLASS" Line Location: HDR+5
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("-",$S(NURS132:132,1:80)) Line Location: HDR+6