>I didn't see where You definne some variables, may be thay are PUBLIC but?
The Variables are defined as public in the page init method. INVCOUNT is the only table.
TEMPUPC and TEMPLOC are blank until the proper type is scanned in. ie. scan a location barcode and then scan the barcodes of everything there. keeping the TEMPLOC value until the next location barcode is scanned.

>
>

>CNTTEMP=This.Value
>* This says where the product is
>If Left(CNTTEMP,1)="*"
>    TEMPLOC=Substr(CNTTEMP,2)
>Else
>    * this it to change quantity by more than one at a time
>    If Left(CNTTEMP,1)="#"
>        TEMPCOUNT=Val(Substr(CNTTEMP,2))
>**********************************************************************************************
>        Seek TEMPUPC Order Tag CUPC In INVCOUNT  && WHAT IS THE VALUE OF TEMPUPC? FROM WHERE?
>**********************************************************************************************
>        If Found()
>            Replace INVCOUNT.NCOUNT With INVCOUNT.NCOUNT+TEMPCOUNT In INVCOUNT
>        Endif
>    Else
>        * this is the product UPC code
>        TEMPUPC=CNTTEMP
>**********************************************************************************************
>        Locate For TEMPLOC=INVCOUNT.CLOCATION While TEMPUPC = INVCOUNT.CUPC && WHAT IS VALUE OF TEMPLOC, I see it is sttored ONLY IF Left(CNTTEMP,1)="*"
>**********************************************************************************************
>        If Found()
>            Replace INVCOUNT.NCOUNT With INVCOUNT.NCOUNT+1 In INVCOUNT
>        Else
>            Append Blank In INVCOUNT
>            Replace INVCOUNT.CLOCATION With TEMPLOC
>            Replace INVCOUNT.CUPC With TEMPUPC
>            Replace INVCOUNT.NCOUNT With 1
>        Endif
>    Endif
>Endif
>CNTTEMP=""
>Thisform.Refresh
>