d0ab8cc457
Files correlati : Ricompilazione Demo : [ ] Commento : riportata la versione 98.01.05 patch 34 git-svn-id: svn://10.65.10.50/trunk@7409 c028cbd2-c16b-5b4b-a496-9718f37d4682
151 lines
2.0 KiB
Plaintext
Executable File
151 lines
2.0 KiB
Plaintext
Executable File
// Form per la stampa degli sconti di riga.
|
|
|
|
USE 35
|
|
JOIN 47 INTO CODART==CODART
|
|
JOIN %UMS TO 35 ALIAS 201 INTO CODTAB==UM
|
|
JOIN CVE TO 35 ALIAS 202 INTO CODTAB==CODCAT
|
|
|
|
END
|
|
DESCRIPTION
|
|
BEGIN
|
|
35->* "Archivio Sconti"
|
|
47->* "Anagrafica magazzino"
|
|
201@->* "Tabella unita' di misura"
|
|
202@->* "Tabella categorie di vendita"
|
|
END
|
|
|
|
GENERAL
|
|
BEGIN
|
|
OFFSET 0 0
|
|
END
|
|
|
|
SECTION GRAPHICS FIRST 66
|
|
|
|
LINEA 1 1 1
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
END
|
|
|
|
SECTION HEADER ODD 6
|
|
|
|
STRINGA 1 40
|
|
BEGIN
|
|
KEY "nome ditta"
|
|
PROMPT 1 1 "Ditta "
|
|
END
|
|
|
|
DATA 2 10
|
|
BEGIN
|
|
KEY "Data"
|
|
PROMPT 55 1 "Data "
|
|
END
|
|
|
|
NUMERO 3 7
|
|
BEGIN
|
|
KEY "Nr. pagina"
|
|
PROMPT 72 1 "Pagina "
|
|
END
|
|
|
|
STRINGA 9 21
|
|
BEGIN
|
|
KEY "titolo"
|
|
PROMPT 30 2 "Stampa sconti di riga"
|
|
END
|
|
|
|
STRINGA 4 80
|
|
BEGIN
|
|
KEY "Separatore (iniziale)"
|
|
PROMPT 1 3 "--------------------------------------------------------------------------------"
|
|
END
|
|
|
|
STRINGA 5 10
|
|
BEGIN
|
|
KEY "Intestazione (Categoria vendite)"
|
|
PROMPT 1 4 "Categoria"
|
|
END
|
|
|
|
STRINGA 6 14
|
|
BEGIN
|
|
KEY "Intestazione (Cod. Articolo)"
|
|
PROMPT 14 4 "Cod. Articolo"
|
|
END
|
|
|
|
STRINGA 7 3
|
|
BEGIN
|
|
KEY "Intestazione (Unita' di misura)"
|
|
PROMPT 36 4 "UM"
|
|
END
|
|
|
|
STRINGA 8 7
|
|
BEGIN
|
|
KEY "Intestazione (Sconto)"
|
|
PROMPT 39 4 "Sconto"
|
|
END
|
|
|
|
STRINGA 9 80
|
|
BEGIN
|
|
KEY "Separatore (finale)"
|
|
PROMPT 1 5 "--------------------------------------------------------------------------------"
|
|
END
|
|
|
|
END
|
|
|
|
SECTION BODY ODD 5
|
|
|
|
STRINGA 1 50
|
|
BEGIN
|
|
KEY "Descrizione categoria"
|
|
PROMPT 1 1 "Categoria vendite: "
|
|
FIELD 202@->S0
|
|
END
|
|
|
|
STRINGA 2 50
|
|
BEGIN
|
|
KEY "Descrizione articolo"
|
|
PROMPT 1 2 "Articolo: "
|
|
FIELD 47->DESCR
|
|
END
|
|
|
|
STRINGA 3 50
|
|
BEGIN
|
|
KEY "Descrizione unita' di misura"
|
|
PROMPT 1 3 "Unita' di misura: "
|
|
FIELD 201@->S0
|
|
END
|
|
|
|
STRINGA 4 2
|
|
BEGIN
|
|
KEY "Categoria di vendita"
|
|
PROMPT 1 4 ""
|
|
FIELD 35->CODCAT
|
|
END
|
|
|
|
STRINGA 5 20
|
|
BEGIN
|
|
KEY "Codice articolo"
|
|
PROMPT 14 4 ""
|
|
FIELD 35->CODART
|
|
END
|
|
|
|
STRINGA 6 2
|
|
BEGIN
|
|
KEY "Unita' di misura"
|
|
PROMPT 36 4 ""
|
|
FIELD 35->UM
|
|
END
|
|
|
|
STRINGA 7 25
|
|
BEGIN
|
|
KEY "Sconto"
|
|
PROMPT 39 4 ""
|
|
FIELD 35->SCONTO
|
|
END
|
|
|
|
END
|
|
|
|
END
|
|
|