Dec 062017
 
Point of Sale system written in DBASE, with source code.
File PTOFSALE.ZIP from The Programmer’s Corner in
Category Dbase Source Code
Point of Sale system written in DBASE, with source code.
File Name File Size Zip Size Zip Type
DATADICT.DOC 15158 2442 deflated
DISP_MSG.PRG 1888 644 deflated
FILMS.DBF 19805 3822 deflated
GET_OPTN.PRG 1360 574 deflated
HELP.PRG 2441 871 deflated
INITARAY.PRG 1306 465 deflated
NAMES.DBF 7345 1532 deflated
NDXSUMRY.DOC 2956 494 deflated
NEWCUST.PRG 1701 726 deflated
PRINTCHK.PRG 2023 688 deflated
QUEPLACE.PRG 1482 698 deflated
RNTDEL.PRG 2989 918 deflated
RNTHLP.PRG 1529 647 deflated
RNTMNU.PRG 2812 851 deflated
RNTPRT.PRG 18864 4025 deflated
RNTRSRV.PRG 2433 992 deflated
RRNT.PRG 6278 1778 deflated
SELLEM.PRG 1090 510 deflated
STATS.DOC 1756 551 deflated
TAPESELL.PRG 3055 1050 deflated
TAPRNT.PRG 3804 1296 deflated
TAPSRCH.PRG 4692 1495 deflated
TESTRENT.PRG 10674 3162 deflated
TREE.DOC 1233 399 deflated
VCRGAME.PRG 1675 711 deflated
VIDSETUP.DBF 1530 326 deflated
VIDUDF.PRG 10482 3123 deflated
XREF.DOC 28683 6358 deflated

Download File PTOFSALE.ZIP Here

Contents of the DATADICT.DOC file


System: RIALTO CINEMA VIDEO P.O.S. PROGRAM
Author: SCOTT BAXTER
11/09/88 17:29:39
Database Structure Summary

-------------------------------------------------------------------------------

7 databases in the system
NAMES.DBF
FILMS.DBF
MERCH.DBF
TEMPLINE.DBF
VIDSETUP.DBF
RENTLINE.DBF
QUE.DBF
-------------------------------------------------------------------------------

Structure for database : NAMES.DBF Alias: CUST
Number of data records : 34
Last updated : 11/08/88 at 10:15
Field Field name Type Width Dec Start End
1 ADDRESS Character 40 1 40
2 CITY Character 15 41 55
3 COMMENTS Character 50 56 105
4 BIG10 Numeric 2 106 107
5 YTDRENTS Numeric 5 108 112
6 FNAME Character 15 113 127
7 LNAME Character 15 128 142
8 MEMNUM Character 5 143 147
9 PHONE Character 14 148 161
10 SSN Character 11 162 172
11 ST Character 2 173 174
12 ZIP Character 10 175 184
13 INVNUM Character 12 185 196
** Total ** 197


This database appears to be associated with index file(s):
: MEMNUM.NDX (memnum)
: NAMES.NDX (UPPER(lname))
: LASTRENT.NDX (invnum)

Used by: TESTRENT.PRG

-------------------------------------------------------------------------------


Structure for database : FILMS.DBF Alias: TAPES
Number of data records : 100
Last updated : 11/08/88 at 10:18
Field Field name Type Width Dec Start End
1 FILMNAME Character 45 1 45
2 FILMRATE Character 4 46 49
3 FILMCAT Character 20 50 69
4 LIBNUM Character 5 70 74
5 COPY_NUM Character 2 75 76
6 FILMRENT Numeric 5 2 77 81
7 DATEBOT Date 8 82 89
8 YTDRENTS Numeric 3 90 92
9 YTDBUCKS Numeric 9 2 93 101
10 REQ Logical 1 102 102
11 IN_OR_OUT Logical 1 103 103
12 NUMTAPES Numeric 1 104 104
13 COMMENTS Character 80 105 184
14 OUTOFTOWN Logical 1 185 185
15 SALEPRICE Numeric 5 2 186 190
** Total ** 191


This database appears to be associated with index file(s):
: FILMNAME.NDX (SUBSTR(filmname,1,20))
: LIB.NDX (libnum+copy_num)

Used by: TESTRENT.PRG

-------------------------------------------------------------------------------


Structure for database : MERCH.DBF Alias: MERCH
Number of data records : 14
Last updated : 10/07/88 at 0:09
Field Field name Type Width Dec Start End
1 BUY_LEVEL Numeric 3 1 3
2 COST Numeric 6 2 4 9
3 DESC Character 40 10 49
4 IDNUM Character 7 50 56
5 MRCHPRICE Numeric 6 2 57 62
6 SERNUM Character 20 63 82
7 STOCK Numeric 3 83 85
8 YTDSOLD Numeric 5 86 90
9 VCRINOUT Logical 1 91 91
** Total ** 92


