4f569ec3c4
Files correlati : sv0.exe sv1.exe sv2.exe sv0400a.msk sv1100a.frm sv1100b.frm Ricompilazione Demo : [ ] Commento : GF20028 La selezione per omaggi non può essere effettuata ATTENZIONE: Ci risulta che il bottone omaggi sia sempre selezionabile. Inoltre abilitando gli omaggi nei parametri statistiche, questi vengono stampati correttamente. Necessita segnalazione piu' chiara. GF20029 La stampa schede di vendita arrotonda glie importi all'intero. git-svn-id: svn://10.65.10.50/trunk@11194 c028cbd2-c16b-5b4b-a496-9718f37d4682
255 lines
4.3 KiB
Plaintext
Executable File
255 lines
4.3 KiB
Plaintext
Executable File
#include "sv1100a.h"
|
|
USE 5 KEY 2
|
|
JOIN LF_CLIFO INTO TIPOCF=S8|CODCF=I8
|
|
JOIN LF_COMUNI TO LF_CLIFO INTO STATO==STATOCF|COM==COMCF
|
|
|
|
END
|
|
|
|
DESCRIPTION
|
|
BEGIN
|
|
5->* "Tabella temporanea di stampa"
|
|
END
|
|
|
|
GENERAL
|
|
BEGIN
|
|
OFFSET 0 1
|
|
END
|
|
|
|
|
|
SECTION HEADER ODD 10
|
|
|
|
NUMERO 1
|
|
BEGIN
|
|
KEY "Pagina"
|
|
PROMPT 70 2 "Pagina "
|
|
MESSAGE _PAGENO
|
|
END
|
|
|
|
STRINGA FF_TITOLO
|
|
BEGIN
|
|
KEY "Pagina"
|
|
PROMPT 20 2 "Stampa schede "
|
|
END
|
|
|
|
STRINGA 3
|
|
BEGIN
|
|
KEY "Codice cliente/fornitore"
|
|
PROMPT 2 3 ""
|
|
FIELD LF_CLIFO->CODCF
|
|
END
|
|
|
|
STRINGA 4
|
|
BEGIN
|
|
KEY "Ragione sociale"
|
|
PROMPT 9 3 ""
|
|
FIELD LF_CLIFO->RAGSOC
|
|
END
|
|
|
|
STRINGA 5
|
|
BEGIN
|
|
KEY "Indirizzo"
|
|
PROMPT 2 4 ""
|
|
FLAGS "H"
|
|
FIELD LF_CLIFO->INDCF
|
|
MESSAGE COPY,7
|
|
END
|
|
|
|
STRINGA 6
|
|
BEGIN
|
|
KEY "Numero civico"
|
|
PROMPT 52 4 ""
|
|
FLAGS "H"
|
|
FIELD LF_CLIFO->CIVCF
|
|
MESSAGE APPEND,7
|
|
END
|
|
|
|
STRINGA 7
|
|
BEGIN
|
|
KEY "Indirizzo completo"
|
|
PROMPT 2 4 ""
|
|
END
|
|
|
|
STRINGA 8
|
|
BEGIN
|
|
KEY "C.A.P."
|
|
PROMPT 2 5 "C.A.P. "
|
|
FIELD LF_CLIFO->CAPCF
|
|
END
|
|
|
|
STRINGA 9
|
|
BEGIN
|
|
KEY "Localita'"
|
|
PROMPT 26 5 ""
|
|
FIELD LF_CLIFO->LOCALITACF
|
|
END
|
|
|
|
STRINGA 10
|
|
BEGIN
|
|
KEY "Comune"
|
|
PROMPT 2 6 ""
|
|
FLAGS "H"
|
|
FIELD LF_COMUNI->DENCOM
|
|
MESSAGE COPY,12
|
|
END
|
|
|
|
STRINGA 11
|
|
BEGIN
|
|
KEY "Provincia"
|
|
PROMPT 52 6 ""
|
|
FLAGS "H"
|
|
FIELD LF_COMUNI->PROVCOM
|
|
MESSAGE APPEND,12
|
|
END
|
|
|
|
STRINGA 12
|
|
BEGIN
|
|
KEY "Comune completo"
|
|
PROMPT 2 6 ""
|
|
END
|
|
|
|
STRINGA FF_AGENTE
|
|
BEGIN
|
|
KEY "Agente completo"
|
|
PROMPT 2 7 "Agente "
|
|
END
|
|
|
|
END
|
|
|
|
SECTION BODY ODD -2 COLUMNWISE
|
|
|
|
STRINGA 101 40 2
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "Descrizione" "Descrizione"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
KEY "Descrizione"
|
|
PROMPT 1 1 ""
|
|
FIELD S1
|
|
END
|
|
|
|
VALUTA FF_FIRSTCOLUMN 17
|
|
BEGIN
|
|
SPECIAL STRINGA INTESTAZIONE "Base sconto" "Base sconto"
|
|
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 FF_SECONDCOLUMN 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
|
|
|
|
VALUTA 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
|
|
|
|
VALUTA 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
|
|
|
|
VALUTA 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
|
|
|
|
VALUTA 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
|
|
|
|
VALUTA 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
|
|
|
|
VALUTA 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
|
|
|
|
VALUTA 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
|
|
|
|
VALUTA 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 // Fine body
|
|
|
|
SECTION FOOTER ODD 2
|
|
END // Fine footer
|
|
|
|
END // Fine Form
|