Global: ^ASUH

The date and time in fileman format that the Adjustment Transaction was entered followed by the job number of the job which created it.

1)= S ^ASUH("B",$E(X,1,30),DA)=""

2)= K ^ASUH("B",$E(X,1,30),DA)

Pointer to the ASUTBL AREA lookup table

Pointer to the ASUTBL STATION lookup table. Internal Entry number will be Area Accounting point concatenated to 3 digit station code (999 for 'PL')

1)= S ^ASUH("S",$E(X,1,30),DA)=""

2)= K ^ASUH("S",$E(X,1,30),DA)

Pointer to the ASUTBL ACCOUNT file for account code

Pointer to the Index Master file entry in which this item of supply's data is recorded

1)= S ^ASUH("I",$E(X,1,30),DA)=""

2)= K ^ASUH("I",$E(X,1,30),DA)

Person file pointer determined by DUZ at time of transaction entry

The date and time in fileman format that the Adjustment transaction was entered

1)= S ^ASUH("AD",$E(X,1,30),DA)=""

2)= K ^ASUH("AD",$E(X,1,30),DA)

Date transaction was posted to the SAMS database

1)= S ^ASUH("AC",$E(X,1,30),DA)=""

2)= K ^ASUH("AC",$E(X,1,30),DA)

1)= S ^ASUH("AX",$E(X,1,30),DA)=""

2)= K ^ASUH("AX",$E(X,1,30),DA)

Used to acces the file by date transaction was extracted for STORES database

Status flag will indicate the entry/posting/extract status of the transaction

1)= S ^ASUH("C",$E(X,1,30),DA)=""

2)= K ^ASUH("C",$E(X,1,30),DA)

Pointer to the accounting Sub-Sub Activity table ASUTBL SUB-SUB ACTIVITY

Pointer to the ASUTBL SOURCE lookup table Assigns Source (of purchase) information to this transaction.

Pointer to ASUTBL SUB STATION lookup table Indicates destination of supplies ordered

Pointer to ASUTBL USER lookup table for requestor of supplies

Pointer to ASUTBL REQUISITIONER lookup table.  Combination of Sub Station and User resulting in unique identification of requestor of supplies.

EOQ type is used to calculate the Economic Order Quantity for an item of supply

Pointer to ASUTBL STOCK SUB OBJECT lookup table Screened by Account Code.

Pointer to VENDOR file

Pointer to ASUTBL CATEGORY CODES lookup table Code assigns accounting information to the transaction

Set on if Value field is to be calculated by SAMS transaction posting routine

Station Master Index quantity after this transaction was posted.

Station Master Index value after this transaction was posted.

1)= S ^ASUH("AT",$E(X,1,30),DA)=""

2)= K ^ASUH("AT",$E(X,1,30),DA)

CLASSIFIES TRANSACTIONS BY TYPE

Code representing the type of transaction

1)= S ^ASUH("T",$E(X,1,30),DA)=""

2)= K ^ASUH("T",$E(X,1,30),DA)

1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^ASUH(D0,0)):^(0),1:"") S X=$P(Y(1),U,23),X=X S DIU=X K Y X ^DD(9002036,1,1,2,1.1) X ^DD(9002036,1,1,2,1.4)

1.1)= S X=DIV S X=DIV]"3A",Y(1)=X S X=-1,Y(2)=X S X=1,Y(3)=X S X=1,X=$S(Y(1):Y(2),Y(3):X)

1.4)= S DIH=$S($D(^ASUH(DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,23)=DIV,DIH=9002036,DIG=.23 D ^DICR:$O(^DD(DIH,DIG,1,0))>0

2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^ASUH(D0,0)):^(0),1:"") S X=$P(Y(1),U,23),X=X S DIU=X K Y X ^DD(9002036,1,1,2,2.1) X ^DD(9002036,1,1,2,2.4)

2.1)= S X=DIV X ^DD(9002036,1,1,2,59.2) S X=$S(Y(2):Y(3),Y(4):Y(5),Y(6):X)

