124 lines
2.8 KiB
Plaintext
124 lines
2.8 KiB
Plaintext
|
#include "dl0500.h"
|
||
|
|
|
||
|
|
USE LF_ANAMAG
|
||
|
|
JOIN LF_UMART INTO CODART==CODART NRIGA=="1"
|
||
|
|
END
|
||
|
|
|
||
|
|
//-------------------------intestazione form-----------------------------------------------//
|
||
|
|
SECTION HEADER ODD 5
|
||
|
|
|
||
|
|
STRINGA -1
|
||
|
|
BEGIN
|
||
|
|
KEY "titolo"
|
||
|
|
PROMPT 1 1 "@bRICERCA AVANZATA"
|
||
|
|
END
|
||
|
|
|
||
|
|
DATA FF_DATE
|
||
|
|
BEGIN
|
||
|
|
KEY "Data"
|
||
|
|
PROMPT 1 2 "@bData "
|
||
|
|
MESSAGE _TODAY
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMERO FF_PAGE
|
||
|
|
BEGIN
|
||
|
|
KEY "Nr. pagina"
|
||
|
|
PROMPT 120 2 "@bPagina "
|
||
|
|
MESSAGE _PAGENO
|
||
|
|
END
|
||
|
|
|
||
|
|
END
|
||
|
|
|
||
|
|
//-----------------------riga tipo uno---------------------------------------------------//
|
||
|
|
SECTION BODY ODD 1 COLUMNWISE
|
||
|
|
|
||
|
|
STRINGA FF_B_CODART 20
|
||
|
|
BEGIN
|
||
|
|
KEY "codart"
|
||
|
|
PROMPT 1 1 "$[b]"
|
||
|
|
SPECIAL STRINGA INTESTAZIONE "Cod. articolo" "Codice articolo"
|
||
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
||
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
||
|
|
FIELD CODART
|
||
|
|
END
|
||
|
|
|
||
|
|
STRINGA -1
|
||
|
|
BEGIN
|
||
|
|
KEY "spegnitore del colore"
|
||
|
|
PROMPT 2 1 "$[n]"
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMERO FF_B_GIAC 7
|
||
|
|
BEGIN
|
||
|
|
KEY "giacenza"
|
||
|
|
PROMPT 2 1 ""
|
||
|
|
PICTURE "###.##@"
|
||
|
|
SPECIAL STRINGA INTESTAZIONE "Giac." "Giacenza"
|
||
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
||
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
||
|
|
END
|
||
|
|
|
||
|
|
STRINGA FF_B_TITOLO 40
|
||
|
|
BEGIN
|
||
|
|
KEY "titolo"
|
||
|
|
PROMPT 3 1 ""
|
||
|
|
SPECIAL STRINGA INTESTAZIONE "Titolo" "Titolo"
|
||
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
||
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
||
|
|
FIELD DESCR
|
||
|
|
END
|
||
|
|
|
||
|
|
STRINGA FF_B_ARTISTA 18
|
||
|
|
BEGIN
|
||
|
|
KEY "artista"
|
||
|
|
PROMPT 4 1 ""
|
||
|
|
SPECIAL STRINGA INTESTAZIONE "Artista" "Artista"
|
||
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
||
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
||
|
|
FIELD USER2
|
||
|
|
END
|
||
|
|
|
||
|
|
STRINGA FF_B_COMPOSITORE 18
|
||
|
|
BEGIN
|
||
|
|
KEY "compositore"
|
||
|
|
PROMPT 5 1 ""
|
||
|
|
SPECIAL STRINGA INTESTAZIONE "Compositore" "Compositore"
|
||
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
||
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
||
|
|
FIELD USER3
|
||
|
|
END
|
||
|
|
|
||
|
|
VALUTA FF_B_PREZZO 10
|
||
|
|
BEGIN
|
||
|
|
KEY "prezzo articolo"
|
||
|
|
PROMPT 6 1 ""
|
||
|
|
SPECIAL STRINGA INTESTAZIONE "Prezzo" "Prezzo"
|
||
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
||
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
||
|
|
FIELD LF_UMART->PREZZO //notare che il prezzo dell'articolo viene proposto come quello di listino ingrosso
|
||
|
|
//(vedi programma importazione dati!)
|
||
|
|
END
|
||
|
|
|
||
|
|
STRINGA FF_B_GENERE 3
|
||
|
|
BEGIN
|
||
|
|
KEY "genere"
|
||
|
|
PROMPT 7 1 ""
|
||
|
|
SPECIAL STRINGA INTESTAZIONE "Gen" "Genere"
|
||
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
||
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
||
|
|
FIELD GRMERC
|
||
|
|
END
|
||
|
|
|
||
|
|
STRINGA FF_B_SUPPORTO 3
|
||
|
|
BEGIN
|
||
|
|
KEY "supporto"
|
||
|
|
PROMPT 8 1 ""
|
||
|
|
SPECIAL STRINGA INTESTAZIONE "Sup" "Tipo supporto"
|
||
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
||
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
||
|
|
FIELD LF_UMART->UM
|
||
|
|
END
|
||
|
|
|
||
|
|
END
|
||
|
|
|