PRSATE5 ;WCIOFO/PLT-Check for Tour Overlap ;7/8/08 14:34
Source file <PRSATE5.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
ENT | ;tour overlap check for all 14 days in file of a pp and an employee
|
|
PPTDOL(SRT,PPI,DFN,DAY,PRSDAY,PRSC) | ;tour check for one day in a pp, define prserr=day if overlapped
|
|
NPP | ;next pp (no secondary tour)
|
|
NEXIT | ||
LCPP | ;last, current or transmitted pp
|
|
LCEXIT | ||
TOUR(A) | ;ef: ~1=y if two day tour, ~2,999 =tour string
|
|
DAYT(PPI,DFN,A,B,PRSDAY) | ;ef: ~1=y if two-day tour, ~2 - tour string, ~3=y if two-day tour of secondary, ~4=secondary tour
|
|
TOUROL(A,B,C) | ;ef: =0 if not overlapped, =1 if overlapped
|
|
ERR(A,B,C) | ;define prserr=a
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PRST(457.1 - [#457.1] | TOUR+2 |
^PRST(458 - [#458] | PPTDOL+2, DAYT+4 |
Name | Line Occurrences |
---|---|
$$DAYT | NPP+1, NPP+6, LCPP+4, LCPP+12 |
$$TOUR | PPTDOL+3, NPP+1, LCPP+9, DAYT+3, DAYT+5, DAYT+6 |
$$TOUROL | NPP+3, NPP+4, NPP+6, LCPP+2, LCPP+5, LCPP+6, LCPP+13, LCPP+14 |
ERR | NPP+3, NPP+4, NPP+6, LCPP+2, LCPP+5, LCPP+6, LCPP+13, LCPP+14 |
LCEXIT | LCPP+2, LCPP+5, LCPP+6, LCPP+13, LCPP+14 |
LCPP | PPTDOL+4 |
NEXIT | NPP+3, NPP+4, NPP+6 |
NPP | PPTDOL+4 |
PPTDOL | ENT+2 |
Name | Field # of Occurrence |
---|---|
^(1 | PPTDOL+2, TOUR+2, DAYT+4 |
^(4 | PPTDOL+2, DAYT+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | PPTDOL+1~, NPP+1*, NPP+3, NPP+4, NPP+6, LCPP+9*, LCPP+10, LCPP+13, TOUR~, TOUR+1 , TOUR+2, DAYT~, DAYT+2, DAYT+3, DAYT+5, TOUROL~, TOUROL+3, ERR~, ERR+4, ERR+5 , ERR+6 |
B | PPTDOL+1~, NPP+1*, NPP+3, NPP+4, LCPP+4*, LCPP+5, LCPP+6, LCPP+9*, LCPP+10, LCPP+14 , DAYT~, DAYT+2, DAYT+3, DAYT+5, TOUROL~, TOUROL+5, ERR~, ERR+4 |
C | PPTDOL+1~, NPP+6*, LCPP+12*, LCPP+13, LCPP+14, DAYT+1~, DAYT+2*, DAYT+3, DAYT+4, TOUROL~ , TOUROL+9, TOUROL+11, TOUROL+13*, TOUROL+14, ERR~, ERR+4 |
D | DAYT+1~, DAYT+2*, DAYT+3, DAYT+4, TOUROL+1~, TOUROL+9*, TOUROL+11*, TOUROL+13, ERR+1~, ERR+6 , ERR+7 |
D( | TOUROL+3*!, TOUROL+13 |
D(1 | ERR+4*, ERR+5* |
DAY | ENT+1~, ENT+2*, PPTDOL~, PPTDOL+2, PPTDOL+3, NPP+1, NPP+3, NPP+4, NPP+6, LCPP+2 , LCPP+4, LCPP+5, LCPP+6, LCPP+7, LCPP+9, LCPP+12, LCPP+13, LCPP+14 |
>> DDSFILE | ERR+6 |
DFN | ENT+2, PPTDOL~, PPTDOL+2, NPP+1, NPP+6, LCPP+4, LCPP+12, DAYT~, DAYT+4 |
E | DAYT+1~, DAYT+3*, DAYT+4*, DAYT+5, DAYT+6, TOUROL+1~, TOUROL+3*, TOUROL+5*, TOUROL+13*, ERR+1~ |
F | DAYT+1~, DAYT+4*, DAYT+6, TOUROL+1~, TOUROL+5*, TOUROL+7*, TOUROL+9, ERR+1~, ERR+2*, ERR+4 , ERR+5 |
G | DAYT+1~, DAYT+4*, DAYT+6, TOUROL+1~, TOUROL+5*, TOUROL+13* |
I | PPTDOL+1~, LCPP+5*, LCPP+6*, LCPP+13*, LCPP+14*, TOUROL+1~, TOUROL+3*, TOUROL+5*, TOUROL+7*, TOUROL+9* , TOUROL+11*, TOUROL+13* |
>> PPE | ERR+2 |
PPI | ENT+2, PPTDOL~, PPTDOL+2, NPP+1, NPP+6, LCPP+4, LCPP+12, DAYT~, DAYT+2, DAYT+3 |
PPID | ERR+1~, ERR+3*, ERR+4, ERR+5 |
PRS0 | PPTDOL+1~, PPTDOL+2*, PPTDOL+3*, NPP+1, LCPP+9 |
PRS1 | PPTDOL+1~, PPTDOL+2*, PPTDOL+3*, PPTDOL+4, LCPP+2, LCPP+5, LCPP+13 |
PRS4 | PPTDOL+1~, PPTDOL+2*, PPTDOL+3*, LCPP+2, LCPP+6, LCPP+14 |
PRS71 | PPTDOL+1~, NPP+1*, LCPP+9* |
PRSC | PPTDOL~, NPP+6, LCPP+7 |
PRSDAY | ENT+2, PPTDOL~, NPP+1, NPP+6, LCPP+4, LCPP+12, DAYT~ |
PRSDAY( | PPTDOL+2, PPTDOL+3, LCPP+9, DAYT+3 |
PRSERR | ENT+2!, NPP+3, NPP+4, NPP+6, LCPP+2, LCPP+5, LCPP+6, LCPP+13, LCPP+14, ERR+6* |
SRT | ENT+2, PPTDOL~, PPTDOL+4, NPP+1, NPP+6, LCPP+4, LCPP+12, ERR+2, ERR+3 |
U | PPTDOL+3, NPP+1, LCPP+9, TOUR+2, DAYT+3, DAYT+4, DAYT+5, DAYT+6, TOUROL+3, TOUROL+5 , TOUROL+7, TOUROL+9, TOUROL+11, TOUROL+13, ERR+2 |
X | TOUROL+1~, TOUROL+3*, TOUROL+5* |
Y | TOUROL+1~, TOUROL+3*, TOUROL+5* |
Z | TOUROL+1~, TOUROL+3*, TOUROL+5* |