Filter
Top Products
CODING A COMPLEX FORM
XEROX DOCUPRINT 96/DOCUPRINT 96MX LPS FORMS CREATION GUIDE 6-9
Figure 6-10. Source statement (1STFRM.FSL)
FDL VERSION B03 11:17 30-APR-XX PAGE 1
DISK-ID: ARIEL VX.7 R9.7 REL #6 XX/XX/XX
1 FORM 1STFRM; 000010
2 GRID FMT1; 000020
3 FONTS UN114A,UN106A,UN104C; 000030
4 COMMENT *** DRAW HORIZONTAL LINES ***; 000040
5 AT 7 DRAW 18 LINES FROM 0 TO 132 USING HAI AND REPEAT EVE 3; 000050
6 AT 8 DRAW 18 LINES FROM 0 TO 24 USING HAI AND REPEAT EVE 3; 000600
7 AT 9 DRAW 18 LINES FROM 0 TO 24 USING HAI AND REPEAT 000070
8 COMMENT *** DRAW VERTICAL LINES ***; 000080
9 AT 24 DRAW VER LINE FROM 5 TO 61 USING HAI; 000090
10 AT 32 DRAW 11 VER LINE FROM 5 TO 61 USING HAI AND REPEAT EVE 10; 000100
11 AT 29 DRAW VER LINE FROM 10 TO 61 USING BRO HAI; 000110
12 AT 38 DRAW 10 VER LINE FROM 10 TO 61 USI BRO HAI AND REPEAT EVE 10; 000120
13 AT 8 DRAW 18 VER LINE FROM 8 TO 9 USI HAI AND REPEAT VER EVE 3; 000130
14 AT 19 DRAW 18 VER LINE FROM 8 TO 9 USI HAI AND REPEAT VER EVE 3; 000140
15 COMMENT ***DRAW BOXES ***; 000150
16 AT 2,2 DRAW BOX 35 WIDE BY 2 HIGH USI HAIRLINE; 000160
17 AT 2,82 DRAW BOX 50 WIDE BY 2 HIGH USI HAI; 000170
18 AT 5,0 DRAW BOX 132 WIDE BY 56 HIGH USI HAI; 000180
19 AT 5.1,0 BOX 132 WIDE BY 1.8 HIGH USI SHADING; 000190
20 AT 10.1,0 DRAW 9 BOXES 132 WIDE BY 2.8 HIGH USI SHA MED 000200
22 AND REPEAT VER EVE 6; 000220
23 COMMENT *** TEXT AT COMMAND ***; 000240
25 TEXT USING FONT 2 AT 2,11 ’BR.’; 000250
26 TEXT USING FONT 2 AT 2,14 ’DEPT.’; 000260
27 TEXT USING FONT 2 AT 2,22 ’DATE’; 000270
28 TEXT USING FONT 2 AT 2,30 ’PP’; 000280
29 TEXT USING FONT 2 AT 2,34 ’PAGE’; 000290
30 TEXT USING FONT 1 AT 3,47 ’EARNINGS REGISTER’; 000300
31 TEXT USING FONT 2 AT 61,0 ’7860-143-1’; 000310
32 VER TEXT USING FONT 3 AT 66,-5 ’F8662’; 000320
33 COMMENT *** TEXT IN BOX COMMANDS ***; 000330
34 TEXT USI FONT 2 IN BOX 5.1,24 ’THIS PAY’ BOX ’REGULAR’ BOX ’OVERTIME’; 000340
35 TEXT USI FONT 2 IN BOX 7,0 ’NAME’ 000350
36 BOX ’GROSS’ ’ADJ. NET’ ’NET PAY’ 000360
37 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’ 000370
38 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’ 000380
39 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’ 000390
40 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’ 000400
41 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’ 000410
42 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’ 000420
43 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’ 000430
44 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’ 000440
45 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’ 000450
46 BOX ’UNITS-UNITS YTD’ ’CURRENT AMT.’ ’YTD AMOUNT’; 000460
47 TEXT USING FONT 2 IN BOX 8,19 ’EMP.##’; 000470
48 TEXT USING FONT 2 IN LEFT CENTER BOX 9,0 ’SAL/RATE’; 000480
49 TEXT USING FONT 2 IN BOX 9,0 ’GROSS YTD’; 000490
50 END; 000500