diff --git a/mg/mg3300.frm b/mg/mg3300.frm deleted file mode 100755 index 9a1185609..000000000 --- a/mg/mg3300.frm +++ /dev/null @@ -1,142 +0,0 @@ -USE LF_ANAMAG -JOIN LF_MAG TO LF_ANAMAG INTO CODART==CODART ANNOES=="1996" -JOIN MAG TO LF_MAG INTO CODTAB==CODMAG -JOIN MAG TO LF_MAG ALIAS 500 INTO CODTAB==CODMAG[1,3] -SORT LF_RMOVMAG BY LF_MOVMAG->DATAREG NUMREG NRIG - USING LF_MOVMAG INTO NUMREG==NUMREG - JOIN TO LF_MAG KEY 2 INTO CODART==CODART CODMAG==CODMAG LIVGIAC==LIVELLO -JOIN LF_MOVMAG TO LF_RMOVMAG INTO NUMREG==NUMREG -JOIN LF_UMART TO LF_ANAMAG INTO CODART==CODART -JOIN LF_UMART TO LF_UMART KEY 2 ALIAS 349 INTO CODART==CODART UM==UM -END - -DESCRIPTION -BEGIN - 47->* "Anagrafica articoli" - 109->* "Archivio Giacenze" - MAG->* "Tabella magazzini" - 110->* "Movimenti di magazzino" - 111->* "Righe Movimenti di magazzino" - 49->* "Unità di misura articoli" -END - -GENERAL -BEGIN - OFFSET 0 0 - FONT "Courier New" - SIZE 12 - CARATTERE "X" - INIZIALE 5 2 - FINALE 133 -END - -SECTION HEADER ODD 12 - STRINGA 100 20 1 - BEGIN - PROMPT 1 10 "----------------------------------------------------" - END - STRINGA 102 20 1 - BEGIN - PROMPT 1 1 "----------------------------------------------------" - END -END - -SECTION BODY ODD 2 - STRINGA 69 20 1 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "Raggruppamento " - FIELD CODART[1,3] - END - - - SECTION INFO_ARTICOLO 1 50 1 GROUP - STRINGA 10 20 1 - BEGIN - KEY "CODICE articolo" - PROMPT 1 1 "" - MESSAGE _USER,CODGRUPPOART - END - - STRINGA 11 50 1 - BEGIN - KEY "DESCR.articolo" - PROMPT 1 2 "" - MESSAGE _USER,GRUPPOART - END - END //info articolo - - SECTION INFO_LIVGIAC 1 1 1 GROUP - STRINGA 20 20 1 - BEGIN - KEY "CODICE articolo" - PROMPT 1 1 "" - MESSAGE _USER,CODGRUPPOART|RESET,FF_STAMPASALDOPREC - END - STRINGA 21 50 1 - BEGIN - KEY "Livello giac" - PROMPT 5 1 "Livello " - FIELD 109->livello - MESSAGE RESET,99 - END - END // INFO livgiac - - SECTION INFO_MAG 1 1 1 GROUP - END // INFO magazzino - - SECTION SCHEDA 1 1 1 FILE LF_MAG GROUP CODART - - SECTION MOVIMENTI 1 1 1 FILE LF_RMOVMAG - - SECTION MOVIMENTO 1 1 1 FILE LF_RMOVMAG GROUP NUMREG - - SECTION RIGA_PREC 1 1 1 STREXPR LF_MOVMAG->DATAREG<"19960203" - NUMBER 100 12 - BEGIN - PROMPT 1 1 "" - MESSAGE _USER,SALDO|ADD,FF_SALDOPREC_MOV|RESET,FF_STAMPASALDOPREC - END - END // riga di data preceDente - - SECTION RIGA_COMP 1 1 1 STREXPR LF_MOVMAG->DATAREG>="19960203" - NUMBER 100 12 - BEGIN - PROMPT 1 1 "" - MESSAGE _USER,SALDO|ADD,FF_SALDO_MOV|"1",FF_STAMPASALDOPREC - END - END // riga di data compresa - - END // loop movimento - - SECTION SALDO_PREC 1 1 1 NUMEXPR #FF_STAMPASALDOPREC=1 - NUMBER FF_SALDOPRECSCHEDA 12 - BEGIN - PROMPT 1 1 "" - MESSAGE INC,FF_STAMPASALDOPREC - END - END // saldo prec - - END // loop movimenti - - END // loop schede - -END // ***** - -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 -