CLEAR
SET TALK OFF
YES="Y"
USE cd
DO WHILE YES="Y"
ITEM_ID1=0
ISSN1=SPACE(20)
DESCRIPTION1=SPACE(20)
@7,75,38,170 box
@4,114 SAY "CD DETAIL"
@4.9,112 SAY "______________"
@10,95 SAY "ENTER ITEM ID " GET ITEM_ID1
@12,95 SAY "ENTER ISSN " GET ISSN1
@14,95 SAY "ENTER DESCRIPTION...
CLEAR
SET TALK OFF
YES="Y"
USE chair_tb
DO WHILE YES="Y"
chair_no1=SPACE(20)
chair_height1=SPACE(20)
chair_buy_date1=SPACE(20)
@7,75,38,170 box
@4,110 SAY "chair description"
@4.9,108 SAY "_____________________"
@8,95 SAY "Chair Number : " GET chair_no1
chair_no2 =...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.