VENT.GET
* Get data from inventory screen
SET COLON OFF
? CHR(27)+"U"+'"'
@  3, 9 GET isbn
@  5,12 GET title
@  7,12 GET author
@  9,15 GET publish
@ 11,12 GET vendor
@ 13, 9 GET price PICTURE '9999.99'
@ 15, 9 GET onhand
@ 17,12 GET cat:loc
@ 19, 9 GET type
@ 15,33 GET tbo
@ 17,33 GET on:ord
@ 19,33 GET misc
@ 12,63 GET currmo
@ 13,63 GET pastmo
@ 14,63 GET curryr
@ 15,63 GET pastyr
@ 18,63 GET ldsold
@ 19,63 GET linvdate
? CHR(27)+"U"+" "
SET COLON ON









TO oct