This database appears to be associated with index file(s):
: IDNUM.NDX (idnum)

Used by: TESTRENT.PRG

-------------------------------------------------------------------------------


Structure for database : TEMPLINE.DBF Alias: TMP
Number of data records : 9
Last updated : 11/08/88 at 10:18
Field Field name Type Width Dec Start End
1 DSC Character 20 1 20
2 PARTNUM Character 7 21 27
3 INVNUM Character 12 28 39
4 QUANT Numeric 2 40 41
5 PRICE Numeric 5 2 42 46
6 XPRICE Numeric 5 2 47 51
7 RETDATE Date 8 52 59
8 PARTTYPE Character 1 60 60
9 DAYS Numeric 1 61 61
10 MEMNUM Character 5 62 66
11 ISPROMO Logical 1 67 67
12 ISBIG10 Logical 1 68 68
13 TXBL Logical 1 69 69
** Total ** 70


SNAP! did not find any associated index files

Used by: TESTRENT.PRG

-------------------------------------------------------------------------------


Structure for database : VIDSETUP.DBF Alias: PROMO
Number of data records : 1
Last updated : 10/18/88 at 18:47
Field Field name Type Width Dec Start End
1 BREAK1 Character 10 1 10
2 BREAK2 Character 10 11 20
3 BREAK3 Character 10 21 30
4 COUPBRK1 Character 10 31 40
5 COUPBRK2 Character 10 41 50
6 COUPBRK3 Character 10 51 60
7 COUPEXP1 Date 8 61 68
8 COUPEXP2 Date 8 69 76
9 COUPEXP3 Date 8 77 84
10 COUPVIDS1 Numeric 1 85 85
11 COUPVIDS2 Numeric 1 86 86
12 COUPVIDS3 Numeric 1 87 87
13 CTTAX Numeric 5 2 88 92
14 DAYPROMO1 Character 9 93 101
15 DAYPROMO2 Character 9 102 110
16 DAYPROMO3 Character 9 111 119
17 FULLPRICE Numeric 4 2 120 123
18 NUMTAPES1 Numeric 1 124 124
19 NUMTAPES2 Numeric 1 125 125
20 NUMTAPES3 Numeric 1 126 126
21 STTAX Numeric 5 2 127 131
22 TAXMERCH Logical 1 132 132
23 TAXTAPES Logical 1 133 133
24 VCRRENT Numeric 1 134 134
25 VCRPRICE Numeric 4 2 135 138
26 RENTBACK Character 5 139 143
27 LN1 Character 40 144 183
28 LN2 Character 40 184 223
29 RETBUCK Numeric 4 2 224 227
30 VIDNAME Character 40 228 267
** Total ** 268


SNAP! did not find any associated index files

Used by: TESTRENT.PRG

-------------------------------------------------------------------------------


Structure for database : RENTLINE.DBF Alias: DETAIL
Number of data records : 5
Last updated : 10/07/88 at 12:26
Field Field name Type Width Dec Start End
1 DSC Character 20 1 20
2 PARTNUM Character 7 21 27
3 INVNUM Character 12 28 39
4 QUANT Numeric 2 40 41
5 PRICE Numeric 5 2 42 46
6 XPRICE Character 6 47 52
7 RETDATE Date 8 53 60
8 PARTTYPE Character 1 61 61
9 DAYS Numeric 1 62 62
10 MEMNUM Character 5 63 67
11 ISPROMO Logical 1 68 68
12 ISBIG10 Logical 1 69 69
13 TXBL Logical 1 70 70
** Total ** 71


This database appears to be associated with index file(s):
: MEMLINE.NDX (memnum)
: LINEPART.NDX (partnum)

Used by: RRNT.PRG

-------------------------------------------------------------------------------


Structure for database : QUE.DBF Alias: QUELIST
Number of data records : 1
Last updated : 10/22/88 at 10:22
Field Field name Type Width Dec Start End
1 LIBVAL Character 5 1 5
2 RESDATE Date 8 6 13
3 RESTIME Character 8 14 21
4 MEMNUM Character 5 22 26
** Total ** 27


This database appears to be associated with index file(s):
: QUE.NDX (libval+DTOC(resdate)+restime)

Used by: QUEPLACE.PRG

-------------------------------------------------------------------------------




System: RIALTO CINEMA VIDEO P.O.S. PROGRAM
Author: SCOTT BAXTER
11/09/88 17:29:44
Data Dictionary

-------------------------------------------------------------------------------


