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 |  Local Variables  | All
Print Page as PDF
Routine: PRSEED10

Package: PAID

Routine: PRSEED10


Information

PRSEED10 ;HISC/MD/MH-PRSE NON-LOCAL C.E. ATTENDANCE ;06/15/94

Source Information

Source file <PRSEED10.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
PAID 6 ADD^PRSEED12  RECHK^PRSEED7  ^PRSEKILL  (MSG3,MSG6)^PRSEMSG  EN4^PRSEUTL1  ($$EN4,EN2)^PRSEUTL3  
VA FileMan 5 ^%DT  (HELP,NOW)^%DTC  (,IX)^DIC  YN^DICN  DT^DIQ  
Kernel 2 $$UP^XLFSTR  $$ADD^XUSERNEW  

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-NCEATTEND  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; ENTRY FROM OPTION PRSE-NCEATTEND
OTHER
ASK
Q1
NAM ;
NAM1
SCUB ;
DATE

External References

Name Field # of Occurrence
^%DT DATE+1
HELP^%DTC DATE+10
NOW^%DTC DATE+13
^DIC NAM+11
IX^DIC SCUB+5
YN^DICN SCUB+9, DATE+3
DT^DIQ DATE+3, DATE+7
ADD^PRSEED12 ASK+2
RECHK^PRSEED7 ASK+1
^PRSEKILL Q1
MSG3^PRSEMSG EN1+2
MSG6^PRSEMSG EN1+1
EN4^PRSEUTL1 DATE
$$EN4^PRSEUTL3 NAM+2, NAM+7
EN2^PRSEUTL3 EN1+2, NAM1+8
$$UP^XLFSTR SCUB+8
$$ADD^XUSERNEW NAM+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: Q1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: NAM+3
Function Call: WRITE
  • Prompt: !!,$C(7),"NEW ENTRIES CANNOT BE ADDED TO THE NEW PERSON FILE FROM THIS OPTION - CONTACT",!,"THE EDUCATION PACKAGE COORDINATOR OR IRM OR SELECT A NAME ALREADY IN FILE.",!
  • Line Location: NAM+8
Function Call: WRITE
  • Prompt: !!,"NO SSN OR NEW PERSON (#200) FILE ENTRY FOR THIS EMPLOYEE-CANNOT CONTINUE"
  • Line Location: NAM1+3
Function Call: READ
  • Formatting: !!
  • Prompt: "Select NON-LOCAL C.E. CLASS: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: SCUB+2
Function Call: WRITE
  • Prompt: !!,$C(7),"Answer should be between 2 and 53 characters"
  • Line Location: SCUB+6
Function Call: WRITE
  • Prompt: !?3,"ARE YOU ADDING '"_X_"' AS A NEW CLASS"
  • Line Location: SCUB+9
