From 5c471590cb0cd98c9f4b81086e00dada43c29dc4 Mon Sep 17 00:00:00 2001 From: augusto Date: Wed, 28 May 1997 07:34:43 +0000 Subject: [PATCH] =?UTF-8?q?Non=20pi=C3=B9=20usato?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: svn://10.65.10.50/trunk@4425 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- mg/mg3100c.frm | 778 ------------------------------------------------- 1 file changed, 778 deletions(-) delete mode 100755 mg/mg3100c.frm diff --git a/mg/mg3100c.frm b/mg/mg3100c.frm deleted file mode 100755 index 39ce9d4f8..000000000 --- a/mg/mg3100c.frm +++ /dev/null @@ -1,778 +0,0 @@ -USE 109 KEY 2 -JOIN 47 TO 109 INTO CODART==CODART -JOIN MAG TO 109 ALIAS 500 INTO CODTAB==CODMAG[1,3] -JOIN MAG TO 109 ALIAS 501 INTO CODTAB==CODMAG -JOIN GMC TO 47 ALIAS 400 INTO CODTAB==GRMERC[1,3] -JOIN GMC TO 47 ALIAS 401 INTO CODTAB==GRMERC -JOIN 49 TO 47 INTO CODART==CODART -END - -DESCRIPTION -BEGIN - 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 -END - -SECTION HEADER ODD 5 - -STRINGA 1 40 1 -BEGIN - KEY "nome ditta" - PROMPT 1 1 "Ditta " - MESSAGE _DITTA, !RAGSOC -END - -STRINGA 2 10 -BEGIN - KEY "Data" - PROMPT 120 1 "Data " - MESSAGE _TODAY -END - -NUMERO 3 7 -BEGIN - KEY "Nr. pagina" - PROMPT 137 1 "Pagina " - MESSAGE _PAGENO -END - -NUMERO 4 32 -BEGIN - KEY "Intestazione stampa" - PROMPT 45 2 "Stampa dati storici giacenze" -END - -STRINGA 5 146 -BEGIN - KEY "Separatore (iniziale)" - PROMPT 1 3 "------------------------------------------------------------------------------------------------------------------------------------------------------" -END - - LIST 666 1 - BEGIN - PROMPT 1 1 "" - FLAG "H" - KEY "FLAG GIACENZA" - ITEM "0|0" - MESSAGE HIDE,14|DISABLE,BO->47 - ITEM "1|1" - MESSAGE SHOW,14|ENABLE,BO->47 - END - - LIST 667 1 - BEGIN - PROMPT 1 1 "" - FLAG "H" - KEY "FLAG SOTTOSCORTA" - ITEM "0|0" - MESSAGE HIDE,15|DISABLE,BO->48 - ITEM "1|1" - MESSAGE SHOW,15|ENABLE,BO->48 - END - - STRINGA 6 20 - BEGIN - KEY "H1" - PROMPT 2 4 "Codice" - END - STRINGA 7 40 - BEGIN - KEY "H1" - PROMPT 24 4 "Descrizione" - END - STRINGA 7 40 - BEGIN - KEY "H1" - PROMPT 45 4 "UM" - END - STRINGA 8 12 - BEGIN - KEY "H1" - PROMPT 55 4 "Acq." - END - STRINGA 9 12 - BEGIN - KEY "H1" - PROMPT 68 4 "Val.Acq." - END - STRINGA 10 12 - BEGIN - KEY "H1" - PROMPT 81 4 "Ven." - END - STRINGA 11 12 - BEGIN - KEY "H1" - PROMPT 94 4 "Val.Ven." - END - STRINGA 12 12 - BEGIN - KEY "H1" - PROMPT 107 4 "Rim." - END - STRINGA 13 12 - BEGIN - KEY "H1" - PROMPT 120 4 "Val.Rim." - END - STRINGA 14 12 - BEGIN - KEY "H1" - PROMPT 133 4 "Giac." - END - STRINGA 15 12 - BEGIN - KEY "H1" - PROMPT 131 4 "Scorta-Giac." - END - - STRINGA 17 146 - BEGIN - KEY "Separatore (iniziale)" - PROMPT 1 5 "------------------------------------------------------------------------------------------------------------------------------------------------------" - END - - -END - -SECTION BODY ODD 0 COLUMNWISE - - LIST 555 1 - BEGIN - PROMPT 1 1 "" - FLAG "H" - KEY "FLAG VALORI MEDI" - ITEM "0|N" - MESSAGE SHOW,10@|DISABLE,11@ - ITEM "1|Y" - MESSAGE HIDE,10@|ENABLE,11@ - END - - SECTION HEADER_MAGAZZINO 1 1 1 GROUP - STRINGA 10 12 2 - BEGIN - KEY "magazzino" - PROMPT 2 1 "" - FIELD CODMAG[1,3] - END - - STRINGA 11 12 2 - BEGIN - KEY "magazzino" - PROMPT 3 1 "" - FIELD 500@->s0 - MESSAGE RESET,4@|COPY,450 - END - END - - SECTION GRUPPI_MAGAZZINO 1 1 0 FILE 109 GROUP CODMAG[1,3] - - SECTION HEADER_DEPOSITO 1 1 1 GROUP - STRINGA 21 8 1 - BEGIN - KEY "CODICE" - PROMPT 2 1 "Deposito" - END - STRINGA 22 34 1 - BEGIN - KEY "descr" - PROMPT 3 1 "" - FIELD 501@->s0 - MESSAGE RESET,3@|COPY,350 - END - END - - SECTION GRUPPI_DEPOSITO 1 0 0 FILE 109 GROUP CODMAG[4,5] - STRINGA 30 21 1 - BEGIN - FLAGS "H" - KEY "codice ARTICOLO" - PROMPT 2 1 " Articolo:" - FIELD 47->CODART - MESSAGE COPY,251 - END - STRINGA 31 21 1 - BEGIN - FLAGS "H" - KEY "codice ARTICOLO" - PROMPT 3 1 "" - FIELD 47->DESCR - MESSAGE RESET,2@|COPY,250 - END - SECTION GRUPPI_ARTICOLO 1 0 0 FILE 109 GROUP CODART - STRINGA 40 40 1 - BEGIN - FLAGS "H" - KEY "livgiac" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOGIAC|RESET,1@|COPY,150 - END - - SECTION GRUPPI_LIVELLO_GIACENZE 1 0 0 FILE 109 GROUP LIVELLO - SECTION RIGHE_LIVELLI 0 1 1 GROUP - STRINGA 51 5 2 - BEGIN - KEY "CODICE" - PROMPT 2 1 "" - END - STRINGA 52 37 2 - BEGIN - KEY "descr" - PROMPT 3 1 "" - MESSAGE _USER,LIVELLIGIAC - END - STRINGA 53 3 - BEGIN - KEY "UM" - PROMPT 5 1 "" - FIELD 49->UM - END - NUMERO 41 12 - BEGIN - KEY "ACQ" - PROMPT 6 1 "" - FIELD 109->ACQ - PICTURE "########,@#" - MESSAGE ADD,141 - END - NUMERO 42 12 - BEGIN - KEY "VALACQ" - PROMPT 7 1 "" - FIELD 109->VALACQ - PICTURE "###.###.##@" - MESSAGE ADD,142 - GROUP 10 - END - NUMERO 82 12 - BEGIN - KEY "VALACQ" - PROMPT 7 1 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,109->VALACQ/109->ACQ - GROUP 11 - END - - NUMERO 43 12 - BEGIN - KEY "VEN" - PROMPT 8 1 "" - FIELD 109->VEN - PICTURE "########,@#" - MESSAGE ADD,143 - END - NUMERO 44 12 - BEGIN - KEY "VALV" - PROMPT 9 1 "" - FIELD 109->VALVEN - PICTURE "###.###.##@" - MESSAGE ADD,144 - GROUP 10 - END - NUMERO 84 12 - BEGIN - KEY "VALV" - PROMPT 9 1 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,109->VALVEN/109->VEN - GROUP 11 - END - - NUMERO 45 12 - BEGIN - KEY "RIM" - PROMPT 10 1 "" - FIELD 109->RIM - PICTURE "########,@#" - MESSAGE ADD,145 - END - NUMERO 46 12 - BEGIN - KEY "VALrim" - PROMPT 11 1 "" - PICTURE "###.###.##@" - FIELD 109->VALRIM - MESSAGE ADD,146 - GROUP 10 - END - NUMERO 86 12 - BEGIN - KEY "VALrim" - PROMPT 11 1 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,109->VALRIM/109->RIM - GROUP 11 - END - - NUMERO 47 12 - BEGIN - KEY "giac" - PROMPT 12 1 "" - FIELD 109->GIAC - PICTURE "#######@,@#" - MESSAGE ADD,147 - END - NUMERO 48 12 - BEGIN - KEY "scorta-giac" - PROMPT 12 1 "" - PICTURE "#######@,@#" - MESSAGE _NUMEXPR,109->SCORTAMIN-109->GIAC|ADD,147 - END - END // SECTION GROUP LIVELLI - END // LOOP LIVELLI - - SECTION TOTALI_LIVELLO_GIAC 1 2 2 GROUP - STRINGA 777 - BEGIN - KEY "" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - - STRINGA 150 35 2 - BEGIN - KEY "LIVGIAC" - PROMPT 3 2 "" - END - STRINGA 151 7 2 - BEGIN - KEY "livgiac" - PROMPT 2 2 " Totale" - END - STRINGA 153 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD 49->UM - MESSAGE COPY,253 - END - - NUMERO 141 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,241 - GROUP 1 - END - NUMERO 142 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,242 - GROUP 1 10 - END - NUMERO 182 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#142/#141 - GROUP 11 - END - - NUMERO 143 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,243 - GROUP 1 - END - NUMERO 144 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,244 - GROUP 1 10 - END - NUMERO 184 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#144/#143 - GROUP 11 - END - - NUMERO 145 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,245 - GROUP 1 - END - NUMERO 146 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,246 - GROUP 1 10 - END - NUMERO 186 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#146/#145 - GROUP 11 - END - - NUMERO 147 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,247 - GROUP 1 - END - END - END // LOOP LIVELLI DI GIACENZA - SECTION TOTALI_ARTICOLO 1 1 1 GROUP - - STRINGA 250 21 1 - BEGIN - PROMPT 3 1 "" - END - STRINGA 251 21 1 - BEGIN - KEY "Livello giac" - PROMPT 2 1 " Articolo " - END - STRINGA 253 3 - BEGIN - KEY "UM" - PROMPT 5 1 "" - MESSAGE COPY,353 - END - - NUMERO 241 12 - BEGIN - KEY "ACQ" - PROMPT 6 1 "" - PICTURE "########,@#" - MESSAGE ADD,341 - GROUP 2 - END - NUMERO 242 12 - BEGIN - KEY "VALACQ" - PROMPT 7 1 "" - PICTURE "###.###.##@" - MESSAGE ADD,342 - GROUP 2 10 - END - NUMERO 282 12 - BEGIN - KEY "VALACQ" - PROMPT 7 1 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#242/#241 - GROUP 11 - END - - NUMERO 243 12 - BEGIN - KEY "ven" - PROMPT 8 1 "" - PICTURE "########,@#" - MESSAGE ADD,343 - GROUP 2 - END - NUMERO 244 12 - BEGIN - KEY "VALven" - PROMPT 9 1 "" - PICTURE "###.###.##@" - MESSAGE ADD,344 - GROUP 2 10 - END - NUMERO 284 12 - BEGIN - KEY "VALven" - PROMPT 9 1 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#244/#243 - GROUP 11 - END - - NUMERO 245 12 - BEGIN - KEY "rim" - PROMPT 10 1 "" - PICTURE "########,@#" - MESSAGE ADD,345 - GROUP 2 - END - NUMERO 246 12 - BEGIN - KEY "VALrim" - PROMPT 11 1 "" - PICTURE "###.###.##@" - MESSAGE ADD,346 - GROUP 2 10 - END - NUMERO 286 12 - BEGIN - KEY "VALrim" - PROMPT 11 1 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#246/#245 - GROUP 11 - END - - NUMERO 247 12 - BEGIN - KEY "giac" - PROMPT 12 1 "" - PICTURE "########,@#" - MESSAGE ADD,347 - GROUP 2 - END - END // SECTION TOTALI - - END // LOOP GIAC - - SECTION TOTALI_DEPOSITO 1 3 3 GROUP - STRINGA 777 - BEGIN - KEY "giac" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 350 30 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 351 12 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale dep." - END - STRINGA 353 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,453 - END - NUMERO 341 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,441 - GROUP 3 - END - NUMERO 342 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,442 - GROUP 3 10 - END - NUMERO 382 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#342/#341 - GROUP 11 - END - - NUMERO 343 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,443 - GROUP 3 - END - NUMERO 344 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,444 - GROUP 3 10 - END - NUMERO 384 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#344/#343 - GROUP 11 - END - - NUMERO 345 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,445 - GROUP 3 - END - NUMERO 346 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,446 - GROUP 3 10 - END - NUMERO 386 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#346/#345 - GROUP 11 - END - - NUMERO 347 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,447 - GROUP 3 - END - END // SECTION TOTALI - - END // loop ragg codice o catmerc - SECTION TOTALI_MAGAZZINO 1 3 3 GROUP - STRINGA 777 - BEGIN - KEY "" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 451 20 2 - BEGIN - KEY "" - PROMPT 2 2 " TOTALE MAG." - END - STRINGA 450 22 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 453 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - END - NUMERO 441 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - GROUP 4 - END - NUMERO 442 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - GROUP 4 10 - END - NUMERO 482 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#442/#441 - GROUP 11 - END - - NUMERO 443 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - GROUP 4 - END - NUMERO 444 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - GROUP 4 10 - END - NUMERO 484 12 - BEGIN - KEY "VALVEN medio" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#444/#443 - GROUP 11 - END - - NUMERO 445 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - GROUP 4 - END - NUMERO 446 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - GROUP 4 10 - END - NUMERO 486 12 - BEGIN - KEY "VALrim medio" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#446/#445 - GROUP 11 - END - - NUMERO 447 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - GROUP 4 - END - END // SECTION TOTALI -END // section body, loop anamag - -SECTION FOOTER ODD 2 - STRINGA 100 - BEGIN - KEY "NUMP" - PROMPT 50 1 "--------------" - END - - NUMERO 101 - BEGIN - KEY "NUMPAGE" - PROMPT 50 2 "" - MESSAGE _PAGENO - PICTURE "-###-" - END - -END // fine footer -END// fine form -