SAMPLE FORM CREATION

Figure C-12.Source statement (1STFRM.FSL)

FDL VERSION B03

13:13

30-APR-XX

PAGE 1

 

DISK-ID:

ARIEL

VX.7

R9.7 REL #5

XX/XX/XX

 

1

FORM 1STFRM;

 

 

 

000010

2

GRID FMT1;

 

 

 

 

000020

3

FONTS UN114A,UN106A,UN104C; COMMENT ***DRAW HOR LINES***;

000030

4

AT 7 DRAW 18 LINES FROM 0 TO 132 USING HAI AND REPEAT EVE 3;

000040

5

AT 8 DRAW 18 LINES FROM 0 TO 24 USING HAI AND REPEAT EVE 3;

000050

6

AT 9 DRAW 18 LINES FROM 0 TO 24 USING HAI AND REPEAT EVE 3;

000060

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 SOL HAI

000200

21

INK ©BLUE©

AND FILL USING INK ©XEROX.PICTORIAL.PALE BLUE©

000210

22

AND REPEAT

VER EVE 6;

 

000220

23

COMMENT *** TEXT AT COMMAND ***;

000230

24

TEXT USING

FONT

2

AT 2,2.5 ©COMP.©;

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

INK ©BLUE© 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 4050/4090/4450/4650 LPS FORMS CREATION GUIDE

C-7

Page 79
Image 79
Xerox 4650, 4450 manual Figure C-12.Source statement 1STFRM.FSL