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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PRSATPTW

Package: PAID

Routine: PRSATPTW


Information

PRSATPTW ;WASHFO/JAH - Telework Posting;4/13/2012

Source Information

Source file <PRSATPTW.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 MSG^DIALOG  UPDATE^DIE  ^DIR  
PAID 2 $$TWE^PRSATE0  $$AMT^PRSPSAPU  

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 PRSATP  

Entry Points

Name Comments DBIA/ICR reference
TELEWORK(PPI,PRSIEN,PRSD,STAT,POSTTYPE,TC) ; telework posting driver
MAXTW(PPI,PRSIEN,PRSD,SCH,POSTTYPE) ;
; Extrinsic function to return maximum allowable
; telework for medical, ad hoc, reg. sched.
; RETURN:
; piece 1: maximum regular scheduled
; piece 2: maximum Medical scheduled
; piece 3: maximum AD HOC
ASKTWHRS(ACTUALTW,MAXTW,OLDTWHRS,SCH) ;
GETTWHRS(MAX,TT,OLDTWHRS,SCH) ;
GETTYPE() ;
; Prompt for type of additional telework
TWDAY(SCH) ;
; input: SCH - is the daily employee scheduled for Medical or regular
; output: ACTUALTW- return piece positional telework type--
; piece 1 = 1 if medical telework
; '' 2 = 1 if regular scheduled
; '' 3 = 1 if ad hoc situational
CLEANTW(PPI,PRSIEN,PRSD) ; remove any telework hours, leave any scheduled tw.
STORETW(PPI,PRSIEN,PRSD,ACTUALTW) ;
; store telework in node 8 of the "D" (daily) subnode.

External References

