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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PRSNCAPE

Package: PAID

Routine: PRSNCAPE


Information

PRSNCAPE ;WOIFO/DWA - PAID PARAMETER ENTER/EDIT ;07/30/09

Source Information

Source file <PRSNCAPE.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 7 C^%DTC  MSG^DIALOG  ^DIC  (FILE,UPDATE)^DIE  $$EXTERNAL^DILFD  GETS^DIQ  ^DIR  
PAID 3 ($$NXTPP,DTP)^PRSAPPU  $$ASK^PRSLIB00  $$DIVACC^PRSNUT02  

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 PRSN POC APPLICATION PARAMETER  

Entry Points

Name Comments DBIA/ICR reference
EN ; Entry point for PAID Application Parameter Edit
PPDS ; Set the effective pay period
NA1 ; Create a new sub-record and set nurse access parameter
HDR ;
SHODIVAC(OUT) ; DISPLAY POC ACCESS (T&L/NURSE LOCATION) FOR ALL DIVISIONS
ACCHIST(DIVI) ; SHOW HISTORY OF POC ACCESS (T&L/NURSE LOC) FOR A DIVISION
SDHDR ; SHOW DIVISION HEADER

External References

Name Field # of Occurrence
C^%DTC EN+12
MSG^DIALOG PPDS+32, NA1+17, NA1+20
^DIC EN+16
FILE^DIE PPDS+32, NA1+20
UPDATE^DIE NA1+17
$$EXTERNAL^DILFD PPDS+26, PPDS+33, NA1+6, NA1+21, SHODIVAC+14
GETS^DIQ SHODIVAC+16
^DIR PPDS+9, PPDS+28, NA1+7, NA1+11, SHODIVAC+2
$$NXTPP^PRSAPPU EN+9
DTP^PRSAPPU PPDS+1, PPDS+3, PPDS+5
$$ASK^PRSLIB00 SHODIVAC+21, SHODIVAC+22
$$DIVACC^PRSNUT02 PPDS+17, SHODIVAC+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Current Pay Period must be open for testing. Quitting."
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!!,"C = Current Pay Period beginning "_Y
  • Line Location: PPDS+2
Function Call: WRITE
  • Prompt: !,"L = Last Pay Period beginning "_Y
  • Line Location: PPDS+4
Function Call: WRITE
  • Prompt: !,"N = Next Pay Period beginning "_Y,!
  • Line Location: PPDS+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: PPDS+10
Function Call: WRITE
  • Prompt: !!,"The Nurse Access Method for "_$$EXTERNAL^DILFD(456,.01,"",IENS2)_" pay period "_PAYPD_" is currently set to ",!,$$EXTERNAL^DILFD(456.05,1,"",NAM)_". Do you wish to change it?",!!
  • Line Location: PPDS+26
Function Call: WRITE
  • Prompt: " No changes made, quitting.",!!
  • Line Location: PPDS+29
Function Call: WRITE
  • Prompt: !!,"The Nurse Access Method for "_$$EXTERNAL^DILFD(456,.01,"",IENS2)_" has been successfully changed to ",!,$$EXTERNAL^DILFD(456.05,1,"",NAM)_" Effective Pay Period "_PAYPD_".",!!
  • Line Location: PPDS+33
Function Call: WRITE
  • Prompt: !!,"The Nurse Access Method for "_$$EXTERNAL^DILFD(456,.01,"",IENS2)_" pay period "_PAYPD_" is currently set to ",!,$$EXTERNAL^DILFD(456.05,1,"",NAM)_". Do you wish to change it?",!!
  • Line Location: NA1+6
Function Call: WRITE
  • Prompt: " No changes made, quitting.",!!
  • Line Location: NA1+8
Function Call: WRITE
  • Prompt: !!,"The Nurse Access Method for "_$$EXTERNAL^DILFD(456,.01,"",IENS2)_" has been successfully set to ",!,$$EXTERNAL^DILFD(456.05,1,"",NAM)_" Effective Pay Period "_PAYPD_".",!!
  • Line Location: NA1+21
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?((80-$L(L1))/2),L1,!,?((80-$L(L2))/2),L2,!!!!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHODIVAC+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SHODIVAC+13
Function Call: WRITE
  • Prompt: $$EXTERNAL^DILFD(456,.01,"",DIVI)
  • Line Location: SHODIVAC+14
Function Call: WRITE
  • Prompt: " (",STATNUM,")"
  • Line Location: SHODIVAC+18
Function Call: WRITE
  • Prompt: ?32,$S(X="N":"Nurse Location",X="T":"T&L Unit",1:"None")
  • Line Location: SHODIVAC+19
Function Call: WRITE
  • Prompt: ?55,"(Current)"
  • Line Location: SHODIVAC+20
Function Call: WRITE
  • Prompt: !!!
  • Line Location: SHODIVAC+21
Function Call: WRITE
  • Prompt: !!!
  • Line Location: SHODIVAC+22
Function Call: WRITE
  • Prompt: !?32,$S(AP="N":"Nurse Location",1:"T&L Unit")
  • Line Location: ACCHIST+8
Function Call: WRITE
  • Prompt: ?57,PPE
  • Line Location: ACCHIST+9
Function Call: WRITE
  • Prompt: @IOF,!!!
  • Line Location: SDHDR+1
Function Call: WRITE
  • Prompt: !?30,"DATA ENTRY/APPROVAL",?55,"EFFECTIVE"
  • Line Location: SDHDR+2
Function Call: WRITE
  • Prompt: !," DIVISION",?30,"ACCESS TO NURSE VIA",?55,"PAY PERIOD"
  • Line Location: SDHDR+3
Function Call: WRITE
  • Prompt: !,"===============",?29,"======================",?54,"============"
  • Line Location: SDHDR+4
