PRSARC08 ;WOIFO/JAH - Tour hours procedure calls ;12/19/06
Source file <PRSARC08.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| TRSHFTS(TOURIEN) | ; return two piece ^ string with EARLIEST shift special
 ; indicator for a tour  | 
|
| PLACEML(S1,S2,M) | ; Remove meal from hrs on 2 day tour.  Put meal in middle and
 ; remove from today S1 or tomorrow S2. Function considers only amount ; of hrs worked, to indicate in which hr of total hrs meal ; would begin. It doesn't consider where hrs are placed in day. ; INPUT: ; S1 = HRS ON DAY 1 (DECIMAL 8.0, 8.5, ETC) ; S2 = HRS ON DAY 2 ; M = LENGTH OF MEAL IN DECIMAL FORM .25 HRS, .5 HRS ETC  | 
|
| EARLYSH(TH,WAGER) | ; LOOP THROUGH ARRAY TO FIND EARLIEST SHIFT
 | 
|
| ISWAGE(PRSIEN) | ; return true for wage grade 
 | 
|
| ISCMPTR(PPI,PRSIEN) | ; return true for compressed tours
 | 
|
| TOTAL(TH,WKS) | ; array loop tallis hrs
 ; INPUT : WKS (optional) 1 for week one total, 2 for week 2 total, ; otherwise full pay period total.  | 
|
| PARSE(VALMNOD,BEG,END) | ; -- Copy from VALM2 split out pre-answers from user
 |