root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Storico suddiviso per magazzini

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4716 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-06-19 07:09:46 +00:00
parent d3df6811a3
commit c7e5b4eb5f
1 changed files with 90 additions and 71 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

161
mg/mg3500.frm
View File

@ -1,55 +1,57 @@
#define LF_UMART2 349
#define LF_TAB_MAG 500
USE LF_ANAMAG KEY 1
JOIN LF_STOMAG TO LF_ANAMAG INTO ANNOESRIF==1996 CODART==CODART
JOIN LF_UMART TO LF_ANAMAG INTO CODART==CODART
JOIN LF_UMART TO LF_STOMAG KEY 2 ALIAS LF_UMART2 INTO CODART==CODART UM==UM
JOIN MAG TO LF_STOMAG ALIAS LF_TAB_MAG INTO CODTAB==CODMAG[1,3]
END
DESCRIPTION
BEGIN
47->* "Anagrafica articoli"
109->* "Archivio Giacenze"
MAG->* "Tabella magazzini"
49->* "Unità di misura articoli"
47->* "Anagrafica articoli"
109->* "Archivio Giacenze"
MAG->* "Tabella magazzini"
49->* "Unità di misura articoli"
END
GENERAL
BEGIN
OFFSET 0 0
FONT "Courier New"
SIZE 8
CARATTERE "X"
INIZIALE 5 2
FINALE 133
OFFSET 0 0
FONT "Courier New"
SIZE 8
CARATTERE "X"
INIZIALE 5 2
FINALE 133
END
SECTION HEADER ODD 4
STRINGA 1 40 1
BEGIN
KEY "nome ditta"
PROMPT 1 1 "Ditta "
MESSAGE _DITTA, !RAGSOC
KEY "nome ditta"
PROMPT 1 1 "Ditta "
MESSAGE _DITTA, !RAGSOC
END
STRINGA 2 10
BEGIN
KEY "Data"
PROMPT 120 1 "Data "
MESSAGE _TODAY
KEY "Data"
PROMPT 120 1 "Data "
MESSAGE _TODAY
END
NUMERO 3 7
BEGIN
KEY "Nr. pagina"
PROMPT 137 1 "Pagina "
MESSAGE _PAGENO
KEY "Nr. pagina"
PROMPT 137 1 "Pagina "
MESSAGE _PAGENO
END
NUMERO 4 32
BEGIN
KEY "Intestazione stampa"
PROMPT 45 2 "Stampa storico rimanenze"
KEY "Intestazione stampa"
PROMPT 45 2 "Stampa storico rimanenze"
END
STRINGA 5 146
@ -79,57 +81,74 @@ SECTION BODY ODD 1
END
SECTION GRUPPI_ARTICOLO 1 0 0 COLUMNWISE FILE LF_STOMAG
SECTION HD_ANNI 1 2 1 COLUMNWISE GROUP
NUMERO 13 15
BEGIN
KEY "offset"
PROMPT 1 1 ""
END
NUMERO 13 6
BEGIN
KEY "ANNO"
PROMPT 2 1 "Anno"
END
STRINGA 15 12
BEGIN
KEY "QUANT"
PROMPT 4 1 "Quantità( "
FIELD LF_UMART->UM
END
NUMERO 16 12
BEGIN
KEY "VALORE"
PROMPT 5 1 ") Valore"
END
END // HD ANNI
SECTION BODY_ANNI 1 1 1 COLUMNWISE FILE LF_STOMAG GROUP CODART
NUMERO 13 15
BEGIN
KEY "offset"
PROMPT 1 1 ""
END
NUMERO 14 6
BEGIN
KEY "ANNO"
PROMPT 2 1 ""
FIELD LF_STOMAG->ANNOES
END
NUMERO 15 12
BEGIN
KEY "QUANT"
PROMPT 4 1 ""
PICTURE "###.###,@@@"
MESSAGE _NUMEXPR,LF_STOMAG->QUANT*LF_UMART2@->FC
END
NUMERO 16 12
BEGIN
KEY "VALORE"
PROMPT 5 1 ""
PICTURE "###.###.###"
MESSAGE _NUMEXPR,LF_STOMAG->VALORE*LF_UMART2@->FC
END
SECTION BODY_MAG 1 1 1 COLUMNWISE FILE LF_STOMAG GROUP CODART
SECTION HD_MAG 1 2 1 NORMAL GROUP
STRINGA 11 20
BEGIN
KEY "CODART"
PROMPT 2 1 "Magazzino "
FIELD LF_TAB_MAG@->CODTAB
END
STRINGA 12 50
BEGIN
KEY "DESCR"
PROMPT 33 1 ""
FIELD LF_TAB_MAG@->S0
END
END // HD MAG
SECTION HD_ANNI 1 2 1 COLUMNWISE GROUP
NUMERO 13 15
BEGIN
KEY "offset"
PROMPT 1 1 ""
END
NUMERO 13 6
BEGIN
KEY "ANNO"
PROMPT 2 1 "Anno"
END
STRINGA 15 12
BEGIN
KEY "QUANT"
PROMPT 4 1 "Quantità( "
FIELD LF_UMART->UM
END
NUMERO 16 12
BEGIN
KEY "VALORE"
PROMPT 5 1 ") Valore"
END
END // HD ANNI
SECTION BODY_ANNI 1 1 1 COLUMNWISE FILE LF_STOMAG GROUP CODMAG
NUMERO 13 15
BEGIN
KEY "offset"
PROMPT 1 1 ""
END
NUMERO 14 6
BEGIN
KEY "ANNO"
PROMPT 2 1 ""
FIELD LF_STOMAG->ANNOES
END
NUMERO 15 12
BEGIN
KEY "QUANT"
PROMPT 4 1 ""
PICTURE "###.###,@@@"
MESSAGE _NUMEXPR,LF_STOMAG->QUANT*LF_UMART2@->FC
END
NUMERO 16 12
BEGIN
KEY "VALORE"
PROMPT 5 1 ""
PICTURE "###.###.###"
MESSAGE _NUMEXPR,LF_STOMAG->VALORE*LF_UMART2@->FC
END
END // body anni
END // body anni
END // gruppi anni dello stesso articolo