TCL – Change Inventory Status Examples

First go to TCL (go to the main menu and type in TCL) and enter the following commands:

:SELECT INVENTORY WITH MFR “3M”

>SL  3M

:GL 3M

>SET-ATTRIBUTE

Name of File?  INVENTORY

Attribute to change?  8

Enter Value?

Enter Sub Value?

Attribute to place in the filed?  I

Are you sure you want to replace all attributes with I?  “Y” <enter>

:GL 3M

>SELECT INVENTORY.LOC WITH QOH > “0”

> SET-ATTRIBUTE

Name of File?  INVENTORY

Attribute to change?  8

Enter Value?

Enter Sub Value?

Attribute to place in the filed?  A

Are you sure you want to replace all attributes with A?  “Y” <enter>

Type <M> to return to the main menu.

This process changed all 3M parts in the inventory file to inactive. We then changed all parts that have a positive QOH back to active. You can do this for any part line by changing the mfr code from “3M” to whatever the prefix is for the part numbers in the line.

After you are done Rebuild Part Number (5.6.6) and Group Code (5.6.7) Indexes.

Another example:

Do this once:

:SSELECT INV WITH MFR = "PPG" BY PART

>SL PPG

Do the following for every part range you want to select:

:GL PPG

>SELECT INV WITH PART >= "D100" AND WITH PART <= "D999"

>SET-ATTRIBUTE

Enter Name of File : INVENTORY

Attr(s) (Separated by Commas) to be Changed (Up to 20) : 8

Enter value number :

Enter subvalue number :

Value to Put into Attribute I

Confirm that you want to Replace the Data in this Attribute With I (Y) Y

After you are done Rebuild Part Number (5.6.6) and Group Code (5.6.7) Indexes.