Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

FORM DEM4
ERROR 24
OUTPUT
RECORD

FIELD FILL41
PROTECTED
POS 1 1
VALUE "In  many  applications, both  technical and  commercial, input of"

FIELD FILL42
PROT
POS 2 1
VALUE "repetitive lines of data is required. Frequently, such data forms"

FIELD FILL43
POS 3 1
PROT
VALUE "an array larger than the depth of screen available, especially as"

FIELD FILL44
PROT
POS 4 1
VALUE "it is often tied to a static section of data which is also on the"

FIELD FILL45
PROT
POS 5 1
VALUE "screen.  A typical example is an invoice, with its header portion"

FIELD FILL46
PROT
POS 6 1
VALUE "and many line items."

FIELD FILL47
POS 7 10 
PROT
BOLD
WIDE
VALUE "TRAFFIC v4"

FIELD FILL48
PROT
POS 8 1
VALUE "allows  definition of a  scrolling field to  service exactly this"

FIELD FILL49
PROT
POS 9 1
VALUE "requirement.   Consider this preamble to be the header portion of "

FIELD FILL410
PROT
POS 10 1
VALUE "such a form. You may now enter upto 50 items in the 5 line window"

FIELD FILL411
PROT
POS 11 1
VALUE "which I have allowed.   Use PF1/PF2 to backspace, <cr> to finish."

FIELD DATE4
DATE CANADA
REQUIRED
SECTION 2
MULTIPLE 50 5
POS 14 4
T-POS 13 8
T-VAL "DATE"
HELP "Date of issue"

FIELD QTY4
SECTION 2
MULTIPLE 50 5
NUMERIC
REQUIRED
LENGTH 2
POS 14 15
FILL"_"
T-POS 13 14
T-VAL "QTY"
HELP "The quantity withdrawn from stock"

FIELD PARTNO4
SECTION 2
MULTIPLE 50 5
REQUIRED
ANY
ALLOW-LOWER
FILL "_"
LENGTH 12
POS 14 18
T-POS 13 18
T-VAL "PART NUMBER"
HELP "Enter the part number to which this line item refers"

FIELD DESC4
SECTION 2
MULTIPLE 50 5
ANY
ALLOW-LOWER
FILL "."
LENGTH 20
POS 14 34
T-POS 13 34
T-VAL "DESCRIPTION"

FIELD COST4
SECTION 2
MULTIPLE 50 5
REQUIRED
LENGTH 6
MONEY
POS 14 55
T-POS 13 55
T-VAL "  COST"
HELP "Enter the individual price per item"

FIELD INDX4
MULTIPLE 50 5
SECTION 2
INDEX
POS 14 1
PROT
T-POS 13 1
T-VAL "No"

!FIELD TOTAL4
!PROTECTED
!LENGTH 10
!MONEY
!POS 20 51
!T-POS 20 51
!T-VAL "TOTAL"

FIELD QGO4
YES-NO
POS 22 80
T-POS 22 46
T-VAL "Would you like to see that again?"
EXIT