home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
database
/
rroutine.zip
/
RROUTINE.DOC
< prev
next >
Wrap
Text File
|
1988-07-16
|
7KB
|
464 lines
R&R ReportWriter Support Routines for Clipper Summer '87
By Eric Eisenhower
If you have any difficulty with this driver, please drop me a note at
the CONTECH BBS (301) 840-0227 ... (note that this number will change to
(301) 340-2212 soon) or DATA BIT BBS (703) 370-9832 or at home by
voice at (703) 866-1210.
PLEASE DISTRIBUTE FREELY
This is FREEWARE
This driver will permit you to read the rr.cnf file, to determine the printers
installed, and prompt for a printer by name and return a value appropriate for
the RI_PRINTER field of the rrunin.dbf job control file.
The enclosed sample prg will demonstrate how this works. You must first link
it, and COPY THE RR.CNF file into the current directory. The assembler routines
are included for your edification, and for further enhancement. Please
post your updates to either of the above boards, so that I may benefit too.
To run the demo,
LINK /SE:1024 RRTEST+RROUTINES,,CLIPPER;
RRTEST
Dump of RR.CNF, configuration file for R&R version 3A
Each record starts with a 2 byte record code, followed by a 2 byte length
ff ff 02 00
07 00
0f 00 24 00
9a 00 00 00 c3 01 ........ $.......
00 00 c9 02 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
00 00 00 00 00 00 00 00 00 00 37 04 00 00
03 00 ........ ..7.....
01 00
00
* 00= dBASE memo editor
* 01= ASCII memo editor
04 00 01 00
0a
* 0a= fast color
* 08= fast b&w
* 03= slow color
* 02= slow b&w
* 07= monochrome
05 00 12 00
00 1f 00 17 ........ ........
00 71 00 16 00 1e 00 71 00 1f 00 c0 00 06
06 00 .q.....q ........
12 00
50 00 6e 00 05 00 05 00 00 00 06 00 01 00 ..P.n... ........
00 00 00 00
07 00 04 00
2e 2c 2c 00
08 00 03 00 ........ .,,.....
01 24 00
09 00 02 00
54 00
0a 00 02 00
46 00
0b .$.....T .....F..
00 01 00
00
* Default data directory
0c 00 01 00
00
* Default library directory
0d 00 03 00
65 3a 00 ........ .....e:.
* default work directory
0e 00 01 00
00
* Up to 3 chars, default file extension
10 00 01 00
01
* 01=no access during reporting
* 00= access during reporting
00 01 00 00
01 01 ........ ........
03 00
00 00 00
02 01 03 00
01 00 00
* 01 00 00 = Send line feeds
* 00 00 00 = NO don't send line feeds
03 01 01 00 ........ ........
ac
04 01 12 00
11 45 70 73 6f 6e 20 45 2f 46 2f ......Ep son E/F/
4a 2f 52 58 2f 4c 51
* 1 byte len, printer name
05 01 12 00
11 45 70 73 6f J/RX/LQ. ....Epso
6e 20 45 2f 46 2f 4a 2f 52 58 2f 4c 51
* 1 byte len, printer configuration
06 01 03 n E/F/J/ RX/LQ...
00
02 1b 40
* 1 byte len, printer reset codes
07 01 01 00
00
* 1 byte len, codes for end of report
08 01 03 00
02 1b 43 ...@.... .......C
* 1 byte len, codes for set form length
09 01 02 00
01 0c
* 1 byte len, form feed character
0a 01 03 00
02 1b 32
0b 01 03 ........ ....2...
00
02 1b 30
0c 01 04 00
03 1b 50 12
0d 01 04 00 ...0.... ..P.....
03 1b 4d 12
0e 01 02 00
01 0f
0f 01 01 00
00
10 ..M..... ........
01 01 00
00
11 01 03 00
02 1b 47
12 01 03 00
02 ........ ..G.....
1b 48
13 01 05 00
04 1b 2d 01 01
14 01 04 00
03 .H...... -.......
1b 2d 00
15 01 03 00
02 1b 34
16 01 03 00
02 1b .-...... .4......
35
17 01 01 00
0f
18 01 03 00
00 00 00
18 01 03 5....... ........
00
00 00 00
18 01 03 00
00 00 00
18 01 03 00
00 ........ ........
00 00
18 01 03 00
00 00 00
18 01 03 00
00 00 00 ........ ........
18 01 03 00
00 00 00
18 01 03 00
00 00 00
18 01 ........ ........
03 00
00 00 00
18 01 03 00
00 00 00
18 01 03 00 ........ ........
00 00 00
18 01 03 00
00 00 00
18 01 03 00
00 00 ........ ........
00
18 01 03 00
00 00 00
18 01 03 00
00 00 00
19 ........ ........
01 00 00
00 01 00 00
01 01 03 00
00 00 00
02 01 ........ ........
03 00
01 00 00
03 01 01 00
00
04 01 10 00
0f 47 ........ .......G
65 6e 65 72 69 63 20 70 72 69 6e 74 65 72
05 01 eneric p rinter..
10 00
0f 47 65 6e 65 72 69 63 20 70 72 69 6e 74 ...Gener ic print
65 72
06 01 01 00
00
07 01 01 00
00
08 01 01 00 er...... ........
00
09 01 01 00
00
0a 01 01 00
00
0b 01 01 00
00 ........ ........
0c 01 01 00
00
0d 01 01 00
00
0e 01 01 00
00
0f ........ ........
01 01 00
00
10 01 01 00
00
11 01 01 00
00
12 01 ........ ........
01 00
00
13 01 01 00
00
14 01 01 00
00
15 01 01 ........ ........
00
00
16 01 01 00
00
17 01 01 00
0f
18 01 03 00 ........ ........
00 00 00
18 01 03 00
00 00 00
18 01 03 00
00 00 ........ ........
00
18 01 03 00
00 00 00
18 01 03 00
00 00 00
18 ........ ........
01 03 00
00 00 00
18 01 03 00
00 00 00
18 01 03 ........ ........
00
00 00 00
18 01 03 00
00 00 00
18 01 03 00
00 ........ ........
00 00
18 01 03 00
00 00 00
18 01 03 00
00 00 00 ........ ........
18 01 03 00
00 00 00
18 01 03 00
00 00 00
18 01 ........ ........
03 00
00 00 00
19 01 00 00
00 01 00 00
01 01 03 ........ ........
00
00 00 00
02 01 03 00
01 00 00
03 01 01 00
a6 ........ ........
04 01 15 00
14 48 50 20 4c 61 73 65 72 4a 65 74 .....HP LaserJet
20 35 30 30 2f 2b 2f 49 49
05 01 15 00
14 48 50 500/+/I I.....HP
20 4c 61 73 65 72 4a 65 74 20 35 30 30 2f 2b 2f LaserJe t 500/+/
49 49
06 01 03 00
02 1b 45
07 01 01 00
00
08 01 II...... E.......
01 00
00
09 01 01 00
00
0a 01 0b 00
0a 1b 22 26 ........ ......"&
6c 37 2e 32 37 43 22
0b 01 0b 00
0a 1b 22 26 6c l7.27C". ....."&l
35 2e 34 35 43 22
0c 01 07 00
06 1b 28 73 31 30 5.45C".. ....(s10
48
0d 01 07 00
06 1b 28 73 31 32 48
0e 01 09 00 H......( s12H....
08 1b 28 73 31 36 2e 36 48
0f 01 10 00
0f 1b 26 ..(s16.6 H......&
6c 31 4f 1b 22 26 6c 31 34 63 31 45 22
10 01 06 l1O."&l1 4c1E"...
00
05 1b 26 6c
30 4f
11 01 06 00
05 1b 28 73 33 ...&l0O. .....(s3
42
12 01 06 00
05 1b 28 73 30 42
13 01 05 00
04 B......( s0B.....
1b 26 64 44
14 01 05 00
04 1b 26 64 40
15 01 06 .&dD.... ..&d@...
00
05 1b 28 73 31 53
16 01 06 00
05 1b 28 73 30 ...(s1S. .....(s0
53
17 01 01 00
0f
18 01 03 00 00 00 00 18 01 03 S....... ........
00 00 00 00 18 01 03 00 00 00 00 18 01 03 00 00 ........ ........
00 00 18 01 03 00 00 00 00 18 01 03 00 00 00 00 ........ ........
18 01 03 00 00 00 00 18 01 03 00 00 00 00 18 01 ........ ........
03 00 00 00 00 18 01 03 00 00 00 00 18 01 03 00 ........ ........
00 00 00 18 01 03 00 00 00 00 18 01 03 00 00 00 ........ ........
00 18 01 03 00 00 00 00 18 01 03 00 00 00 00
19 ........ ........
01 00 00
02 00 00 00 .......