ASUMSTRD ; IHS/ITSC/LMH -SET FIELD VARS STATION MASTER ;
Source file <ASUMSTRD.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MIKF | ;EP KILL STATION DATA VARIABLES
|
|
MIK | ;EP KILL STATION DFN & DATA VARIABLES
|
|
M | ;EP;SET ALL
|
|
MIC | ;EP SET DEMAND DATA
|
|
MI | ;EP SET DATA VARS
|
|
EOQ | ;
|
|
MEXP | ;SET EXPIRATION VARIABLES
|
|
ASUSRIDX | ;INDEX FIELDS OF STATION MASTER
|
|
SK | ;EP KILL DFN & VARS
|
|
S | ;EP SET FIELDS
|
|
SKF | ;EP KILL DATA VARS
|
|
MICK | ;EP KILL DEMAND DATA
|
|
READ(X) | ;EP ;WITH PARAMETER PASSING
; X = INDEX POINTER |
|
MMC | ;MONTH
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ASUMS - [#9002031] | S+2, MI+3, MI+7, MI+8, MMC+2, MEXP+3, MEXP+5, MEXP+6 |
^ASUMX - [#9002032] | MI+4 |
Name | Line Occurrences |
---|---|
ASUSRIDX | MI+2, MI+9 |
EOQ | ASUSRIDX+44 |
M | READ+4 |
MEXP | M+1 |
MI | M+1 |
MIC | M+1 |
MMC | MIC+4 |
S | M+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> ASUF("DLIDX" | MI+4*, MI+5* |
>> ASUF("EOQ" | EOQ+16*, EOQ+17, EOQ+19*, EOQ+20! |
>> ASUK("DT" | MIC+5 |
>> ASUL(2 | S+1, EOQ+8, EOQ+10 |
>> ASUL(8 | EOQ+17, EOQ+18, EOQ+19 |
ASUMS | MIKF+1! |
ASUMS("AMIQ" | MIC+7*, MIC+9* |
ASUMS("AR" | S+4*, SKF+1! |
ASUMS("CST/U" | ASUSRIDX+19*, ASUSRIDX+21* |
ASUMS("D/I" | ASUSRIDX+22*, ASUSRIDX+23*, ASUSRIDX+24*, ASUSRIDX+25*, ASUSRIDX+26*, ASUSRIDX+27*, ASUSRIDX+28*, ASUSRIDX+29*, ASUSRIDX+30*, ASUSRIDX+31* , ASUSRIDX+32*, ASUSRIDX+33*, ASUSRIDX+34*, ASUSRIDX+35*, ASUSRIDX+36*, ASUSRIDX+37*, ASUSRIDX+38*, ASUSRIDX+47*, ASUSRIDX+48*, ASUSRIDX+49* , EOQ+4 |
ASUMS("D/O" | ASUSRIDX+40*, EOQ+4 |
ASUMS("DMD" | MIC+3*, MIC+7, MIC+9, MIC+10!, MICK+1!, MMC+1*, MMC+2*, MMC+3*, MMC+4*, MMC+5* , MMC+6* |
ASUMS("DXP" | MEXP+2*, MEXP+3*, MEXP+4, MEXP+6*, MEXP+7*, MEXP+8, MEXP+10, MEXP+11!, MEXP+12, MEXP+13* , MEXP+15*, MEXP+16* |
ASUMS("E#" | S+1*, S+2, SK+1!, MI+1*, MI+2, MI+3, MI+4, MI+5, MI+7, MI+8 , MIK+1!, ASUSRIDX+4, ASUSRIDX+5*, EOQ+8, EOQ+10, MIC+1, MIC+2, MMC+2, MEXP+2*, MEXP+3* , MEXP+5, MEXP+6 |
ASUMS("EOQ" | EOQ+1*, EOQ+2, EOQ+3, EOQ+5*, EOQ+6, EOQ+7, EOQ+8*, EOQ+10*, EOQ+11*, EOQ+12 , EOQ+13*, EOQ+14*, EOQ+15*, EOQ+18*, EOQ+21, EOQ+22*, EOQ+24, EOQ+25*, EOQ+26*, EOQ+27 , EOQ+28*, EOQ+29, EOQ+30, EOQ+31*, EOQ+32, EOQ+33*, EOQ+34, EOQ+35, EOQ+37*, EOQ+38* , EOQ+39*, EOQ+40* |
ASUMS("ESTB" | MI+6*, MIC+5*, MIC+6, MIC+9 |
ASUMS("LPP" | ASUSRIDX+14*, ASUSRIDX+15, ASUSRIDX+19 |
ASUMS("LSTISS" | ASUSRIDX+12* |
ASUMS("LTM" | ASUSRIDX+8* |
ASUMS("ORD#" | ASUSRIDX+6* |
ASUMS("PMIQ" | ASUSRIDX+10*, ASUSRIDX+15, EOQ+25, EOQ+28, EOQ+29, EOQ+33, EOQ+34, EOQ+35 |
ASUMS("PMIV" | ASUSRIDX+15*, EOQ+19 |
ASUMS("QTY" | ASUSRIDX+17*, ASUSRIDX+18, ASUSRIDX+21, EOQ+4, MEXP+8, MEXP+9 |
ASUMS("QTY-BEG" | ASUSRIDX+46* |
ASUMS("R13" | ASUSRIDX+53* |
ASUMS("R73" | ASUSRIDX+50*, ASUSRIDX+51*, ASUSRIDX+52* |
ASUMS("RPQ" | ASUSRIDX+11*, EOQ+25, EOQ+28, EOQ+29, EOQ+33, EOQ+34 |
ASUMS("RPQ-O" | ASUSRIDX+9* |
ASUMS("SFSKM" | ASUSRIDX+42* |
ASUMS("SLC" | ASUSRIDX+39* |
ASUMS("SPQ" | ASUSRIDX+43* |
ASUMS("SRC" | ASUSRIDX+7* |
ASUMS("STA" | S+3*, SKF+1! |
ASUMS("STKST" | EOQ+4*, EOQ+25, EOQ+28, EOQ+29, EOQ+33, EOQ+34 |
ASUMS("VAL" | ASUSRIDX+16*, ASUSRIDX+21 |
ASUMS("VALBEG" | ASUSRIDX+45* |
ASUMS("VENAM" | ASUSRIDX+13* |
ASUMS("VENUI" | ASUSRIDX+41* |
ASUMS(0 | S+2*, S+3, S+4, SKF+1!, MI+2*, MI+3*, MI+4, MI+5*, MI+6, ASUSRIDX+4 , ASUSRIDX+5, ASUSRIDX+6, ASUSRIDX+7, ASUSRIDX+8, ASUSRIDX+9, ASUSRIDX+10, ASUSRIDX+11, ASUSRIDX+12, ASUSRIDX+13, ASUSRIDX+14 , ASUSRIDX+16, ASUSRIDX+17, ASUSRIDX+22, ASUSRIDX+23, ASUSRIDX+24, ASUSRIDX+25, ASUSRIDX+26, ASUSRIDX+27, ASUSRIDX+28, ASUSRIDX+29 , ASUSRIDX+30, ASUSRIDX+31, ASUSRIDX+32, ASUSRIDX+33, ASUSRIDX+34, ASUSRIDX+35, ASUSRIDX+38, EOQ+5, EOQ+13, EOQ+14 , EOQ+15 |
ASUMS(2 | MI+2*, MI+7*, ASUSRIDX+39, ASUSRIDX+40, ASUSRIDX+41, ASUSRIDX+42, ASUSRIDX+43, ASUSRIDX+45, ASUSRIDX+46, ASUSRIDX+47 , ASUSRIDX+48, ASUSRIDX+49, EOQ+1 |
ASUMS(3 | MI+2*, MI+8*, ASUSRIDX+50, ASUSRIDX+51, ASUSRIDX+52, ASUSRIDX+53 |
>> ASUMX("E#" | MI+1 |
>> ASUU(19 | EOQ+16*, EOQ+17*, EOQ+18, EOQ+19, EOQ+21*, EOQ+22, EOQ+23! |
>> ASUV("EOQ" | EOQ+29*, EOQ+30*, EOQ+31, EOQ+34*, EOQ+35*, EOQ+36*, EOQ+37 |
>> ASUV("MO" | MIC+4*, MIC+10!, MMC+2, MMC+3, MMC+4, MMC+5, MMC+6 |
U | S+3, S+4, MI+4, MI+6, ASUSRIDX+4, ASUSRIDX+5, ASUSRIDX+6, ASUSRIDX+7, ASUSRIDX+8, ASUSRIDX+9 , ASUSRIDX+10, ASUSRIDX+11, ASUSRIDX+12, ASUSRIDX+13, ASUSRIDX+14, ASUSRIDX+16, ASUSRIDX+17, ASUSRIDX+22, ASUSRIDX+23, ASUSRIDX+24 , ASUSRIDX+25, ASUSRIDX+26, ASUSRIDX+27, ASUSRIDX+28, ASUSRIDX+29, ASUSRIDX+30, ASUSRIDX+31, ASUSRIDX+32, ASUSRIDX+33, ASUSRIDX+34 , ASUSRIDX+35, ASUSRIDX+38, ASUSRIDX+39, ASUSRIDX+40, ASUSRIDX+41, ASUSRIDX+42, ASUSRIDX+43, ASUSRIDX+45, ASUSRIDX+46, ASUSRIDX+47 , ASUSRIDX+48, ASUSRIDX+49, ASUSRIDX+50, ASUSRIDX+51, ASUSRIDX+52, ASUSRIDX+53, EOQ+1, EOQ+5, EOQ+13, EOQ+14 , EOQ+15, EOQ+18, EOQ+19, MMC+3, MMC+5, MEXP+5, MEXP+6, MEXP+7, MEXP+12, MEXP+15 |
X | ASUSRIDX+7~*, ASUSRIDX+39~*, EOQ+40~*, MIC+5~, MEXP+1~, MEXP+4*, MEXP+7, MEXP+9*, MEXP+10*, MEXP+11 , MEXP+12, MEXP+13, MEXP+14*, MEXP+15*, READ~, READ+3 |
>> X1 | MIC+5* |
>> X2 | MIC+5* |
Y | S+2*, EOQ+8, EOQ+40*, MEXP+1~, MEXP+5*, MEXP+6, MEXP+7, MEXP+9*, MEXP+11, MEXP+12* , MEXP+13*, MEXP+14*, MEXP+15*, MEXP+16 |