*this checks for allowable units
set talk off
go top
do while .not.eof()
    do case
    case unit='               '.or.unit='tiya'
        skip
    case unit='bags'.or.unit='minibags'.or.unit='mangalas'
        skip
    case unit='tubers'.or.unit='baskets'.or.unit='packets'
        skip
    case unit='tins'.or.unit='bundles'.or.unit='kwarya'
        skip
    otherwise
        display village, item, quantity, unit
        skip
    endcase
enddo
set talk on