PRSPLVU ;WOIFO/SAB - LEAVE UTILITIES ;3/31/2005
Source file <PRSPLVU.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LOADTOD(PPI,PRSIEN,DAY,TOD,TODD) | ; Load Tour of Duty into TOD() Array
; input ; PPI - pay period IEN, file 458 ; PRSIEN - employee IEN, file 450 ; DAY - day number in PP ; TOD - array, passed by reference, will be initialized ; TODD - array, passed by reference, will be initialized ; output ; TOD - array updated with tour segments in following format ; TOD(tour#-segment#)= ; start d/t (FM)^end d/t (FM)^type of time^start time(ETA)^end time(ETA) ; ^special code ; TODD - array updated with tour data in the following format ; TODD(tour#)= ; earliest regular start d/t (FM)^latest regular end d/t (FM)^ ; tour meal length (minutes)^segment # of longest regular tour segment |
|
| LOADESR(PPI,PRSIEN,DAY,ESR) | ; Load ESR into ESR() Array
; input ; PPI - pay period IEN, file 458 ; PRSIEN - employee IEN, file 450 ; DAY - day number in PP ; ESR - array, passed by reference, will be initialized ; output ; ESR - array updated with tour segments in following format ; ESR(segment #)= ; start d/t (FM)^end d/t (FM)^type of time^start time(ETA)^end time(ETA) ; ^meal (min) |
|
| LOADTC(PPI,PRSIEN,DAY,TC) | ; Load Time Card into TC() Array
; input ; PPI - pay period IEN, file 458 ; PRSIEN - employee IEN, file 450 ; DAY - day number in PP ; TC - array, passed by reference, may contain data ; output ; TC - array updated with tour segments in following format ; TC(segment #)= ; start d/t (FM)^end d/t (FM)^type of time^start time(ETA)^end time(ETA) |
|
| OKALVR(LVIEN) | ; OK Approve Leave Request
; Called by Supervisory Approvals to see if it is OK to approve a ; leave request ; Input ; LVIEN - Leave Request IEN (file 458.1) ; Result ; string value ; = 1 if OK to approve leave request ; = 0 or 0^PPI if not OK to approve leave request ; where PPI is the Pay Period ien (file 458) |
|
| CNVTS(DATE,START,END) | ; Convert Time Segment
; input ; returns string with value = ; Start Date/Time (FileMan internal)^End Date/Time (FileMan internal) |
|
| FMETA(TIME) | ; FileMan to ETA time
|
| FileNo | Call Tags |
|---|---|
| ^PRST(457.1 - [#457.1] | GET1^DIQ |
| 458.02 | GET1^DIQ |