Field Name Type Len Dec Database
ADDRESS C 40 0 NAMES.DBF
BIG10 N 2 0 NAMES.DBF
BREAK1 C 10 0 VIDSETUP.DBF
BREAK2 C 10 0 VIDSETUP.DBF
BREAK3 C 10 0 VIDSETUP.DBF
BUY_LEVEL N 3 0 MERCH.DBF
CITY C 15 0 NAMES.DBF
COMMENTS C 50 0 NAMES.DBF
COMMENTS C 80 0 FILMS.DBF
COPY_NUM C 2 0 FILMS.DBF
COST N 6 2 MERCH.DBF
COUPBRK1 C 10 0 VIDSETUP.DBF
COUPBRK2 C 10 0 VIDSETUP.DBF
COUPBRK3 C 10 0 VIDSETUP.DBF
COUPEXP1 D 8 0 VIDSETUP.DBF
COUPEXP2 D 8 0 VIDSETUP.DBF
COUPEXP3 D 8 0 VIDSETUP.DBF
COUPVIDS1 N 1 0 VIDSETUP.DBF
COUPVIDS2 N 1 0 VIDSETUP.DBF
COUPVIDS3 N 1 0 VIDSETUP.DBF
CTTAX N 5 2 VIDSETUP.DBF
DATEBOT D 8 0 FILMS.DBF
DAYPROMO1 C 9 0 VIDSETUP.DBF
DAYPROMO2 C 9 0 VIDSETUP.DBF
DAYPROMO3 C 9 0 VIDSETUP.DBF
DAYS N 1 0 TEMPLINE.DBF
RENTLINE.DBF
DESC C 40 0 MERCH.DBF
DSC C 20 0 RENTLINE.DBF
TEMPLINE.DBF
FILMCAT C 20 0 FILMS.DBF
FILMNAME C 45 0 FILMS.DBF
FILMRATE C 4 0 FILMS.DBF
FILMRENT N 5 2 FILMS.DBF
FNAME C 15 0 NAMES.DBF
FULLPRICE N 4 2 VIDSETUP.DBF
IDNUM C 7 0 MERCH.DBF
INVNUM C 12 0 NAMES.DBF
TEMPLINE.DBF
RENTLINE.DBF
IN_OR_OUT L 1 0 FILMS.DBF
ISBIG10 L 1 0 TEMPLINE.DBF
RENTLINE.DBF
ISPROMO L 1 0 TEMPLINE.DBF

RENTLINE.DBF
LIBNUM C 5 0 FILMS.DBF
LIBVAL C 5 0 QUE.DBF
LN1 C 40 0 VIDSETUP.DBF
LN2 C 40 0 VIDSETUP.DBF
LNAME C 15 0 NAMES.DBF
MEMNUM C 5 0 RENTLINE.DBF
TEMPLINE.DBF
QUE.DBF
NAMES.DBF
MRCHPRICE N 6 2 MERCH.DBF
NUMTAPES N 1 0 FILMS.DBF
NUMTAPES1 N 1 0 VIDSETUP.DBF
NUMTAPES2 N 1 0 VIDSETUP.DBF
NUMTAPES3 N 1 0 VIDSETUP.DBF
OUTOFTOWN L 1 0 FILMS.DBF
PARTNUM C 7 0 TEMPLINE.DBF
RENTLINE.DBF
PARTTYPE C 1 0 TEMPLINE.DBF
RENTLINE.DBF
PHONE C 14 0 NAMES.DBF
PRICE N 5 2 TEMPLINE.DBF
RENTLINE.DBF
QUANT N 2 0 TEMPLINE.DBF
RENTLINE.DBF
RENTBACK C 5 0 VIDSETUP.DBF
REQ L 1 0 FILMS.DBF
RESDATE D 8 0 QUE.DBF
RESTIME C 8 0 QUE.DBF
RETBUCK N 4 2 VIDSETUP.DBF
RETDATE D 8 0 TEMPLINE.DBF
RENTLINE.DBF
SALEPRICE N 5 2 FILMS.DBF
SERNUM C 20 0 MERCH.DBF
SSN C 11 0 NAMES.DBF
ST C 2 0 NAMES.DBF
STOCK N 3 0 MERCH.DBF
STTAX N 5 2 VIDSETUP.DBF
TAXMERCH L 1 0 VIDSETUP.DBF
TAXTAPES L 1 0 VIDSETUP.DBF
TXBL L 1 0 TEMPLINE.DBF
RENTLINE.DBF
VCRINOUT L 1 0 MERCH.DBF
VCRPRICE N 4 2 VIDSETUP.DBF
VCRRENT N 1 0 VIDSETUP.DBF
VIDNAME C 40 0 VIDSETUP.DBF
XPRICE C 6 0 RENTLINE.DBF
XPRICE N 5 2 TEMPLINE.DBF
YTDBUCKS N 9 2 FILMS.DBF
YTDRENTS N 3 0 FILMS.DBF
YTDRENTS N 5 0 NAMES.DBF
YTDSOLD N 5 0 MERCH.DBF
ZIP C 10 0 NAMES.DBF

-------------------------------------------------------------------------------


 December 6, 2017  Add comments

Leave a Reply