Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRSEEMP1

Package: PAID

Routine: PRSEEMP1


Information

PRSEEMP1 ;HISC/JH-INDIVIDUAL INSERVICE ATTENDANCE REPORT ;9/17/1998

Source Information

Source file <PRSEEMP1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
PAID 5 ^PRSEKILL  (MSG3,MSG6)^PRSEMSG  (CLOSE,DATSEL,DEV,ENDPG,INS)^PRSEUTL  ($$EN12,EN5,EN6)^PRSEUTL2  ($$EN4,$$EN6,EN2)^PRSEUTL3  
VA FileMan 2 ^%DT  D^DIQ  
Kernel 1 $$REPEAT^XLFSTR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PAID 1 PRSE-IND-CLS  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; INDIVIDUAL STUDENT TRAINING REPORT
START ;
QUIT ;
Q
NHDR
L
SORT ;
SERV

External References

Name Field # of Occurrence
^%DT NHDR+4
D^DIQ START+11, NHDR+4
^PRSEKILL Q
MSG3^PRSEMSG EN1+2
MSG6^PRSEMSG EN1+1
CLOSE^PRSEUTL Q
DATSEL^PRSEUTL EN1+3
DEV^PRSEUTL EN1+8
ENDPG^PRSEUTL NHDR
INS^PRSEUTL EN1+3
$$EN12^PRSEUTL2 SORT+3
EN5^PRSEUTL2 EN1+4
EN6^PRSEUTL2 EN1+6
$$EN4^PRSEUTL3 EN1+6
$$EN6^PRSEUTL3 EN1+6
EN2^PRSEUTL3 EN1+2
$$REPEAT^XLFSTR START+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: !,"THERE IS NO DATA FOR THIS REPORT"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !,"EMPLOYEE: ",$P($G(^VA(200,PRDA,0)),U)
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !,"CLASS: ",PRSECLS
  • Condition for execution: $G(PRSECLS)]""
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !
  • Line Location: START+8
Function Call: WRITE
  • Prompt: ?$S(PRSE132:93,1:47),"Length: ",$S($P(PRDATA,U)>0:$J($P(PRDATA,U),4,2),1:"")
  • Line Location: START+10
Function Call: WRITE
  • Prompt: ?$S(PRSE132:114,1:67),$P(Y,"@"),!
  • Line Location: START+11
Function Call: WRITE
  • Prompt: ?1,"CEUs: ",+$P(PRDATA,U,2),?$S(PRSE132:88,1:42),"Contact HRS: ",$J($P(PRDATA,U,3),4,2)
  • Line Location: START+12
Function Call: WRITE
  • Prompt: !
  • Line Location: START+12
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",$G(IOM))
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !,?1,"Total Classes: ",PCOUNT,?$S(PRSE132:78,1:35),"Total Length/Hours:",$J(PHRS,7,2)
  • Line Location: START+17
Function Call: WRITE
  • Prompt: !,?4,"Total CEUs:",$J(PHRS("CEU"),6,2),?$S(PRSE132:77,1:34),"Total Contact Hours:",$J(PHRS("CON"),7,2),!
  • Line Location: START+17
Function Call: WRITE
  • Prompt: !
  • Line Location: NHDR+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="C-"!(NPC>1)
  • Line Location: NHDR+2
Function Call: WRITE
  • Prompt: !,"INDIVIDUAL "
  • Line Location: NHDR+2
Function Call: WRITE
  • Prompt: $S(PRSESEL="C":"C.E.",PRSESEL="M":"M.I.",PRSESEL="O":"OTHER",PRSESEL="W":"WARD",1:"COMPLETE")_" TRAINING REPORT FOR "_$S(TYP="C":"CY ",TYP="F":"FY ",1:" ")_$S(TYP="C"!(TYP="F"):$G(PYR),1:$G(YRST(1))_" - "_$G(YREND(1)))
  • Line Location: NHDR+3
Function Call: WRITE
  • Prompt: !,NI
  • Line Location: NHDR+11
Function Call: WRITE
  • Prompt: !
  • Line Location: NHDR+13
Function Call: WRITE
  • Prompt: !
  • Line Location: SERV+0
Function Call: WRITE
  • Prompt: "Sponsoring",!?2,"Service: "_$S(PRSELOC=" BLANK":"<Unknown>",1:$S(PRSE132:PRSELOC,1:$E(PRSELOC,1,16)))
  • Line Location: SERV+1
