Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls