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

Package: PAID

Routine: PRSARC01


Information

PRSARC01 ;WOIFO/JAH - Recess Tracking ListManger Action Protocols ;10/17/06

Source Information

Source file <PRSARC01.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
PAID 6 PP^PRSAPPU  ($$CHANGE,$$OTHERHRS,EVEODDWK,GETFLWKS,NEWSTART,VWMSG)^PRSARC03  $$GETAVHRS^PRSARC04  TOURHRS^PRSARC07  $$PARSE^PRSARC08  $$ASK^PRSLIB00  
VA FileMan 4 NOW^%DTC  MSG^DIALOG  (FILE,UPDATE)^DIE  ^DIR  
List Manager 2 FULL^VALM1  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: 8

Package Total Caller Graph
PAID 7 PRSA CHANGE AWS START  PRSA DESELECT WEEKS  PRSA FILE RECESS SCHEDULE  PRSA RECESS QUIT  PRSA RECESS SAVE AND CONTINUE  PRSA SELECT RECESS WK  PRSARC03  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EDITSTRT ; action protocol-edit AWS Start Date
SETWKHRS(OUT) ;set hrs for selected weeks
WHATHRS(OUT,RH1,RH2,OTHERHRS,UOH,CTRH1,CTRH2,UCTH) ;Ask user-which hours
; to use.
SETWKSLM(OOPSWKS,RH1,RH2,OTHERHRS,UOH,CTRH1,CTRH2,UCTH) ;
; Set weeks RECESS HOURS in listmanager display
SELRWK(PR,OUT) ;PROMPT USER TO SELECT WEEKS FOR RECESS
;
; INPUT: PR-prompt flag are they setting recess hours or removing
; recess hours
; OUTPUT: OUT - user aborted or timed out
FLRECESS ; save recess schedule hrs to file
DSELWK ;DESELECT WEEKS
DSELALL ; procedure removes items from selected items index w/no effect
; on ListMan display.

External References

Name Field # of Occurrence
NOW^%DTC FLRECESS+65
MSG^DIALOG FLRECESS+28, FLRECESS+40, FLRECESS+61, FLRECESS+70
FILE^DIE FLRECESS+49
UPDATE^DIE FLRECESS+28, FLRECESS+40, FLRECESS+61, FLRECESS+70
^DIR WHATHRS+26, WHATHRS+40, WHATHRS+60, WHATHRS+74, SELRWK+23, FLRECESS+14
PP^PRSAPPU SETWKSLM+10
$$CHANGE^PRSARC03 FLRECESS+10, FLRECESS+43
$$OTHERHRS^PRSARC03 WHATHRS+13
EVEODDWK^PRSARC03 WHATHRS+51
GETFLWKS^PRSARC03 EDITSTRT+20
NEWSTART^PRSARC03 EDITSTRT+16
VWMSG^PRSARC03 EDITSTRT+4, SELRWK+6, FLRECESS+16, DSELWK+3
$$GETAVHRS^PRSARC04 EDITSTRT+21
TOURHRS^PRSARC07 WHATHRS+9, SETWKSLM+12
$$PARSE^PRSARC08 SELRWK+15
$$ASK^PRSLIB00 EDITSTRT+11, SETWKHRS+8
FULL^VALM1 EDITSTRT+6, SETWKHRS+4, FLRECESS+21
FLDTEXT^VALM10 SETWKSLM+16, DSELWK+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: EDITSTRT+7
Function Call: WRITE
  • Prompt: !," WARNING: Changing the AWS start date will remove recess hours"
  • Line Location: EDITSTRT+9
Function Call: WRITE
  • Prompt: !," that are earlier than the new AWS start date.",!
  • Line Location: EDITSTRT+10
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: SETWKHRS+5
Function Call: WRITE
  • Prompt: !,"No weeks have been selected."
  • Line Location: SETWKHRS+7
Function Call: WRITE
  • Prompt: !,DIR("?",I)
  • Line Location: WHATHRS+23
Function Call: WRITE
  • Prompt: !,DIR("?",I)
  • Line Location: WHATHRS+39
Function Call: WRITE
  • Prompt: !,"There are no tour hours in the current pay period."
  • Line Location: WHATHRS+43
Function Call: WRITE
  • Prompt: !,VALMSG
  • Line Location: FLRECESS+76
