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: PRSARC03

Package: PAID

Routine: PRSARC03


Information

PRSARC03 ;WOIFO/JAH - Recess Tracking Functions ;10/25/06

Source Information

Source file <PRSARC03.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
PAID 10 PP^PRSAPPU  HDR^PRSARC  (DSELALL,SELRWK)^PRSARC01  VWMSG^PRSARC03  ($$ALLFYAWS,$$FYDAYS,$$GETAVHRS,$$GETFSCYR)^PRSARC04  MAIN^PRSARC06  TOURHRS^PRSARC07  $$ASK^PRSLIB00  
$$GET8B^PRSPUT3  $$CD8B^PRSU1B2  
VA FileMan 3 ^%DT  C^%DTC  ^DIR  
List Manager 2 FULL^VALM1  (CLEAN,FLDCTRL,FLDTEXT)^VALM10  

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: 6

Package Total Caller Graph
PAID 6 PRSA SET RECESS HOURS  PRSARC  PRSARC01  PRSARC03  PRSARC09  PRSARCS  

Entry Points

Name Comments DBIA/ICR reference
NEWSTART(OUT,PRSDT) ; change alternate work schedule start date.
AWSTART(FD,LD,PROMPT) ;function returns date within range FD-LD using PROMPT.
FYRDATA(RWIEN) ; build a record of data for the Fiscal Year Recess for the viewer
; INPUT: Recess record IEN
VWMSG(MSG) ; roll and scroll message from listmanager call.
OTHERHRS(CTHW1,CTHW2,PRSNURSE) ; are any tour hours selected different than
; current tour hours.
GETFLWKS(IEN,PRSDT) ; Get weeks/recess hours from 458.8 and any posted recess
; by way of the TT8b string. Update the list columns.
RPOSTED ; Get weeks posted
; get 8b from 5 node unless corrected timecard--then re decomp
EVEODDWK(ODD,EVEN) ; CHECK SELECTION INDEX FOR ODD AND EVEN PP WEEKS
CHANGE(IEN) ; funtion true if file record is different than current data
SETRECES ;SET HOURS FOR A WEEK AT A TIME
HRSLEFT() ; Get remaining hours available for recess for the FY
HRSFILED(IEN) ; funtion returns number of recess hours on file

External References

Name Field # of Occurrence
^%DT FYRDATA+22
C^%DTC NEWSTART+17, GETFLWKS+6, RPOSTED+5
^DIR AWSTART+8, SETRECES+33
PP^PRSAPPU NEWSTART+16, FYRDATA+24, OTHERHRS+6, SETRECES+15
HDR^PRSARC NEWSTART+40
DSELALL^PRSARC01 SETRECES+51
SELRWK^PRSARC01 SETRECES+9
VWMSG^PRSARC03 SETRECES+3
$$ALLFYAWS^PRSARC04 NEWSTART+6
$$FYDAYS^PRSARC04 FYRDATA+13
$$GETAVHRS^PRSARC04 NEWSTART+28, HRSLEFT+8
$$GETFSCYR^PRSARC04 NEWSTART+23, FYRDATA+19
MAIN^PRSARC06 NEWSTART+39
TOURHRS^PRSARC07 OTHERHRS+8, SETRECES+16
$$ASK^PRSLIB00 VWMSG+5, VWMSG+7
$$GET8B^PRSPUT3 RPOSTED+10
$$CD8B^PRSU1B2 RPOSTED+13
FULL^VALM1 VWMSG+1
CLEAN^VALM10 NEWSTART+32
FLDCTRL^VALM10 GETFLWKS+17
FLDTEXT^VALM10 GETFLWKS+16, RPOSTED+17, SETRECES+40

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This is a view only option. You may not make any changes to the"
  • Line Location: VWMSG+3
Function Call: WRITE
  • Prompt: !,"recess schedule. The Recess Hours Summary action is available.",!
  • Line Location: VWMSG+4
Function Call: WRITE
  • Prompt: !!,"Recess Schedule not saved."
  • Line Location: VWMSG+7
Function Call: WRITE
  • Prompt: !,"Recess hours remaining to schedule: ",HRSLEFT,!
  • Line Location: SETRECES+29