Name Field # of Occurrence
MSG^DIALOG CLEANTW+6, STORETW+9
UPDATE^DIE CLEANTW+6, STORETW+9
^DIR GETTWHRS+23, GETTYPE+6, TWDAY+19
$$TWE^PRSATE0 TELEWORK+12
$$AMT^PRSPSAPU MAXTW+48

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRST(458 - [#458] TELEWORK+44, MAXTW+20, MAXTW+21, MAXTW+35

Label References

Name Line Occurrences
$$GETTWHRS ASKTWHRS+11
$$GETTYPE ASKTWHRS+17, TWDAY+25
$$MAXTW TELEWORK+36
$$TWDAY TELEWORK+30
ASKTWHRS TELEWORK+49
CLEANTW TELEWORK+13, TELEWORK+37
STORETW TELEWORK+32, TELEWORK+53

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTUALTW TELEWORK+28~, TELEWORK+30*, TELEWORK+31, TELEWORK+32, TELEWORK+49, TELEWORK+53, ASKTWHRS~, ASKTWHRS+6*, ASKTWHRS+14*, ASKTWHRS+20*
, ASKTWHRS+22*, TWDAY+8~, TWDAY+9*, TWDAY+22, TWDAY+24, TWDAY+27*, TWDAY+28*, TWDAY+29, STORETW~, STORETW+6
, STORETW+7, STORETW+8
ADHOC MAXTW+34~, MAXTW+36*, MAXTW+49
ADHOCTYP ASKTWHRS+7~, ASKTWHRS+17*, ASKTWHRS+18, ASKTWHRS+20, TWDAY+25*, TWDAY+26, TWDAY+27
ADNOC TELEWORK+11~
BEG MAXTW+16~, MAXTW+46*, MAXTW+48
DIR GETTWHRS+2~, GETTYPE+2~, TWDAY+8~
DIR("?" GETTWHRS+6*, GETTWHRS+7*
DIR("??" GETTWHRS+8*
DIR("A" GETTWHRS+4*, GETTYPE+3*, TWDAY+13*, TWDAY+15*
DIR("B" GETTWHRS+12*, GETTWHRS+15*, GETTWHRS+17*, GETTWHRS+20, GETTWHRS+21*, GETTYPE+5*, TWDAY+18*
DIR(0 GETTWHRS+5*, GETTYPE+4*, TWDAY+17*
>> DIRUT GETTWHRS+24, GETTYPE+7, TWDAY+21
END MAXTW+16~, MAXTW+47*, MAXTW+48
FDA CLEANTW+1~, STORETW+4~
FDA( CLEANTW+3*, CLEANTW+4*, CLEANTW+5*, STORETW+6*, STORETW+7*, STORETW+8*
I MAXTW+41~*, MAXTW+42
IENS CLEANTW+1~, CLEANTW+2*, CLEANTW+3, CLEANTW+4, CLEANTW+5, STORETW+4~, STORETW+5*, STORETW+6, STORETW+7, STORETW+8
MAX GETTWHRS~, GETTWHRS+5, GETTWHRS+7, GETTWHRS+11, GETTWHRS+12, GETTWHRS+15, GETTWHRS+17
MAXTW TELEWORK+11~, TELEWORK+36*, TELEWORK+37, TELEWORK+49, MAXTW+16~, MAXTW+19*, MAXTW+25*, MAXTW+26*, MAXTW+30, MAXTW+50*
, MAXTW+52, MAXTW+53*, MAXTW+55, ASKTWHRS~, ASKTWHRS+9
MED TELEWORK+11~
MT MAXTW+16~
OLDTWHRS TELEWORK+44*, TELEWORK+49, ASKTWHRS~, ASKTWHRS+11, ASKTWHRS+13, GETTWHRS~, GETTWHRS+9, GETTWHRS+21
POSTTYPE TELEWORK~, TELEWORK+13, TELEWORK+36, MAXTW~, MAXTW+30
PPI TELEWORK~, TELEWORK+12, TELEWORK+13, TELEWORK+32, TELEWORK+36, TELEWORK+37, TELEWORK+44, TELEWORK+53, MAXTW~, MAXTW+20
, MAXTW+21, MAXTW+35, CLEANTW~, CLEANTW+2, STORETW~, STORETW+5
PRSD TELEWORK~, TELEWORK+12, TELEWORK+13, TELEWORK+32, TELEWORK+36, TELEWORK+37, TELEWORK+44, TELEWORK+53, MAXTW~, MAXTW+20
, MAXTW+21, MAXTW+35, CLEANTW~, CLEANTW+2, STORETW~, STORETW+5
PRSIEN TELEWORK~, TELEWORK+12, TELEWORK+13, TELEWORK+32, TELEWORK+36, TELEWORK+37, TELEWORK+44, TELEWORK+53, MAXTW~, MAXTW+20
, MAXTW+21, MAXTW+35, CLEANTW~, CLEANTW+2, STORETW~, STORETW+5
SCH TELEWORK+23*, TELEWORK+30, TELEWORK+36, TELEWORK+49, MAXTW~, MAXTW+25, MAXTW+52, MAXTW+53, ASKTWHRS~, ASKTWHRS+11
, GETTWHRS~, GETTWHRS+20, TWDAY~, TWDAY+10, TWDAY+12, TWDAY+18, TWDAY+28
SCHED TELEWORK+11~
SCHHRS TELEWORK+11~
SEGHRS MAXTW+17~, MAXTW+48*, MAXTW+50, MAXTW+53
STAT TELEWORK~
SUBTOT MAXTW+34~, MAXTW+52*, MAXTW+53
TC TELEWORK~, TELEWORK+29
TCN MAXTW+16~, MAXTW+35*, MAXTW+42
THISACT ASKTWHRS+7~, ASKTWHRS+11*, ASKTWHRS+12, ASKTWHRS+13*, ASKTWHRS+14, ASKTWHRS+16, ASKTWHRS+20, ASKTWHRS+22
THISMTW ASKTWHRS+7~, ASKTWHRS+9*, ASKTWHRS+10, ASKTWHRS+11
THISOLDTW GETTWHRS+2~, GETTWHRS+9*, GETTWHRS+10, GETTWHRS+11, GETTWHRS+12
TOD MAXTW+16~
TOT MAXTW+16~
TOUR2LEN MAXTW+16~, MAXTW+21*, MAXTW+26
TOURLEN MAXTW+16~, MAXTW+20*, MAXTW+25
TRC MAXTW+16~, MAXTW+45*
TSEG MAXTW+34~, MAXTW+42*, MAXTW+43, MAXTW+45, MAXTW+46, MAXTW+47
TSET MAXTW+16~
TT MAXTW+16~, MAXTW+43*, MAXTW+44, MAXTW+49, GETTWHRS~, GETTWHRS+3, GETTWHRS+9, GETTWHRS+12, GETTWHRS+17, GETTWHRS+20
TWE TELEWORK+11~, TELEWORK+12*, TELEWORK+19, TELEWORK+23
TWLENGTH TWDAY+8~, TWDAY+20*, TWDAY+22, TWDAY+27, TWDAY+28
TWTYPE GETTWHRS+2~, GETTWHRS+3*, GETTWHRS+4
TWTYPEI ASKTWHRS+7~, ASKTWHRS+8*, ASKTWHRS+9, ASKTWHRS+11, ASKTWHRS+13, ASKTWHRS+14, ASKTWHRS+16, ASKTWHRS+22
TYPE TWDAY+8~, TWDAY+10*, TWDAY+13, TWDAY+24
U TELEWORK+19, TELEWORK+23, TELEWORK+44, MAXTW+20, MAXTW+21, MAXTW+25, MAXTW+26, MAXTW+42, MAXTW+43, MAXTW+44
, MAXTW+45, MAXTW+46, MAXTW+47, MAXTW+49, MAXTW+50, MAXTW+52, MAXTW+53, ASKTWHRS+9, ASKTWHRS+13, ASKTWHRS+14
, ASKTWHRS+20, ASKTWHRS+22, GETTWHRS+5, GETTWHRS+9, GETTWHRS+21, TWDAY+27, TWDAY+28, STORETW+6, STORETW+7, STORETW+8
X GETTWHRS+2~, GETTYPE+2~, TWDAY+8~
Y GETTWHRS+2~, GETTWHRS+25, GETTYPE+2~, GETTYPE+8, TWDAY+8~, TWDAY+20
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All