Xerox 96MX manual Source statement 1STFRM.FSL, 000500

						CODING A COMPLEX FORM
					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

XEROX DOCUPRINT 96/DOCUPRINT 96MX LPS FORMS CREATION GUIDE 6-9