Routine Call
  • DIALOG
  • Line Location:
    • FLRECESS+28
    • FLRECESS+40
    • FLRECESS+61
    • FLRECESS+70
Routine Call
  • DIE
  • Line Location:
    • FLRECESS+49
Routine Call
  • DIE
  • Line Location:
    • FLRECESS+28
    • FLRECESS+40
    • FLRECESS+61
    • FLRECESS+70
Routine Call
  • DIR
  • Line Location:
    • WHATHRS+26
    • WHATHRS+40
    • WHATHRS+60
    • WHATHRS+74
    • SELRWK+23
    • FLRECESS+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRST(458 - [#458] WHATHRS+8
^PRST(458.8 - [#458.8] FLRECESS+36, FLRECESS+46
^TMP("PRSLI" SELRWK+30
^TMP("PRSRW" EDITSTRT+23, EDITSTRT+24, SETWKSLM+22!, SETWKSLM+24*, SETWKSLM+25*, SELRWK+34*, FLRECESS+52, FLRECESS+53, FLRECESS+60, DSELWK+14
, DSELWK+16!, DSELWK+18*
^TMP("PRSSW" SETWKHRS+6, SETWKSLM+6, SETWKSLM+15, SELRWK+35*, DSELWK+11, DSELWK+12, DSELALL+5, DSELALL+6, DSELALL+7!

Label References

Name Line Occurrences
DSELALL SETWKHRS+18, SELRWK+12, DSELWK+20
SELRWK DSELWK+6
SETWKHRS SELRWK+37
SETWKSLM SETWKHRS+14
WHATHRS SETWKHRS+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% FLRECESS+65~, FLRECESS+68
%H FLRECESS+65~
%I FLRECESS+65~
CANADD FLRECESS+4~, FLRECESS+5*, FLRECESS+23
CHANGE FLRECESS+4~, FLRECESS+10*, FLRECESS+11, FLRECESS+16
CTRH1 SETWKHRS+2~, SETWKHRS+11, SETWKHRS+14, WHATHRS~, WHATHRS+7*, WHATHRS+10*, WHATHRS+11, WHATHRS+13, SETWKSLM~, SETWKSLM+14
CTRH2 SETWKHRS+2~, SETWKHRS+11, SETWKHRS+14, WHATHRS~, WHATHRS+7*, WHATHRS+10*, WHATHRS+11, WHATHRS+13, SETWKSLM~, SETWKSLM+14
D1 SETWKSLM+10~*
DAY SETWKSLM+10~
DIR WHATHRS+6~, WHATHRS+53!, WHATHRS+67!, SELRWK+7~, FLRECESS+8~
DIR("?" WHATHRS+16*, WHATHRS+17*, WHATHRS+18*, WHATHRS+19*, WHATHRS+20*, WHATHRS+21*, WHATHRS+22*, WHATHRS+23, WHATHRS+30*, WHATHRS+31*
, WHATHRS+32*, WHATHRS+33*, WHATHRS+34*, WHATHRS+35*, WHATHRS+36*, WHATHRS+39, WHATHRS+56*, WHATHRS+70*
DIR("A" WHATHRS+15*, WHATHRS+29*, WHATHRS+55*, WHATHRS+69*, SELRWK+19*, SELRWK+21*, FLRECESS+13*
DIR("B" WHATHRS+24*, WHATHRS+37*, WHATHRS+54*, WHATHRS+68*, FLRECESS+14*
DIR(0 WHATHRS+25*, WHATHRS+38*, WHATHRS+57*, WHATHRS+71*, SELRWK+17*, FLRECESS+14*
DIRUT WHATHRS+46, WHATHRS+63, WHATHRS+77, SELRWK+7~, SELRWK+25, FLRECESS+8~, FLRECESS+15
DUZ FLRECESS+69
EVEN WHATHRS+48~, WHATHRS+51, WHATHRS+66
FIRSTRW EDITSTRT+22~, EDITSTRT+23*, EDITSTRT+24*, EDITSTRT+25
>> FMWKS EDITSTRT+21
HASREC FLRECESS+4~, FLRECESS+6*, FLRECESS+10, FLRECESS+11, FLRECESS+23, FLRECESS+29*, FLRECESS+30, FLRECESS+34, FLRECESS+36, FLRECESS+38
, FLRECESS+43, FLRECESS+46, FLRECESS+47, FLRECESS+56, FLRECESS+67
HOURS FLRECESS+20~, FLRECESS+53*, FLRECESS+54, FLRECESS+58
I WHATHRS+6~, WHATHRS+23*, WHATHRS+39*, SELRWK+26*, SELRWK+27
IEN FLRECESS+20~
IEN(1 FLRECESS+29
IENS FLRECESS+20~, FLRECESS+37!, FLRECESS+38*, FLRECESS+39, FLRECESS+47*, FLRECESS+48, FLRECESS+55!, FLRECESS+56*, FLRECESS+57, FLRECESS+58
, FLRECESS+59, FLRECESS+60, FLRECESS+66!, FLRECESS+67*, FLRECESS+68, FLRECESS+69
IOF EDITSTRT+7, SETWKHRS+5
ITEM SETWKSLM+3~, SETWKSLM+5*, SETWKSLM+6*, SETWKSLM+8, SETWKSLM+10, SETWKSLM+13, SETWKSLM+14, SETWKSLM+15, SETWKSLM+21, SETWKSLM+22
, SETWKSLM+24, SETWKSLM+25, SELRWK+7~, SELRWK+27*, SELRWK+28, SELRWK+30, SELRWK+34, SELRWK+35, DSELWK+4~, DSELWK+10*
, DSELWK+11*, DSELWK+12, DSELWK+14, DSELWK+16, DSELWK+18, DSELALL+3~, DSELALL+4*, DSELALL+5*, DSELALL+6, DSELALL+7
LISTI SELRWK+7~, SELRWK+30*, SELRWK+34, SELRWK+35, DSELALL+3~, DSELALL+6*
LSTITEM SETWKSLM+3~, SETWKSLM+15*, SETWKSLM+16, DSELWK+12*, DSELWK+13
ODD WHATHRS+48~, WHATHRS+51, WHATHRS+52
OOPSWKS SETWKHRS+14, SETWKHRS+16, SETWKSLM~, SETWKSLM+4~*, SETWKSLM+21*
OTHERHRS SETWKHRS+2~, SETWKHRS+11, SETWKHRS+14, WHATHRS~, WHATHRS+7*, WHATHRS+13*, WHATHRS+14, WHATHRS+28, SETWKSLM~, SETWKSLM+9
OUT EDITSTRT+5~, EDITSTRT+11*, EDITSTRT+13, EDITSTRT+16, EDITSTRT+17, SETWKHRS~, SETWKHRS+8*, SETWKHRS+11, SETWKHRS+12, WHATHRS~
, WHATHRS+58*, WHATHRS+59, WHATHRS+63*, WHATHRS+65, WHATHRS+72*, WHATHRS+73, WHATHRS+77*, SELRWK~, SELRWK+8*, SELRWK+36*
, SELRWK+37, FLRECESS+4~, DSELWK+4~, DSELWK+6, DSELWK+7
PPE SETWKSLM+10~
PPI WHATHRS+8~*, WHATHRS+9, SETWKSLM+10~, SETWKSLM+11, SETWKSLM+12
PR SELRWK~, SELRWK+18, SELRWK+37
PRESEL SELRWK+13~, SELRWK+14*, SELRWK+15
>> PRSDT EDITSTRT+15, EDITSTRT+16, EDITSTRT+17*, EDITSTRT+20, EDITSTRT+21, FLRECESS+27, FLRECESS+31, FLRECESS+32, FLRECESS+36, FLRECESS+39
, FLRECESS+41, FLRECESS+42
PRSDTTMP EDITSTRT+14~, EDITSTRT+15*, EDITSTRT+17
PRSFDA FLRECESS+20~, FLRECESS+24!, FLRECESS+37!, FLRECESS+55!, FLRECESS+66!
PRSFDA( FLRECESS+25*, FLRECESS+26*, FLRECESS+27*, FLRECESS+39*, FLRECESS+48*, FLRECESS+57*, FLRECESS+58*, FLRECESS+59*, FLRECESS+60*, FLRECESS+68*
, FLRECESS+69*
>> PRSFY EDITSTRT+19, FLRECESS+6, FLRECESS+26, FLRECESS+30*, FLRECESS+31*, FLRECESS+32*, FLRECESS+41*, FLRECESS+42*
>> PRSLSTRT SELRWK+15, SELRWK+16, SELRWK+17
>> PRSNURSE WHATHRS+9, WHATHRS+13, SETWKSLM+12, FLRECESS+5, FLRECESS+25
>> PRSOUT FLRECESS+9, FLRECESS+15*, FLRECESS+16
>> PRSRWHRS EDITSTRT+21*
>> PRSVIEW EDITSTRT+4, SELRWK+6, DSELWK+3
>> PRSVONLY FLRECESS+75
>> PRSWKLST SELRWK+15, SELRWK+16, SELRWK+17
RDATA DSELWK+4~, DSELWK+14*, DSELWK+15
REW DSELWK+4~
RH SETWKSLM+8*, SETWKSLM+13*, SETWKSLM+14*, SETWKSLM+16, SETWKSLM+20, SETWKSLM+24, DSELWK+4~, DSELWK+10*
RH1 SETWKHRS+2~, SETWKHRS+11, SETWKHRS+14, WHATHRS~, WHATHRS+7*, WHATHRS+64*, WHATHRS+68, SETWKSLM~, SETWKSLM+8
RH2 SETWKHRS+2~, SETWKHRS+11, SETWKHRS+14, WHATHRS~, WHATHRS+7*, WHATHRS+78*, SETWKSLM~, SETWKSLM+8
RWREC EDITSTRT+2~, EDITSTRT+19*, EDITSTRT+20
SURE FLRECESS+2~*, FLRECESS+12*, FLRECESS+15
TH WHATHRS+9~, SETWKSLM+12!
TH("W1" WHATHRS+10, WHATHRS+21, WHATHRS+31, SETWKSLM+13
TH("W2" WHATHRS+10, WHATHRS+22, WHATHRS+32, SETWKSLM+13
U EDITSTRT+19, SETWKSLM+24, SETWKSLM+25, SELRWK+14, SELRWK+15, SELRWK+34, FLRECESS+5, FLRECESS+6, FLRECESS+30, FLRECESS+31
, FLRECESS+32, FLRECESS+36, FLRECESS+41, FLRECESS+42, FLRECESS+53, FLRECESS+60, DSELWK+15, DSELWK+18
UCTH SETWKHRS+2~, SETWKHRS+11, SETWKHRS+14, WHATHRS~, WHATHRS+7*, WHATHRS+27*, WHATHRS+41*, WHATHRS+44*, WHATHRS+49, SETWKSLM~
, SETWKSLM+14, SETWKSLM+21
UOH SETWKHRS+2~, SETWKHRS+11, SETWKHRS+14, WHATHRS~, WHATHRS+7*, WHATHRS+12*, WHATHRS+27*, WHATHRS+28, SETWKSLM~, SETWKSLM+9
VALID WHATHRS+58~*, WHATHRS+59, WHATHRS+61*, WHATHRS+72~*, WHATHRS+73, WHATHRS+75*
>> VALMBCK EDITSTRT+3*, EDITSTRT+12*, SETWKHRS+3*, SETWKHRS+9*, SETWKHRS+12*, SETWKHRS+19*, SELRWK+5*, SELRWK+24*, SELRWK+38*, FLRECESS+1*
, FLRECESS+15*, FLRECESS+16*, FLRECESS+77*, FLRECESS+79*, DSELWK+2*, DSELWK+5*, DSELWK+21*
>> VALMBG EDITSTRT+25*
>> VALMSG SETWKHRS+16*, FLRECESS+71*, FLRECESS+73*, FLRECESS+76
WEEK FLRECESS+20~, FLRECESS+51*, FLRECESS+52*, FLRECESS+53, FLRECESS+57, FLRECESS+59, FLRECESS+60
WKIEN FLRECESS+45~*, FLRECESS+46*, FLRECESS+47
>> WKSFM( SETWKSLM+10, SETWKSLM+25, FLRECESS+59
X FLRECESS+65~
>> XQORNOD(0 SELRWK+14, SELRWK+15
Y WHATHRS+6~, WHATHRS+27, WHATHRS+41, WHATHRS+53!, WHATHRS+61, WHATHRS+62*, WHATHRS+64, WHATHRS+67!, WHATHRS+75, WHATHRS+76*
, WHATHRS+78, SELRWK+7~, SELRWK+15*, SELRWK+16, SELRWK+26, SELRWK+27, FLRECESS+8~, FLRECESS+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All