Routine Call
  • DIR
  • Line Location:
    • AWSTART+8
    • SETRECES+33

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRST(458 - [#458] RPOSTED+8
^PRST(458.8 - [#458.8] FYRDATA+11, GETFLWKS+8, GETFLWKS+9, GETFLWKS+10, CHANGE+6, CHANGE+7, HRSFILED+6, HRSFILED+7
^TMP("PRSARC" NEWSTART+34!
^TMP("PRSLI" NEWSTART+36!, GETFLWKS+15, RPOSTED+16
^TMP("PRSRW" NEWSTART+38!, GETFLWKS+18*, RPOSTED+18, RPOSTED+19*, RPOSTED+21*, CHANGE+15, CHANGE+16, SETRECES+20, SETRECES+45!, SETRECES+47*
SETRECES+48*, SETRECES+49*, HRSLEFT+4, HRSLEFT+6
^TMP("PRSSW" NEWSTART+37!, OTHERHRS+4, EVEODDWK+4, SETRECES+14, SETRECES+39

Label References

Name Line Occurrences
$$AWSTART NEWSTART+11
$$HRSLEFT SETRECES+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%H NEWSTART+17~, GETFLWKS+6~, RPOSTED+5~
ALLFY NEWSTART+2~, NEWSTART+6*, NEWSTART+7, NEWSTART+8
CRH SETRECES+6~, SETRECES+13*, SETRECES+20*, SETRECES+21, SETRECES+22, SETRECES+37
CTHW1 OTHERHRS~, OTHERHRS+11
CTHW2 OTHERHRS~, OTHERHRS+12
CTRH1 SETRECES+5~, SETRECES+17*, SETRECES+18
>> CTRH2 SETRECES+17*, SETRECES+18
D1 NEWSTART+16~*, NEWSTART+17, FYRDATA+24~*, OTHERHRS+2~, OTHERHRS+6*, GETFLWKS+5~, SETRECES+6~, SETRECES+15*
DAY NEWSTART+16~, NEWSTART+17, FYRDATA+24~, OTHERHRS+2~
DIR AWSTART+5~, SETRECES+26~
DIR("A" AWSTART+6*, SETRECES+30*
DIR("B" SETRECES+28*
DIR(0 AWSTART+7*, SETRECES+27*
DIRUT AWSTART+5~, AWSTART+10, SETRECES+26~, SETRECES+37
EN FYRDATA+10~, FYRDATA+15*, FYRDATA+17*, FYRDATA+18
EVEN EVEODDWK~, EVEODDWK+2*, EVEODDWK+4, EVEODDWK+6*
EXTRANGE FYRDATA+10~, FYRDATA+18*, FYRDATA+20
EXTSTDT FYRDATA+10~, FYRDATA+25*, FYRDATA+26
FD NEWSTART+2~, NEWSTART+4*, NEWSTART+11, AWSTART~, AWSTART+7
>> FMWKS NEWSTART+28, HRSLEFT+8
>> FMWKS( RPOSTED+6, RPOSTED+7
FY FYRDATA+10~, FYRDATA+12*, FYRDATA+13, FYRDATA+19, FYRDATA+20
FYE FYRDATA+10~, FYRDATA+19*, FYRDATA+20
GOOD NEWSTART+2~
HRDEFALT SETRECES+6~, SETRECES+22*, SETRECES+24*, SETRECES+25*, SETRECES+28
HRSFILED HRSFILED+2~, HRSFILED+3*, HRSFILED+4, HRSFILED+9*, HRSFILED+10
HRSLEFT SETRECES+6~, SETRECES+19*, SETRECES+21, SETRECES+22, SETRECES+29
HRSUSED HRSLEFT+2~, HRSLEFT+3*, HRSLEFT+7*, HRSLEFT+10
HRSWK HRSLEFT+2~, HRSLEFT+6*, HRSLEFT+7
IEN GETFLWKS~, GETFLWKS+8, GETFLWKS+9, GETFLWKS+10, CHANGE~, CHANGE+3, CHANGE+6, CHANGE+7, HRSFILED~, HRSFILED+4
, HRSFILED+6, HRSFILED+7
ITEM OTHERHRS+2~, OTHERHRS+3*, OTHERHRS+4*, OTHERHRS+6, EVEODDWK+1~, EVEODDWK+3*, EVEODDWK+4*, EVEODDWK+5, CHANGE+4~, CHANGE+14*
, CHANGE+15*, CHANGE+16, CHANGE+17, SETRECES+6~, SETRECES+13*, SETRECES+14*, SETRECES+15, SETRECES+18, SETRECES+20, SETRECES+30
SETRECES+39, SETRECES+45, SETRECES+47, SETRECES+48, SETRECES+49
K OTHERHRS+2~
LD NEWSTART+2~, NEWSTART+5*, NEWSTART+11, AWSTART~, AWSTART+7
LINE NEWSTART+2~, NEWSTART+33*, NEWSTART+39, NEWSTART+42
LISTI NEWSTART+2~, NEWSTART+33*, NEWSTART+39, NEWSTART+41
LSTITEM GETFLWKS+5~, GETFLWKS+15*, GETFLWKS+16, GETFLWKS+17, GETFLWKS+18, RPOSTED+3~, RPOSTED+16*, RPOSTED+17, RPOSTED+21, SETRECES+5~
SETRECES+39*, SETRECES+40
MISMATCH OTHERHRS+2~, OTHERHRS+3*, OTHERHRS+4, OTHERHRS+11*, OTHERHRS+12*, OTHERHRS+13
MSG VWMSG~, VWMSG+2
NODE3 FYRDATA+10~, FYRDATA+11*, FYRDATA+12, FYRDATA+21
ODD EVEODDWK~, EVEODDWK+2*, EVEODDWK+4, EVEODDWK+5*
OUT NEWSTART~, NEWSTART+3*, NEWSTART+7*, NEWSTART+12*, NEWSTART+13, NEWSTART+24*, VWMSG+5*, VWMSG+7*, SETRECES+6~, SETRECES+9
SETRECES+10, SETRECES+14, SETRECES+32, SETRECES+37*
PAD GETFLWKS+5~, RPOSTED+3~, RPOSTED+12*, RPOSTED+13
PP4Y OTHERHRS+2~
PPE NEWSTART+18, FYRDATA+26, OTHERHRS+2~, SETRECES+6~
PPI OTHERHRS+2~, OTHERHRS+7, OTHERHRS+8, GETFLWKS+5~, RPOSTED+8*, RPOSTED+9, RPOSTED+10, SETRECES+6~, SETRECES+16
PROMPT AWSTART~, AWSTART+6
PRSDT NEWSTART~, NEWSTART+9*, NEWSTART+11*, NEWSTART+12, NEWSTART+16, NEWSTART+17*, NEWSTART+19, NEWSTART+20, NEWSTART+23, NEWSTART+24
, NEWSTART+28, NEWSTART+39, AWSTART+5~, AWSTART+9*, AWSTART+10*, AWSTART+11, GETFLWKS~, GETFLWKS+6, RPOSTED+4, RPOSTED+5
, HRSLEFT+8
PRSFILED CHANGE+4~, CHANGE+5*, CHANGE+12*, CHANGE+18, HRSFILED+5*
>> PRSFSCYR NEWSTART+23*
>> PRSFY NEWSTART+9, NEWSTART+18*, NEWSTART+19*, NEWSTART+20*
>> PRSFYRNG NEWSTART+4, NEWSTART+5, NEWSTART+39
PRSLIST CHANGE+4~, CHANGE+5*, CHANGE+17*, CHANGE+18, HRSFILED+5*
>> PRSLSTRT NEWSTART+39
PRSNURSE OTHERHRS~, OTHERHRS+8, RPOSTED+10, SETRECES+16
PRSRWHRS NEWSTART+28*, HRSLEFT+2~, HRSLEFT+8*, HRSLEFT+9
>> PRSVIEW VWMSG+7, SETRECES+3
>> PRSWKLST NEWSTART+41*
RANGE FYRDATA+10~, FYRDATA+13*, FYRDATA+14, FYRDATA+15, FYRDATA+20
RCPOSTED GETFLWKS+5~, RPOSTED+3~, RPOSTED+13*, RPOSTED+14*, RPOSTED+15, RPOSTED+17, RPOSTED+19, RPOSTED+21
REW GETFLWKS+5~, GETFLWKS+13*, GETFLWKS+18, CHANGE+4~, CHANGE+11*
RH GETFLWKS+5~, GETFLWKS+11*, GETFLWKS+18, CHANGE+4~, CHANGE+9*, CHANGE+12, CHANGE+16*, CHANGE+17, SETRECES+36*, SETRECES+37*
SETRECES+40, SETRECES+44, SETRECES+47, HRSFILED+2~, HRSFILED+8*, HRSFILED+9
RH1 SETRECES+6~
RH2 SETRECES+6~
RW GETFLWKS+5~, GETFLWKS+9*, GETFLWKS+10, RPOSTED+3~, RPOSTED+7*, RPOSTED+14, RPOSTED+16, RPOSTED+18, RPOSTED+19, RPOSTED+21
, CHANGE+4~, CHANGE+5*, CHANGE+6*, CHANGE+7, HRSFILED+2~, HRSFILED+5*, HRSFILED+6*, HRSFILED+7
RWD1 GETFLWKS+5~, GETFLWKS+12*, GETFLWKS+18, CHANGE+4~, CHANGE+10*
RWDATA GETFLWKS+5~, GETFLWKS+10*, GETFLWKS+11, GETFLWKS+12, GETFLWKS+13, GETFLWKS+15, GETFLWKS+16, GETFLWKS+18, CHANGE+4~, CHANGE+7*
, CHANGE+8, CHANGE+9, CHANGE+10, CHANGE+11, HRSFILED+2~, HRSFILED+7*, HRSFILED+8
RWIEN FYRDATA~, FYRDATA+11, FYRDATA+26
SELFY FYRDATA+10~, FYRDATA+20*, FYRDATA+26*, FYRDATA+27
ST FYRDATA+10~, FYRDATA+14*, FYRDATA+16*, FYRDATA+18
STARTDT RPOSTED+3~, RPOSTED+4*
STDT FYRDATA+10~, FYRDATA+23*, FYRDATA+24, FYRDATA+26
STR8B GETFLWKS+5~, RPOSTED+3~, RPOSTED+10*, RPOSTED+13
TH OTHERHRS+2~, OTHERHRS+8!, SETRECES+16~
TH("W1" OTHERHRS+9, SETRECES+17
TH("W2" OTHERHRS+10, SETRECES+17
TMPDT GETFLWKS+5~, GETFLWKS+6*, GETFLWKS+8*, GETFLWKS+9
TOURHRS SETRECES+6~, SETRECES+18*, SETRECES+21, SETRECES+24
TRHA HRSLEFT+2~, HRSLEFT+9*, HRSLEFT+10
U NEWSTART+4, NEWSTART+5, NEWSTART+9, NEWSTART+18, NEWSTART+19, NEWSTART+20, FYRDATA+12, FYRDATA+14, FYRDATA+15, FYRDATA+18
, FYRDATA+20, FYRDATA+21, FYRDATA+26, GETFLWKS+11, GETFLWKS+12, GETFLWKS+13, GETFLWKS+16, GETFLWKS+18, RPOSTED+14, RPOSTED+19
RPOSTED+21, CHANGE+9, CHANGE+10, CHANGE+11, CHANGE+12, CHANGE+16, CHANGE+17, SETRECES+20, SETRECES+47, SETRECES+48
SETRECES+49, HRSLEFT+6, HRSLEFT+9, HRSFILED+8
VALID SETRECES+26~, SETRECES+31*, SETRECES+32, SETRECES+34*
>> VALMBCK CHANGE+2*, SETRECES+2*, SETRECES+8*, SETRECES+52*
>> VALMCNT NEWSTART+42*
W1TMP OTHERHRS+2~, OTHERHRS+9*, OTHERHRS+11
W2TMP OTHERHRS+2~, OTHERHRS+10*, OTHERHRS+12
WK CHANGE+4~, CHANGE+8*, CHANGE+12, HRSLEFT+2~, HRSLEFT+3*, HRSLEFT+4*, HRSLEFT+6
WKDT RPOSTED+3~, RPOSTED+5*, RPOSTED+6*, RPOSTED+7, RPOSTED+8
>> WKSFM( OTHERHRS+6, SETRECES+15, SETRECES+48
X NEWSTART+17~, AWSTART+5~, FYRDATA+10~, FYRDATA+21*, GETFLWKS+6~, RPOSTED+5~
X1 NEWSTART+17~*, GETFLWKS+6~*, RPOSTED+5~*
X2 NEWSTART+17~*, GETFLWKS+6~*, RPOSTED+5~*
Y AWSTART+5~, AWSTART+9, FYRDATA+10~, FYRDATA+23, FYRDATA+25, OTHERHRS+2~, SETRECES+6~, SETRECES+26~, SETRECES+34, SETRECES+35*
SETRECES+36
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All