|VENDORC ¹pPUBLISHCÃpSTREETCápTOWNCÿpSTATECqZIPCqACCTNUMC%q INGRAM INGRAM NASHVILLE TN RANDOM RANDOM HOUSE SECAUCUS NJ SIMON SIMON & SCHUSTE POCKET POCKET BOOKS ACE ACE - BERKLEY JOVE JOVE - BERKLEY PRENTICE PRENTICE HALL DOUBLE DOUBLEDAY & CO HARPER HARPER & ROW AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAA HOUGHTON HOUGHTON MIFFLIN VIKING VIKING PENGUIN CO WORKMAN WORKMAN c/o GEO. BANTA CO ' ' TO vvendor STORE ' ' TO vvpublish STORE ' ' TO vvstreet STORE ' ' TO vvtown STORE ' ' TO vvstate STORE ' ' TO vvzip STORE ' ' TO vvacctnum SET CONSOLE ON * Set up screen & get data * DO VENDADD.GET @ 23, 1 SAY ' ' @ 22, 5 SAY 'ENTER A