2.4)= S DIH=$S($D(^ASUH(DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,23)=DIV,DIH=9002036,DIG=.23 D ^DICR:$O(^DD(DIH,DIG,1,0))>0

59.2)= S Y(1)=$S($D(^ASUH(D0,1)):^(1),1:"") S X=$P(Y(1),U,1)']"",Y(2)=X S X="",Y(3)=X S X=$P(Y(1),U,1)]"3A",Y(4)=X S X=-1,Y(5)=X S X=1,Y(6)=X S X=1

CREATE VALUE)= $S(#1]"3A":-1,1:1)

DELETE VALUE)= $S(#1']"":"",#1]"3A":-1,1:1)

FIELD)= TRCD

Accounting Point (also the internal entry number of ASUTBL AREA) for the IHS Area database to be adjusted

Station Code represents the IHS Station database to which the adjustment will be posted

Account is the code (also the internal entry number of ASUTBL ACCOUNT) assigned to the item of supply to be adjusted.

Index Number is a unique number associated with an item of supply.  It must pass the modulus 11 test.

If a quantity is entered, the quantity in the Station Master for the Index item of supply will be adjusted.

If a Value is entered, the Value field of the Station Master for the Index item of supply will be adjusted.

A voucher number identifies a group of associated transactions.  It consists of a 2 digit year (must be current to previous fiscal year) a 2 digit month and a 4 digit serial number separated by -.

1)= S ^ASUH("V",$E(X,1,30),DA)=""

2)= K ^ASUH("V",$E(X,1,30),DA)

Purchase Order number associated with the transaction

Date

Sub Sub Activity accounting code associated with this transaction from the ASUTBL SUB-SUB ACTIVITY pointer field

Set from ASUTBL SOURCE pointer field Assigns the Source (place purchased) for this transaction

Sub Station to which supplies will be shipped

Code assigned to users of supply based on ASUTBL USER lookup table

CAN will be determined by Requisitioner and Sub Sub Activity table lookups

1)= S ^ASUH("D",$E(X,1,30),DA)=""

2)= K ^ASUH("D",$E(X,1,30),DA)

Code from ASUTBL EOQ TYPE from pointer to that lookup table

Financial accounting Object Sub Object code to be used for this transaction based on lookup to table ASUTBL STOCK SUB OBJECT.

Quantity Received or Issued: F = Full P = Partial N = None

Flag for Post Posted issues and Due In related receipts/due ins

Categorize issues by Standard or Transfer

Scheduled or Unscheduled flag

Used to identify source of issue request - usually an issue book ID.

Identifies issues to Contract or Grant

May differ from Quantity Requested (field 6) if quantity was adjusted or was partially issued and back ordered.

Flag of issue transactions back ordered

Flag of issue quantities which were adjusted.  Could be to issue a Standard Pack Quantity or because a partial issue was made and the remainder was backordered.

Descriptive Name of an Index item of supply

The standard unit of issue for the Area

Standard NSN for those items which have one

Code from ASUTBL CATEGORY lookup table. Provides finance accounting information.

Code from ASUTBL STORAGE LOCATION lookup table.  Indicates special storage requirements.

Represents the expected shelf life of short shelf life items.  Used to modify the Economic Order Quantity calculation formula.

Report (R13). There may be one 'action' month for each quarter. the contents of the field will be: 1st digit - action month for first quarter - 1,2 or 3 2nd digit - action month for second quarter - 4,5 or 6 3rd digit -

action month for third quarter - 7,8 or 9 4-5 digits - action month for fourth quarter 10,11 or 12

The time (in months whole or half) expected to elapse between ordering and receiving the item

Represents inventory quantity which will trigger the item's appearance on the Requirements Analysis Report (R13).  The inventory quantity which should be sustained for the item.

The cost of one Vendor (Source) unit of this item.

The name of the Vendor from whom this item is usually purchased. It will normally be copied from a lookup on the Vendor file, but may be free text if no match is found on the Vendor file.

Unit of issue shipped by vendor.

Factor in formula determining the items appearance on the Requirements Analysis Report (R13).  If null, a standard formula is used, otherwise this field is substituted for the standard user level quantity in the formula.

The quantity in which the item is normally issued.