Form schede di vendita

git-svn-id: svn://10.65.10.50/trunk@5237 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1997-09-19 11:06:11 +00:00
parent 6a6d689c46
commit c97711639c

View File

@ -1,5 +1,5 @@
USE 5 USE 5 KEY 2
JOIN 20 INTO TIPOCF=S0|CODCF=I0 JOIN 20 INTO TIPOCF=S8|CODCF=I8
JOIN 13 TO 20 INTO STATO==STATOCF|COM==COMCF JOIN 13 TO 20 INTO STATO==STATOCF|COM==COMCF
END END
@ -19,18 +19,13 @@ BEGIN
END END
SECTION HEADER ODD 12 SECTION HEADER ODD 8
STRINGA 1 NUMERO 1
BEGIN
KEY "Spettabile/Egregio"
PROMPT 2 1 "Spettabile"
END
NUMERO 218
BEGIN BEGIN
KEY "Pagina" KEY "Pagina"
PROMPT 70 1 "Pagina " PROMPT 70 1 "Pagina "
MESSAGE _PAGENO
END END
STRINGA 3 STRINGA 3
@ -109,64 +104,143 @@ BEGIN
PROMPT 2 5 "" PROMPT 2 5 ""
END END
STRINGA 13
BEGIN
KEY "Prefisso telefonico"
PROMPT 2 6 "Telefono "
FLAGS "H"
FIELD PTEL
MESSAGE COPY,15
END END
STRINGA 14 SECTION BODY ODD -2 COLUMNWISE
STRINGA 101 25 2
BEGIN BEGIN
KEY "Telefono" SPECIAL STRINGA INTESTAZIONE "Descrizione" "Descrizione"
PROMPT 24 6 "/ "
FLAGS "H"
FIELD TEL
MESSAGE APPEND,15
END
STRINGA 15
BEGIN
KEY "Telefono completo"
PROMPT 2 6 "Telefono "
END
STRINGA 101
BEGIN
KEY "Luogo d'invio"
PROMPT 2 7 ""
END
DATA 102
BEGIN
KEY "Data d'invio"
PROMPT 52 7 ""
FORMAT "1444-"
END
STRINGA 103 40 3
BEGIN
KEY "Testo fisso"
FLAG "M"
PROMPT 2 8 ""
END
END
SECTION BODY ODD -1 COLUMNWISE
STRINGA 201 8
BEGIN
SPECIAL STRINGA INTESTAZIONE "Num.doc." "Numero documento"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo" SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra" SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Numero documento" KEY "Descrizione"
PROMPT 1 1 "" PROMPT 1 1 ""
FLAGS "H" FIELD S1
END
NUMERO 102 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Netto" "Netto"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Netto"
PROMPT 2 1 ""
PICTURE "#.###.###.###.###"
FIELD R0
END
NUMERO 103 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Totale" "Totale"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Totale"
PROMPT 3 1 ""
PICTURE "#.###.###.###.###"
FIELD R1
END
NUMERO 104 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Jolly1" "Jolly1"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Jolly1"
PROMPT 4 1 ""
PICTURE "#.###.###.###.###"
FIELD R2
END
NUMERO 105 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Jolly2" "Jolly2"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Jolly2"
PROMPT 5 1 ""
PICTURE "#.###.###.###.###"
FIELD R3
END
NUMERO 106 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Jolly3" "Jolly3"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Jolly3"
PROMPT 6 1 ""
PICTURE "#.###.###.###.###"
FIELD R4
END
NUMERO 107 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Jolly4" "Jolly4"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Jolly4"
PROMPT 7 1 ""
PICTURE "#.###.###.###.###"
FIELD R5
END
NUMERO 108 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Jolly5" "Jolly5"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Jolly5"
PROMPT 8 1 ""
PICTURE "#.###.###.###.###"
FIELD R6
END
NUMERO 109 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Jolly6" "Jolly6"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Jolly6"
PROMPT 9 1 ""
PICTURE "#.###.###.###.###"
FIELD R7
END
NUMERO 110 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Jolly7" "Jolly7"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Jolly7"
PROMPT 10 1 ""
PICTURE "#.###.###.###.###"
FIELD R8
END
NUMERO 111 17
BEGIN
SPECIAL STRINGA INTESTAZIONE "Jolly8" "Jolly8"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Jolly8"
PROMPT 11 1 ""
PICTURE "#.###.###.###.###"
FIELD R9
END
SECTION RIGAVUOTA 2 1 1 NORMAL STREXPR (5->B8!="")
STRINGA 883
BEGIN
PROMPT 1 1 ""
END
END END
END // Fine body END // Fine body
SECTION FOOTER ODD 3
END // Fine footer
END // Fine Form END // Fine Form