Routine: PRSPSAP2

Package	Total	Call Graph
PAID	6	PTP^PRSASR1 ^PRSATIM $$ASK^PRSLIB00 ($$TWENTY4,MEALIN)^PRSPESR2 (CANTPOST,CMPESRTC)^PRSPSAP3 $$CLRTCDY^PRSPSAPU
VA FileMan	3	NOW^%DTC MSG^DIALOG FILE^DIE

Package	Total	Caller Graph
PAID	3	PRSPESR PRSPSAP PRSPSAPU

Entry Points

Name	Comments	DBIA/ICR reference
TRANSACT	; TRANSfer ACTions to the database ; loop thru temp and update the time card and the ESR day stats
UPESR(PRSIEN,PPI,PRSD,ACT,REM)	; update ESR with either Resubmit OR Approve
UPTCARD(CAN,PRSIEN,PPI,PRSD)	; UPDATE A TIME CARD ; WITH ESR LEAVE EXCEPTIONS AND HOLIDAY X ; Return CAN by reference. ; CAN("AE") "CAN APPROVE ESR" is set to true if the ESR can be ; approved. i.e. timecard status is T-timekeep or there's ; no affect on the timecard ; CAN("CB") "CAN CALL BANK" is set to true when a call should be ; made to the hours bank API (PTP^PRSASR1). ; Calling routines must consider the order in which ; to APPROVE ESR and CALL HOURS BANK since the API ; PTP^PRSASR, will only count hrs with an approved status.
EDTCARD(PPI,PRSIEN,PRSD,ESRN)	; edit the timecard
ESR2TC(ESRN,PT)	;CONVERT ESR DATA TO TIMECARD FORMAT
ABSENT(ESRN,PPI,PRSIEN,PRSD)	;return true if the ESR posting matches all ; the tour start and stop times and uses only one type of leave and ; the meal matches the tours meal. ; i.e. ESR posting equivalent to absent entire tour question.
ENDML(END,MEAL)	;GET AN END TIME AND DEDUCT THE MEAL FROM IT
MEALCUT(HHMM,MEAL)	;Subtract meal time from the end time ; (subtract a 15 minute increment from length of time ; in hh:mm format, i.e. hh:mm - mm
TCSTAT(PPI,PRSIEN)	; get timecard status
GETAPTM(WORK)	; return the work node with only the time that should ; be posted to a PTP's timecard ; INPUT: WORK : ESR work node ; RETURN ESRN : ESR node with only time applicable to PTP's ;

Name	Field # of Occurrence
NOW^%DTC	EDTCARD+17
MSG^DIALOG	UPESR+9, EDTCARD+27
FILE^DIE	UPESR+8, EDTCARD+26
PTP^PRSASR1	TRANSACT+22
^PRSATIM	ENDML+9
$$ASK^PRSLIB00	UPTCARD+57
$$TWENTY4^PRSPESR2	ENDML+5
MEALIN^PRSPESR2	MEALCUT+13, MEALCUT+14
CANTPOST^PRSPSAP3	UPTCARD+56
CMPESRTC^PRSPSAP3	UPTCARD+53
$$CLRTCDY^PRSPSAPU	EDTCARD+8

Name	Line Occurrences (* Changed, ! Killed)
^PRST(457.1 - [#457.1]	ABSENT+30, ABSENT+31
^PRST(458 - [#458]	UPTCARD+25, UPTCARD+29, UPTCARD+30, EDTCARD+14*, ABSENT+27, ABSENT+28, TCSTAT+2
^TMP($J	TRANSACT+4, TRANSACT+6, TRANSACT+8, TRANSACT+9, TRANSACT+15

Name	Line Occurrences
$$ABSENT	EDTCARD+11
$$ENDML	ESR2TC+14
$$ESR2TC	EDTCARD+12
$$GETAPTM	UPTCARD+27
$$MEALCUT	ENDML+7
$$TCSTAT	UPTCARD+36
EDTCARD	UPTCARD+39
UPESR	TRANSACT+16, TRANSACT+21
UPTCARD	TRANSACT+20

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EDTCARD+17~
%H	EDTCARD+17~
%I	EDTCARD+17~
ACT	TRANSACT+2~, TRANSACT+9*, TRANSACT+11, TRANSACT+14, TRANSACT+16, TRANSACT+21, UPESR~, UPESR+6
CAN	TRANSACT+19~, TRANSACT+20, UPTCARD~
CAN("AE"	TRANSACT+19, TRANSACT+21, UPTCARD+23, UPTCARD+38, UPTCARD+50, UPTCARD+54, UPTCARD+55
CAN("CB"	TRANSACT+19, TRANSACT+22, UPTCARD+23, UPTCARD+38, UPTCARD+50, UPTCARD+54, UPTCARD+55
CLEAR	EDTCARD+2~, EDTCARD+8*
DECR	MEALCUT+4~, MEALCUT+14*, MEALCUT+16
DUMB	UPTCARD+22~, UPTCARD+57*
DUZ	EDTCARD+23
DYSTAT	UPTCARD+22~, UPTCARD+32*
EARY	UPTCARD+22~, UPTCARD+53, UPTCARD+56
EDTSTR	EDTCARD+2~
EN	ESR2TC+2~, ESR2TC+9, ESR2TC+14, ESR2TC+16, ABSENT+6~, ABSENT+13, ABSENT+21, ABSENT+38, ABSENT+40
END	ENDML~, ENDML+4, ENDML+5, ENDML+6, ENDML+7, ENDML+9, ENDML+10
ERRORS	UPTCARD+22~, UPTCARD+53, UPTCARD+54
ESR2TC	ESR2TC+2~
ESRN	UPTCARD+21~, UPTCARD+25, UPTCARD+27, UPTCARD+39, UPTCARD+50, UPTCARD+56, EDTCARD~, EDTCARD+9, EDTCARD+11, EDTCARD+12 , ESR2TC~, ESR2TC+6, ABSENT~, ABSENT+10
ESRTOUR	ABSENT+6~, ABSENT+8, ABSENT+20, ABSENT+22, ABSENT+24, ABSENT+42
HH	MEALCUT+4~, MEALCUT+9, MEALCUT+18, MEALCUT+19, MEALCUT+21*, MEALCUT+25
HHMM	MEALCUT~, MEALCUT+5, MEALCUT+7, MEALCUT+9
I	ESR2TC+2~, ESR2TC+5, ESR2TC+6, ABSENT+6~, ABSENT+9, ABSENT+10, ABSENT+34, ABSENT+35, MEALCUT+4~, MEALCUT+16 , GETAPTM+5~, GETAPTM+7*, GETAPTM+8
IENS	UPESR+1~, UPESR+5, UPESR+6, UPESR+7, EDTCARD+2~, EDTCARD+21, EDTCARD+22, EDTCARD+23, EDTCARD+24, EDTCARD+25
LASTTT	ABSENT+5~, ABSENT+8, ABSENT+15, ABSENT+16, ABSENT+18
MEAL	ENDML~, ENDML+7, MEALCUT~, MEALCUT+7, MEALCUT+14
ML	ESR2TC+2~, ESR2TC+12, ESR2TC+14, ABSENT+6~, ABSENT+8, ABSENT+19*, ABSENT+42
MM	MEALCUT+4~, MEALCUT+5, MEALCUT+7, MEALCUT+13, MEALCUT+23, MEALCUT+25
MULTITT	ABSENT+5~, ABSENT+8, ABSENT+18, ABSENT+42
NODE0	ABSENT+5~, ABSENT+28*, ABSENT+30, ABSENT+31
OBJ	MEALCUT+4~, MEALCUT+13, MEALCUT+15, MEALCUT+17, MEALCUT+22*, MEALCUT+23
POST	UPTCARD+21~, UPTCARD+30*, UPTCARD+31, UPTCARD+32, UPTCARD+33, UPTCARD+34
POSTER	UPTCARD+21~, UPTCARD+33*
POSTTIME	EDTCARD+2~, EDTCARD+17*, EDTCARD+24
POSTYPE	UPTCARD+22~, UPTCARD+34*
PPI	TRANSACT+2~, TRANSACT+5, TRANSACT+6, TRANSACT+8, TRANSACT+9, TRANSACT+15, TRANSACT+16, TRANSACT+20, TRANSACT+21, TRANSACT+22 , UPESR~, UPESR+5, UPTCARD~, UPTCARD+25, UPTCARD+29, UPTCARD+30, UPTCARD+36, UPTCARD+39, UPTCARD+53, UPTCARD+56 , EDTCARD~, EDTCARD+8, EDTCARD+11, EDTCARD+14, EDTCARD+21, ABSENT~, ABSENT+27, ABSENT+28, TCSTAT~, TCSTAT+1 , TCSTAT+2
PRSD	TRANSACT+2~, TRANSACT+7, TRANSACT+8, TRANSACT+9, TRANSACT+15, TRANSACT+16, TRANSACT+20, TRANSACT+21, UPESR~, UPESR+5 , UPTCARD~, UPTCARD+25, UPTCARD+29, UPTCARD+30, UPTCARD+39, UPTCARD+53, UPTCARD+56, EDTCARD~, EDTCARD+8, EDTCARD+11 , EDTCARD+14, EDTCARD+21, ABSENT~, ABSENT+27, ABSENT+28
PRSFDA	UPESR+1~, EDTCARD+2~
PRSFDA(	UPESR+6, UPESR+7, EDTCARD+22, EDTCARD+23, EDTCARD+24, EDTCARD+25
PRSIEN	TRANSACT+2~, TRANSACT+3, TRANSACT+4, TRANSACT+6, TRANSACT+8, TRANSACT+9, TRANSACT+15, TRANSACT+16, TRANSACT+20, TRANSACT+21 , TRANSACT+22, UPESR~, UPESR+5, UPTCARD~, UPTCARD+25, UPTCARD+29, UPTCARD+30, UPTCARD+36, UPTCARD+39, UPTCARD+53 , UPTCARD+56, EDTCARD~, EDTCARD+8, EDTCARD+11, EDTCARD+14, EDTCARD+21, ABSENT~, ABSENT+27, ABSENT+28, TCSTAT~ , TCSTAT+1, TCSTAT+2
PSTDT	UPTCARD+21~, UPTCARD+31*
PT	ESR2TC~, ESR2TC+14
PTYPE	UPTCARD+21~, EDTCARD+9, EDTCARD+10, EDTCARD+11, EDTCARD+12, EDTCARD+25
RE	ESR2TC+2~, ESR2TC+11*, ESR2TC+16
REM	TRANSACT+15*, TRANSACT+16, UPESR~, UPESR+7
RETURN	ABSENT+5~, ABSENT+8, ABSENT+42, ABSENT+43
ST	ESR2TC+2~, ESR2TC+7, ESR2TC+8, ESR2TC+16, ABSENT+6~, ABSENT+11, ABSENT+12, ABSENT+21, ABSENT+36*, ABSENT+37 , ABSENT+40
TCN	UPTCARD+21~, UPTCARD+29, UPTCARD+50, EDTCARD+12, EDTCARD+14, ESR2TC+2~, ESR2TC+4, ESR2TC+15, ESR2TC+17, ESR2TC+19 , ESR2TC+20, GETAPTM+6, GETAPTM+11, GETAPTM+12
TCS	ESR2TC+2~, ESR2TC+16, ESR2TC+17, ABSENT+6~, ABSENT+21, ABSENT+22, ABSENT+40*, ABSENT+41
TCSTAT	UPTCARD+22~, UPTCARD+36*, UPTCARD+37, UPTCARD+55, UPTCARD+56
TCT	ABSENT+5~, ABSENT+27*, ABSENT+35
TCTOUR	ABSENT+6~, ABSENT+33, ABSENT+39, ABSENT+41*, ABSENT+42
TOD	UPTCARD+22~
TR1	ABSENT+5~, ABSENT+30*
TR1ML	ABSENT+5~, ABSENT+29, ABSENT+30, ABSENT+32
TR2	ABSENT+5~, ABSENT+31*
TR2ML	ABSENT+5~, ABSENT+29, ABSENT+31, ABSENT+32
TRMEAL	ABSENT+5~, ABSENT+32*, ABSENT+42
TSEG	ESR2TC+2~, ESR2TC+6, ESR2TC+7, ESR2TC+9, ESR2TC+10, ESR2TC+11, ESR2TC+12, ABSENT+6~, ABSENT+10, ABSENT+11 , ABSENT+13, ABSENT+14, ABSENT+19, ABSENT+35, ABSENT+36, ABSENT+38, GETAPTM+5~, GETAPTM+8, GETAPTM+9, GETAPTM+10 , GETAPTM+11
TT	ESR2TC+2~, ESR2TC+10, ESR2TC+16, ABSENT+6~, ABSENT+14, ABSENT+16, ABSENT+18, GETAPTM+9*, GETAPTM+10
U	UPTCARD+27, UPTCARD+31, UPTCARD+32, UPTCARD+33, UPTCARD+34, EDTCARD+9, ESR2TC+6, ESR2TC+7, ESR2TC+9, ESR2TC+10 , ESR2TC+11, ESR2TC+12, ESR2TC+16, ESR2TC+19, ABSENT+10, ABSENT+11, ABSENT+13, ABSENT+14, ABSENT+19, ABSENT+21 , ABSENT+24, ABSENT+30, ABSENT+31, ABSENT+35, ABSENT+36, ABSENT+38, ABSENT+40, TCSTAT+2, GETAPTM+8, GETAPTM+9 , GETAPTM+10
WORK	GETAPTM~, GETAPTM+8
X	EDTCARD+17~, ENDML+2~, ENDML+9, MEALCUT+4~, MEALCUT+13, MEALCUT+14*
Y	MEALCUT+4~

Customize PDF page

Package: PAID

Routine: PRSPSAP2

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: