ASU3IUPD ; IHS/ITSC/LMH -POST REPLENISHMENT ISS TRANS ;
Source file <ASU3IUPD.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MSUNCST(X,Y) | ;EP; -Calculate Unit cost for issue from Station Master QTY & VAL
|
|
SETMOIS | ;EP;
|
|
RVIS | ;EP ;REVERSAL ISSUE
|
|
UPDATE | ;EP;
|
|
BKORDR(Q) | ;CREATE ISSUE BACKORDER
|
|
UCSVAL(Z,X,Y) | ;EP
|
|
TXFIS | ;EP ;TRANSFER ISSUE
|
|
EXIT | ;
|
|
FILLSTAT(X) | ;EP ;CALCULATE FILL STATUS (F=FULL, P=PART, N=NONE)
; X=Quantity Requested |
Name | Field # of Occurrence |
---|---|
SPQ^ASU3ISQA | FILLSTAT+33 |
PSTKL^ASUCOKIL | EXIT+2 |
QTY^ASUJCLER | FILLSTAT+12, FILLSTAT+19, FILLSTAT+46, FILLSTAT+58, FILLSTAT+65 |
VAL^ASUJCLER | FILLSTAT+58, FILLSTAT+65, FILLSTAT+73 |
HLP^ASUJHELP | FILLSTAT+12, FILLSTAT+19, FILLSTAT+35, FILLSTAT+45, FILLSTAT+55, FILLSTAT+63, BKORDR+4, BKORDR+6, BKORDR+15, BKORDR+17 , BKORDR+26, BKORDR+28, BKORDR+30 |
^ASUJHIST | UPDATE+5 |
FPN^ASUJSAVE | FILLSTAT+12, FILLSTAT+19, FILLSTAT+78 |
QTYI^ASUJSAVE | FILLSTAT+12, FILLSTAT+19 |
EN^ASUJVALD | FILLSTAT+80 |
VAL^ASUJVALF | FILLSTAT+77 |
IDX^ASUMBOIO | BKORDR+21 |
IDXADD^ASUMBOIO | BKORDR+24 |
READBO^ASUMBOIO | BKORDR+32 |
REQ^ASUMBOIO | BKORDR+10 |
REQADD^ASUMBOIO | BKORDR+13 |
UPDTBO^ASUMBOIO | BKORDR+47 |
^ASUMKBPS | ASU3IUPD+5, RVIS+4 |
^ASUMSTWR | UPDATE+3 |
^ASUMYDPS | ASU3IUPD+5, RVIS+4 |
START^ASUUY2K | SETMOIS+9 |
PUT^DDSVALF | BKORDR+33, BKORDR+45 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Name | Line Occurrences |
---|---|
BKORDR | FILLSTAT+57, FILLSTAT+64 |
EXIT | ASU3IUPD+6 |
MSUNCST | FILLSTAT+22, FILLSTAT+26, FILLSTAT+29, FILLSTAT+75 |
SETMOIS | ASU3IUPD+5, RVIS+3 |
UCSVAL | MSUNCST+1, BKORDR+18 |
UPDATE | ASU3IUPD+5, RVIS+3, TXFIS+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> ASU("DA CNT" | EXIT+2 |
>> ASUF("ERR" | FILLSTAT+5*, FILLSTAT+10*, FILLSTAT+17*, FILLSTAT+44*, FILLSTAT+53*, FILLSTAT+58, FILLSTAT+64*, FILLSTAT+65, BKORDR+4*, BKORDR+6* , BKORDR+8*, BKORDR+11, BKORDR+15*, BKORDR+17*, BKORDR+26*, BKORDR+28*, BKORDR+30* |
>> ASUF("SV" | ASU3IUPD+5*, RVIS+3*, EXIT+2! |
>> ASUHDA | FILLSTAT+76 |
>> ASUK("DT" | BKORDR+34 |
>> ASUM("ERR" | BKORDR+22 |
>> ASUMB("DT" | BKORDR+34* |
>> ASUMB("DTPS" | BKORDR+34* |
>> ASUMB("E#" | BKORDR+7*, BKORDR+10, BKORDR+13, BKORDR+15, BKORDR+17, BKORDR+21, BKORDR+24, BKORDR+26, BKORDR+28 |
>> ASUMB("QTYB/O" | BKORDR+18* |
>> ASUMB("QTYISS" | BKORDR+20* |
>> ASUMB("UCS" | UCSVAL+7*, BKORDR+18* |
>> ASUMB("VAL" | BKORDR+18* |
>> ASUMB("VOU" | BKORDR+37*, BKORDR+39*, BKORDR+44*, BKORDR+45 |
>> ASUMS("D/O" | FILLSTAT+59*, FILLSTAT+67* |
>> ASUMS("DMD" | SETMOIS+14*, SETMOIS+16* |
>> ASUMS("LPP" | UCSVAL+5, UCSVAL+6 |
>> ASUMS("LSTISS" | SETMOIS+11* |
>> ASUMS("QTY" | UPDATE+2*, FILLSTAT+8, FILLSTAT+9, FILLSTAT+16, FILLSTAT+40, FILLSTAT+48, FILLSTAT+52, FILLSTAT+62, FILLSTAT+72, MSUNCST+2 , UCSVAL+4 |
>> ASUMS("VAL" | UPDATE+1*, MSUNCST+2, MSUNCST+3, UCSVAL+4 |
>> ASUS("ADD" | UPDATE+3*! |
>> ASUS("QTYAJ" | FILLSTAT+32*, FILLSTAT+36*, FILLSTAT+38* |
>> ASUSB | BKORDR+33, BKORDR+45 |
ASUT | ASU3IUPD+4, RVIS+2, EXIT+2!, TXFIS+2, SETMOIS+8, SETMOIS+13, SETMOIS+15, SETMOIS+16, UPDATE+1, UPDATE+2 , UPDATE+4, FILLSTAT+4, FILLSTAT+7, FILLSTAT+11, FILLSTAT+12, FILLSTAT+13, FILLSTAT+14, FILLSTAT+18, FILLSTAT+19, FILLSTAT+20 , FILLSTAT+21, FILLSTAT+22, FILLSTAT+24, FILLSTAT+25, FILLSTAT+26, FILLSTAT+28, FILLSTAT+29, FILLSTAT+31, FILLSTAT+32, FILLSTAT+33 , FILLSTAT+34, FILLSTAT+36, FILLSTAT+38, FILLSTAT+40, FILLSTAT+41, FILLSTAT+49, FILLSTAT+51, FILLSTAT+52, FILLSTAT+53, FILLSTAT+56 , FILLSTAT+58, FILLSTAT+60, FILLSTAT+62, FILLSTAT+66, FILLSTAT+68, FILLSTAT+69, FILLSTAT+70, FILLSTAT+71, FILLSTAT+73, FILLSTAT+75 , FILLSTAT+77, FILLSTAT+78, FILLSTAT+80, MSUNCST+1, MSUNCST+2, BKORDR+3, BKORDR+5, BKORDR+7, BKORDR+20, BKORDR+31 , BKORDR+34, BKORDR+35 |
ASUT( | ASU3IUPD+4, RVIS+2*, TXFIS+2*, SETMOIS+8, SETMOIS+13, SETMOIS+15*, SETMOIS+16, UPDATE+1, UPDATE+2, UPDATE+4* , FILLSTAT+4*, FILLSTAT+7, FILLSTAT+11*, FILLSTAT+12, FILLSTAT+13*, FILLSTAT+14*, FILLSTAT+18*, FILLSTAT+19, FILLSTAT+20*, FILLSTAT+21 , FILLSTAT+22*, FILLSTAT+24, FILLSTAT+25, FILLSTAT+26*, FILLSTAT+28*, FILLSTAT+29*, FILLSTAT+31, FILLSTAT+32*, FILLSTAT+33*, FILLSTAT+34 , FILLSTAT+36*, FILLSTAT+38*, FILLSTAT+40, FILLSTAT+41*, FILLSTAT+49*, FILLSTAT+51*, FILLSTAT+52*, FILLSTAT+53, FILLSTAT+56, FILLSTAT+58* , FILLSTAT+60, FILLSTAT+62*, FILLSTAT+66*, FILLSTAT+68*, FILLSTAT+69*, FILLSTAT+70*, FILLSTAT+71*, FILLSTAT+73*, FILLSTAT+75*, FILLSTAT+77 , FILLSTAT+78, FILLSTAT+80, MSUNCST+1, MSUNCST+2, BKORDR+3, BKORDR+5, BKORDR+7, BKORDR+20, BKORDR+31*, BKORDR+34 , BKORDR+35 |
ASUT("TRCD" | RVIS+4, SETMOIS+7, FILLSTAT+2, FILLSTAT+43, FILLSTAT+79, UCSVAL+5, UCSVAL+6, BKORDR+18* |
>> ASUV("CST/U" | FILLSTAT+59* |
>> ASUV("DDSREFT" | TXFIS+3, SETMOIS+1 |
ASUVAL | BKORDR+18, BKORDR+19! |
>> ASUVOU | BKORDR+30 |
ASUVQBO | BKORDR+2*, BKORDR+18, BKORDR+19! |
ASUVUCS | BKORDR+18, BKORDR+19! |
>> DA | FILLSTAT+76* |
>> DDSERROR | ASU3IUPD+4, RVIS+1, TXFIS+1, FILLSTAT+10*, FILLSTAT+17*, FILLSTAT+44*, FILLSTAT+77*, FILLSTAT+80* |
>> DDSREFT | TXFIS+3*, SETMOIS+1* |
Q | FILLSTAT+57~*, FILLSTAT+59, FILLSTAT+64~*, FILLSTAT+67, BKORDR~, BKORDR+2, BKORDR+33, BKORDR+45 |
U | SETMOIS+9 |
V | BKORDR+35~*, BKORDR+36, BKORDR+37, BKORDR+39, BKORDR+46 |
V("#" | BKORDR+37*, BKORDR+39*, BKORDR+40, BKORDR+41*, BKORDR+43*, BKORDR+44 |
X | SETMOIS+2~, SETMOIS+8*, SETMOIS+9, SETMOIS+10*, SETMOIS+11, SETMOIS+13*, SETMOIS+14, SETMOIS+16, FILLSTAT~, FILLSTAT+8 , FILLSTAT+9, FILLSTAT+10, FILLSTAT+16, FILLSTAT+17, FILLSTAT+22, FILLSTAT+28, FILLSTAT+56*, FILLSTAT+57, FILLSTAT+62*, FILLSTAT+63 , FILLSTAT+64, MSUNCST~, MSUNCST+1, UCSVAL~, UCSVAL+4*, UCSVAL+5*, UCSVAL+6*, UCSVAL+7, BKORDR+31* |
Y | SETMOIS+10, SETMOIS+13*, SETMOIS+14, SETMOIS+16, FILLSTAT+22*, FILLSTAT+26*, FILLSTAT+29*, FILLSTAT+33*, FILLSTAT+75*, MSUNCST~ , MSUNCST+1, MSUNCST+2*, MSUNCST+3*, UCSVAL~, UCSVAL+7*, BKORDR+11, BKORDR+12, BKORDR+14, BKORDR+15, BKORDR+17 , BKORDR+22, BKORDR+23, BKORDR+25, BKORDR+26, BKORDR+28 |
Z | FILLSTAT+3~, FILLSTAT+10*, FILLSTAT+12, FILLSTAT+17*, FILLSTAT+19, FILLSTAT+22*, FILLSTAT+26*, FILLSTAT+29*, FILLSTAT+33*, FILLSTAT+35* , FILLSTAT+45*, FILLSTAT+55*, FILLSTAT+63*, FILLSTAT+75*, FILLSTAT+77*, FILLSTAT+78*, FILLSTAT+80*, MSUNCST+1~*, UCSVAL~, UCSVAL+7 , BKORDR+4*, BKORDR+6*, BKORDR+14~, BKORDR+15*, BKORDR+17*, BKORDR+18~, BKORDR+22~, BKORDR+26*, BKORDR+28*, BKORDR+30* |
Z(0 | BKORDR+18* |