Routine Call
  • DIALOG
  • Line Location:
    • PPDS+32
    • NA1+17
    • NA1+20
Routine Call
  • DIC
  • Line Location:
    • EN+16
Routine Call
  • DIE
  • Line Location:
    • PPDS+32
    • NA1+20
Routine Call
  • DIE
  • Line Location:
    • NA1+17
Routine Call
  • DIR
  • Line Location:
    • PPDS+9
    • PPDS+28
    • NA1+7
    • NA1+11
    • SHODIVAC+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GETS^DIQ
^PRST(456 - [#456] Classic Fileman Calls,  EXTERNAL^DILFD
456.05 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRST(456 - [#456] PPDS+15, SHODIVAC+9, ACCHIST+3, ACCHIST+6, ACCHIST+7
^PRST(458 - [#458] EN+5, EN+7, EN+8, EN+10, EN+11

Label References

Name Line Occurrences
ACCHIST SHODIVAC+21
HDR EN+13
NA1 PPDS+24
SDHDR SHODIVAC+7, SHODIVAC+11
SHODIVAC EN+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AP ACCHIST+2~, ACCHIST+7*, ACCHIST+8
CNT SHODIVAC+5~, SHODIVAC+8*, SHODIVAC+10*, SHODIVAC+11
DIC EN+2!, EN+14~, EN+15*
DIC("A" EN+15*
DIC(0 EN+15*
DIR PPDS+7~, PPDS+9!, PPDS+27~, PPDS+28!, NA1+4~, NA1+7!, NA1+11!, SHODIVAC+2~
DIR("A" PPDS+8*, NA1+11*, SHODIVAC+2*
DIR("B" PPDS+28*, NA1+7*
DIR(0 PPDS+8*, PPDS+28*, NA1+7*, NA1+11*, SHODIVAC+2*
DIRUT PPDS+7~, PPDS+9, PPDS+27~, PPDS+28, NA1+4~, NA1+7, NA1+11, SHODIVAC+2~, SHODIVAC+3
DIVI SHODIVAC+5~, SHODIVAC+8*, SHODIVAC+9*, SHODIVAC+12, SHODIVAC+14, SHODIVAC+16, SHODIVAC+17, SHODIVAC+21, ACCHIST~, ACCHIST+3
DLAYGO EN+14~, EN+15*
DPI ACCHIST+2~, ACCHIST+3*, ACCHIST+4, ACCHIST+6, ACCHIST+7
DT EN+5, SHODIVAC+12
DTOUT EN+14~, EN+17
DUOUT EN+14~, EN+17
FIELDS SHODIVAC+15~
FIELDS(4 SHODIVAC+17
HIST SHODIVAC+5~, SHODIVAC+6*, SHODIVAC+11, SHODIVAC+21, SHODIVAC+22
IENS EN+3~, EN+18*, PPDS+15, PPDS+31, NA1+16, NA1+19
IENS2 EN+3~, EN+18*, PPDS+17, PPDS+26, PPDS+33, NA1+6, NA1+21
IOF HDR+2, SHODIVAC+4, SDHDR+1
IOST HDR+2
L1 HDR+1~, HDR+3*, HDR+4
L2 HDR+1~, HDR+3*, HDR+4
LPPE EN+3~, EN+8*, PPDS+11
LPST EN+3~, EN+11*, PPDS+3, PPDS+13
NAM EN+4~, PPDS+17*, PPDS+18, PPDS+19*, PPDS+20, PPDS+26, PPDS+30*, PPDS+31, PPDS+33, NA1+6
, NA1+9*, NA1+12*, NA1+19, NA1+21
NAM2 EN+4~, PPDS+20*, PPDS+30, NA1+9
NPPE EN+3~, EN+9*, PPDS+11
NPST EN+3~, EN+12*, PPDS+5, PPDS+13
ORIGPP EN+4~, PPDS+18*, NA1+5
OUT EN+1~*, SHODIVAC~, SHODIVAC+9, SHODIVAC+21*, SHODIVAC+22*
PAYPD EN+3~, PPDS+11*, PPDS+15, PPDS+26, PPDS+33, NA1+6, NA1+16, NA1+21
PPDI EN+3~, PPDS+15*, PPDS+23, PPDS+31, NA1+2~, NA1+15~, NA1+18*, NA1+19
PPE EN+3~, EN+7*, EN+9, PPDS+11, ACCHIST+2~, ACCHIST+5*, ACCHIST+6*, ACCHIST+7, ACCHIST+9
PPI EN+3~, EN+5*, EN+6, EN+7, EN+8, EN+10, EN+11
PPST EN+3~, EN+10*, EN+12, PPDS+1, PPDS+13
PRSDT PPDS+7~, PPDS+13*, PPDS+17
PRSFDA EN+3~, NA1+15~
PRSFDA( PPDS+31*, NA1+16*, NA1+19*
PRSIENS NA1+15~
PRSIENS(2 NA1+18
STATNUM SHODIVAC+15~, SHODIVAC+17*, SHODIVAC+18
STOP NA1+2~, NA1+3*, NA1+8*, NA1+14
U EN+18, PPDS+18, PPDS+19, SHODIVAC+12
X EN+4~, EN+12, EN+14~, PPDS+1*, PPDS+3*, PPDS+5*, NA1+12, SHODIVAC+2~, SHODIVAC+12*, SHODIVAC+19
X1 EN+4~, EN+12*
X2 EN+4~, EN+12*
Y EN+4~, EN+14~, EN+17, EN+18, PPDS+2, PPDS+4, PPDS+6, PPDS+7~, PPDS+11, PPDS+13
, PPDS+27~, PPDS+29, NA1+4~, NA1+8, SHODIVAC+2~, SHODIVAC+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All