PRS8WE2 ;WCIOFO/MGD-DECOMPOSITION, WEEKEND PREMIUM PART 2 ;3/23/07
Source file <PRS8WE2.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 |
---|---|---|
COUNT(DAYN,SEG) | ; Increase count of premium for tour
; input ; DAYN = day # (0-15) being counted ; SEG = segment # (1-96) in DAYN being counted ; D(DAYN) ; P(DAYN) ; H(DAYN) ; CNT(DAYN,shift) - optional ; output ; CNT(DAYN,shift) = current count for tour being processed |
|
SAVE | ; Update WK array with final count for tour
; input ; TP - type of premium (SAT or SUN) ; CNT(day,shift)=amount |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP($J | COUNT+29, COUNT+49, COUNT+75 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AMT | SAVE+5~, SAVE+10*, SAVE+17 |
>> CNT( | COUNT+88*, SAVE+6, SAVE+9, SAVE+10 |
>> D( | COUNT+13, COUNT+14, COUNT+68, COUNT+71, COUNT+86 |
DAT | COUNT+11~, COUNT+75*, COUNT+77, COUNT+79, COUNT+80 |
>> DAY | COUNT+24 |
DAYN | COUNT~, COUNT+13, COUNT+14, COUNT+29, COUNT+46, COUNT+63, COUNT+68, COUNT+71, COUNT+72, COUNT+73 , COUNT+86, COUNT+88, SAVE+5~, SAVE+6*, SAVE+7, SAVE+8, SAVE+9, SAVE+10 |
END | COUNT+27~, COUNT+32*, COUNT+33, COUNT+47~, COUNT+52* |
FND | COUNT+11~, COUNT+22*, COUNT+28, COUNT+33, COUNT+36*, COUNT+42, COUNT+48, COUNT+53, COUNT+56*, COUNT+69* , COUNT+72, COUNT+75, COUNT+77, COUNT+81* |
>> H( | COUNT+13, COUNT+14, COUNT+63, COUNT+71 |
>> HYBRID | COUNT+25 |
INC | COUNT+27~, COUNT+31*, COUNT+33, COUNT+47~, COUNT+51* |
M1 | COUNT+11~, COUNT+73*, COUNT+79 |
>> NAWS | COUNT+86, SAVE+16 |
NODE | COUNT+11~, COUNT+75* |
NOTELG | COUNT+11~, COUNT+22*, COUNT+25, COUNT+28, COUNT+33, COUNT+41*, COUNT+48, COUNT+53, COUNT+61* |
>> P( | COUNT+13, COUNT+14, COUNT+63 |
PC | SAVE+5~, SAVE+11*, SAVE+16*, SAVE+17 |
>> PMP | COUNT+25 |
POST | COUNT+11~, COUNT+33*, COUNT+35, COUNT+38, COUNT+53*, COUNT+55, COUNT+58 |
PREVDAY | COUNT+11~, COUNT+46*, COUNT+49 |
RC | COUNT+11~, COUNT+38*, COUNT+41, COUNT+58*, COUNT+61 |
>> SATNOSUN | COUNT+24 |
SC | COUNT+11~, COUNT+69*, COUNT+80* |
SEG | COUNT~, COUNT+13, COUNT+14, COUNT+35, COUNT+55, COUNT+63, COUNT+68, COUNT+71, COUNT+73, COUNT+86 |
SHIFT | COUNT+11~, COUNT+65*, COUNT+68*, COUNT+80*, COUNT+81, COUNT+86*, COUNT+88, SAVE+5~, SAVE+9*, SAVE+10 , SAVE+11, SAVE+16 |
TDAY | COUNT+11~, COUNT+72*, COUNT+73, COUNT+75 |
TOUR | COUNT+11~, COUNT+29*, COUNT+30, COUNT+33, COUNT+35, COUNT+38, COUNT+49*, COUNT+50, COUNT+53, COUNT+55 , COUNT+58 |
TOURS | COUNT+11~, COUNT+28*, COUNT+29, COUNT+31, COUNT+32, COUNT+37, COUNT+48*, COUNT+49, COUNT+51, COUNT+52 , COUNT+57 |
>> TP | COUNT+24, COUNT+66, SAVE+11, SAVE+16 |
TS | COUNT+11~, COUNT+77*, COUNT+79, COUNT+80 |
>> TYP | COUNT+14, COUNT+66 |
U | COUNT+24, COUNT+25, COUNT+68, COUNT+77, COUNT+79, COUNT+80, COUNT+81, SAVE+17 |
WEEK | SAVE+5~, SAVE+8*, SAVE+17 |
>> WK( | SAVE+17* |