f6b085b355
Files correlati : Ricompilazione Demo : [ ] Commento :aggiunti files discolatio alla 32 bit git-svn-id: svn://10.65.10.50/trunk@11035 c028cbd2-c16b-5b4b-a496-9718f37d4682
142 lines
3.2 KiB
Plaintext
Executable File
142 lines
3.2 KiB
Plaintext
Executable File
#include "dl0600.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 "@bINTERROGAZIONE MAGAZZINO"
|
|
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 16
|
|
BEGIN
|
|
KEY "codart"
|
|
PROMPT 1 1 ""
|
|
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 FF_B_TITOLO 40
|
|
BEGIN
|
|
KEY "titolo"
|
|
PROMPT 2 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 3 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_SUPPORTO 3
|
|
BEGIN
|
|
KEY "supporto"
|
|
PROMPT 4 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
|
|
|
|
NUMERO FF_B_GIAC 8
|
|
BEGIN
|
|
KEY "giacenza"
|
|
PROMPT 5 1 ""
|
|
PICTURE "###.##@"
|
|
MESSAGE _GIACENZA
|
|
SPECIAL STRINGA INTESTAZIONE "Giacenza" "Giacenza"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
END
|
|
|
|
NUMERO FF_B_QTA 8
|
|
BEGIN
|
|
KEY "quantita' in ordine non evasa"
|
|
PROMPT 6 1 ""
|
|
PICTURE "#######"
|
|
SPECIAL STRINGA INTESTAZIONE "Ordinato" "Quantita' in ordine non evasa"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
MESSAGE _ORDF
|
|
END
|
|
|
|
NUMERO FF_B_TOTACQ 7
|
|
BEGIN
|
|
KEY "totale acquistati"
|
|
PROMPT 7 1 ""
|
|
PICTURE "#######"
|
|
SPECIAL STRINGA INTESTAZIONE "Tot acq" "Totale acquistati"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
MESSAGE _ACQ
|
|
END
|
|
|
|
NUMERO FF_B_TOTVEN 7
|
|
BEGIN
|
|
KEY "totale venduti"
|
|
PROMPT 8 1 ""
|
|
PICTURE "#######"
|
|
SPECIAL STRINGA INTESTAZIONE "Tot ven" "Totale venduti"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
MESSAGE _VEN
|
|
END
|
|
|
|
VALUTA FF_B_PREZZO 10
|
|
BEGIN
|
|
FLAGS "U"
|
|
KEY "prezzo articolo del giorno"
|
|
PROMPT 9 1 ""
|
|
SPECIAL STRINGA INTESTAZIONE "Prezzo" "Prezzo"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
MESSAGE _PREZZO,FF_B_CONDV
|
|
END
|
|
|
|
STRINGA FF_B_CONDV 3
|
|
BEGIN
|
|
FLAGS "U"
|
|
KEY "listino/offerta da cui viene il prezzo stampato"
|
|
PROMPT 10 1 ""
|
|
SPECIAL STRINGA INTESTAZIONE "L/O" "Listino/Offerta"
|
|
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
|
|
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
|
|
END
|
|
|
|
END
|
|
|