Function Call: WRITE
  • Prompt: ?$S(PRSE132:46,1:28),"Name: ",$S(PRSE132:N1,1:$E(N1,1,20)),?$S(PRSE132:92,1:52),"Title: ",$S(PRSETL=" BLANK":"<Unknown>",+PRSETL=PRSETL:"<Unknown>",1:$S(PRSE132:$E(PRSETL,1,40),1:$E(PRSETL,1,20)))
  • Line Location: SERV+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSE(452 - [#452] START+10, SORT+4, SORT+5, SORT+6, SORT+10
^PRSE(452.1 - [#452.1] SORT+12, SORT+13
^PRSE(452.7 - [#452.7] EN1+1
^PRSPC - [#450] SORT+3
^PRSPC("SSN" SORT+3
^TMP("PRSE" START+3, START+4, START+5, START+6, START+9, Q!, NHDR+11, SORT+10, SORT+11*, SORT+13*
^VA(200 - [#200] START+3, SORT+2, SORT+3

Label References

Name Line Occurrences
L EN1+8
NHDR START+3, START+7
Q EN1+4
QUIT EN1+2, EN1+3, EN1+6, EN1+8, START+3, START+15
SERV START+8
SORT START+1

Naked Globals

Name Field # of Occurrence
^(0 SORT+2, SORT+3
^(6 START+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA START+6*, START+9, START+10
>> DA(2 SORT+6*, SORT+10, SORT+13
>> DATSEL EN1+3*
>> DIC("S" EN1+5*
DUZ EN1+2, EN1+6, EN1+7
DUZ(0 EN1+6
>> HOLD EN1+2*, START+4*, START+10*, START+14*, NHDR+12*
IO START+1
IOF NHDR+2
IOM START+1, START+16
IOSL START+7
IOST NHDR, NHDR+2, SORT+1
>> N1 START+5*, START+6, START+9, SORT+2*, SORT+13, SERV+2
>> NCD START+6*, START+9, START+11, SORT+6*, SORT+9, SORT+13
>> NCD1 SORT+6*
>> NI NHDR+11*
>> NIC START+4*, START+10
>> NIC1 SORT+4*, SORT+5, SORT+6, SORT+8, SORT+10, SORT+11, SORT+12
>> NPC EN1+2*, NHDR+1*, NHDR+2, NHDR+6, NHDR+9
>> NQ EN1+2*, NHDR
>> NSORT START+4*, START+5, START+6, START+9, SORT+7*, SORT+11*
>> NSPC SORT+8
>> NSW1 EN1+2*, START+7, NHDR, NHDR+12*
>> PCOUNT START+1*, START+9*, START+17
>> PHRS START+1*, START+9*, START+17
>> PHRS("CEU" START+1*, START+9*, START+17
>> PHRS("CON" START+1*, START+9*, START+17
>> POP EN1+8
>> POUT EN1+2*, EN1+3, EN1+4, EN1+6, START+4, START+5, START+6, START+7, START+15, NHDR
>> PRCOD SORT+3*
>> PRDA EN1+6*, EN1+7*, START+3, SORT+2, SORT+3, SORT+4, SORT+5, SORT+6
>> PRDA(1 SORT+3*
>> PRDATA START+9*, START+10, START+12, SORT+10*, SORT+13
PRHLOC START+2~, START+8*, SERV+1
>> PRSE SORT+4*, SORT+6
>> PRSE132 START+1*, START+10, START+11, START+12, START+17, NHDR+5, NHDR+11, SERV+1, SERV+2
>> PRSECLS START+3
>> PRSECLS(0 SORT+12*, SORT+13
>> PRSELOC START+4*, START+8, SORT+10*, SORT+11, SERV+1
>> PRSESEL EN1+4, START+17, NHDR+3, SORT+5
>> PRSESER EN1+2
>> PRSETL START+5*, START+6, START+9, SORT+3*, SORT+13, SERV+2
>> PYR NHDR+3
>> SSN SORT+3*
>> TYP NHDR+3
U START+3, START+9, START+10, START+12, SORT+3, SORT+10, SORT+13
X EN1+1*, START+3*, NHDR+4*, L*, SORT+10~*, SORT+11*, SORT+13
>> Y EN1+6, START+11*, NHDR+4, NHDR+6, NHDR+9
>> YREND SORT+9
>> YREND(1 NHDR+3
>> YRST SORT+9
>> YRST(1 NHDR+3
>> ZTDESC EN1+8*
>> ZTRTN EN1+8*
>> ZTSAVE( L*
>> ZTSK EN1+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All