Routine: PRSEPMD6

Information

PRSEPMD6 ;HISC/GLB-INCOMPLETE MANDATORY INSERVICE CLASS DATA PART 2 OF 2 ;2/17/94

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Kernel	1	$$FMTE^XLFDT
PAID	1	ENDPG^PRSEUTL
VA FileMan	1	D^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
PAID	1	PRSEPMD5

Entry Points

Name	Comments	DBIA/ICR reference
HDR	; PRINT REPORT HEARDER
SUBHDR	;

External References

Name	Field # of Occurrence
D^DIQ	HDR+5
ENDPG^PRSEUTL	HDR+1
$$FMTE^XLFDT	PRSEPMD6+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"NO DEFICIENCIES FOUND FOR THIS TIME PERIOD." Line Location: PRSEPMD6+2
Function Call: WRITE	Prompt: !,"SERVICE: ",PSPC Condition for execution: $G(PSPC)]"" Line Location: PRSEPMD6+2
Function Call: WRITE	Prompt: !,"CLASS: ",PRSECLS Condition for execution: $G(PRSECLS)]"" Line Location: PRSEPMD6+2
Function Call: WRITE	Prompt: ! Line Location: PRSEPMD6+7
Function Call: WRITE	Prompt: ! Line Location: PRSEPMD6+11
Function Call: WRITE	Prompt: ! Line Location: PRSEPMD6+13
Function Call: WRITE	Prompt: $S(NSCT=" BLANK":" ",1:$S(PRSE132:$E(NSCT,1,32),1:$E(NSCT,1,25))),! Line Location: PRSEPMD6+14
Function Call: WRITE	Prompt: ?10,$S(NAM=" BLANK":" ",1:$S(PRSE132:NAM,1:$E(NAM,1,25))) Line Location: PRSEPMD6+15
Function Call: WRITE	Prompt: @IOF Condition for execution: $E(IOST)="C"!(COUNT>1) Line Location: HDR+3
Function Call: WRITE	Prompt: !,"SERVICE MANDATORY TRAINING DEFICIENCY REPORT FOR "_$S(TYP="C":"CY ",TYP="F":"FY ",1:" ") Line Location: HDR+3
Function Call: WRITE	Prompt: $S(TYP="C"!(TYP="F"):$G(PYR),1:$G(YRST(1))_" - "_$G(YREND(1))) Line Location: HDR+4
Function Call: WRITE	Prompt: !,SE1 Line Location: HDR+12
Function Call: WRITE	Prompt: !,"Service: "_$S(PRSESER=" BLANK":" ",1:PRSESER) Line Location: SUBHDR+2
Function Call: WRITE	Prompt: ?50,"% Compliance: ",$J(COMPLIAN,3,0) Line Location: SUBHDR+7
Function Call: WRITE	Prompt: ?$X+3,PRSECLS Line Location: SUBHDR+7
Function Call: WRITE	Prompt: !! Line Location: SUBHDR+8

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP("PRSE"	PRSEPMD6+2, PRSEPMD6+3, PRSEPMD6+4, PRSEPMD6+9, PRSEPMD6+10, PRSEPMD6+11, PRSEPMD6+12

Label References

Name	Line Occurrences
HDR	PRSEPMD6+2, PRSEPMD6+7, PRSEPMD6+13
SUBHDR	PRSEPMD6+8, PRSEPMD6+13

Naked Globals

Name	Field # of Occurrence
^(	PRSEPMD6+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CLASSNUM	PRSEPMD6+10*, PRSEPMD6+11, PRSEPMD6+12
>> CLASSTXT	PRSEPMD6+12*, PRSEPMD6+17
>> COMPLIAN	PRSEPMD6+4, PRSEPMD6+6, SUBHDR+7
>> COUNT	HDR+2*, HDR+3, HDR+7, HDR+10
>> DEF	PRSEPMD6+5*, PRSEPMD6+6
DT	HDR+5
>> DUEDT	PRSEPMD6+3, PRSEPMD6+12, PRSEPMD6+16, PRSEPMD6+18*
>> HOLD	PRSEPMD6+9, PRSEPMD6+14, HDR+2*
>> HOLD2	PRSEPMD6+11, PRSEPMD6+15
IOF	HDR+3
IOSL	PRSEPMD6+7, PRSEPMD6+13
IOST	HDR+1, HDR+3
>> NAM	PRSEPMD6+11*, PRSEPMD6+12, PRSEPMD6+15
>> NSCT	PRSEPMD6+9*, PRSEPMD6+10, PRSEPMD6+14
>> NSW1	PRSEPMD6+7, PRSEPMD6+13, HDR+1, HDR+2*
>> NSW2	HDR+2*
>> POUT	HDR+1
>> PRSE132	PRSEPMD6+14, PRSEPMD6+15, PRSEPMD6+17, HDR+6, HDR+12
>> PRSECLS	PRSEPMD6+2, SUBHDR+7
>> PRSEOUT	PRSEPMD6+3, PRSEPMD6+7, PRSEPMD6+9, PRSEPMD6+11, PRSEPMD6+12, PRSEPMD6+13, HDR+1*, SUBHDR+1
>> PRSESER	PRSEPMD6+3*, PRSEPMD6+4, PRSEPMD6+9, PRSEPMD6+10, SUBHDR+2
>> PSPC	PRSEPMD6+2
>> PYR	HDR+4
>> SE1	HDR+12*
>> TMP	PRSEPMD6+4*, PRSEPMD6+5
>> TOT	PRSEPMD6+5*, PRSEPMD6+6
>> TYP	HDR+3, HDR+4
U	PRSEPMD6+5
>> Y	HDR+5*, HDR+7, HDR+10
>> YREND(1	HDR+4
>> YRST(1	HDR+4

Customize PDF page

Package: PAID