Function Call: WRITE
  • Prompt: !?7,"ANSWER YES OR NO."
  • Line Location: SCUB+9
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: DATE+0
Function Call: WRITE
  • Prompt: !!,"Select CLASS DATE: "_$S($G(PRSEY(1))'="":PRSEY(1)_"// ",1:"") R X:DTIME S:'$T
  • Line Location: DATE+0
Function Call: WRITE
  • Prompt: !?3,"ARE YOU ADDING '"
  • Line Location: DATE+3
Function Call: WRITE
  • Prompt: "' AS A NEW CLASS DATE"
  • Line Location: DATE+3
Function Call: WRITE
  • Prompt: "' AS A NEW CLASS DATE"
  • Line Location: DATE+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DATE+6
Function Call: WRITE
  • Prompt: !?8
  • Line Location: DATE+7
Function Call: READ
  • Formatting: !?8
  • Prompt: """^"" TO STOP: "
  • Variable: Z
  • Timeout: DTIME
  • Line Location: DATE+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DATE+8
Function Call: WRITE
  • Prompt: $C(7),!,"You cannot take attendance for a class with a future date!"
  • Line Location: DATE+13
Routine Call
  • DIC
  • Line Location:
    • NAM+11
Routine Call
  • DIC
  • Line Location:
    • SCUB+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSE(452 - [#452] DATE+2, DATE+6, DATE+7
^PRSE(452.7 - [#452.7] EN1+1, NAM+2, NAM+7
^PRSPC("SSN" NAM1+4
^TMP($J EN1+2!
^VA(200 - [#200] NAM1+3

Label References

Name Line Occurrences
ASK ASK+3
DATE DATE+13
EN1 ASKASK+1
NAM ASKNAM1+1, NAM1+3
NAM1 NAM+2
Q1 EN1+2, OTHERASK+2
SCUB OTHER

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SCUB+9*, SCUB+10, DATE+3*, DATE+4, DATE+13
>> %DT DATE+1*, DATE+10*
>> D SCUB+5*
DA SCUB+1!
DIC NAM+10*, NAM+11!, SCUB+1!, SCUB+5*!
DIC("A" NAM+9*
DIC("S" ASK+2*, SCUB+3*
DIC("W" SCUB+4*
DIC(0 NAM+10*, SCUB+5*
DIE SCUB+1!
>> DLAYGO SCUB+5*
DR SCUB+1!
DT DATE+1
DTIME SCUB+2, DATEDATE+8
DUZ EN1+2, NAM+2, NAM+7
DUZ(0 EN1+2, NAM+2, NAM+7
IOF DATE+6, DATE+8
IOSL DATE+8
>> NDUPSW ASK+1*, ASK+2
>> NOUT EN1+2*, ASK+1
>> NSW ASK+1*
>> PDA(1 NAM1+4*
POUT ASK!, ASK+2!, NAM+1!, NAM+2, NAM+5*, NAM+11*, NAM1SCUB+1!, SCUB+2!, SCUB+7*
>> PRDA NAM1+2*
>> PRDA(0 NAM+12*, NAM+14
>> PRSECOD EN1+2*, ASK+2*, ASK+3*
>> PRSEDA SCUB+5*, DATE+6*, DATE+7
>> PRSEDT OTHERSCUB+1*, DATE+14*
PRSEED SCUB+2!
>> PRSEGF EN1+2*, ASK+2*, ASK+3*
>> PRSELCL EN1+2*, ASK+2*, ASK+3*
>> PRSENAM OTHERASK+1, SCUB+1*, SCUB+12*, DATEDATE+2, DATE+6
>> PRSENAM(0 ASK+1*
>> PRSEROU EN1+2*, ASK+2*, ASK+3*
>> PRSESEL EN1+2*, ASK+2*, ASK+3*
>> PRSESER EN1+2, NAM1+11
>> PRSESER("TX" NAM1+11*
>> PRSESRCE NAM1+5*
>> PRSESSN NAM1+3*, NAM1+4
>> PRSESTUD NAM1+3*
>> PRSESW EN1+2*, SCUB+1*
PRSEY SCUB+2!, DATE
PRSEY(1 DATE
>> SSN NAM1+3*
U NAM+2, NAM+7, NAM1+3, SCUB+5, DATE+7
>> VA200DA NAM1+2*, NAM1+8
X EN1+1*, OTHERASK+3*, NAM+1!, NAM+11, SCUB+2*, SCUB+5, SCUB+6, SCUB+7, SCUB+8*
SCUB+9, SCUB+10, DATE*, DATE+1, DATE+2*, DATE+3, DATE+4, DATE+6*
Y NAM+1!, NAM+4*, NAM+5, NAM+11, NAM+12, NAM+14*, NAM1+1, NAM1+2, NAM1+3, SCUB+2*
SCUB+5*, SCUB+6*, SCUB+7, SCUB+10*, SCUB+12!, DATE*, DATE+1*, DATE+2*, DATE+3*, DATE+4*
DATE+7*, DATE+11*, DATE+13, DATE+14
Y(0 SCUB+5
>> Z DATE+6*, DATE+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All