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

Riportata la 98.01.01CD sul main trunk

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@5989 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1998-01-20 15:49:51 +00:00
parent f875bb3841
commit cd590d0693
12 changed files with 85 additions and 81 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mg/batbcau.uml
View File

@ -128,6 +128,8 @@ BEGIN
OUTPUT F_CAUCOLL CODTAB OUTPUT F_CAUCOLL CODTAB
OUTPUT F_DCAUCOLL S0 OUTPUT F_DCAUCOLL S0
CHECKTYPE NORMAL CHECKTYPE NORMAL
ADD NONE //RUN MG0 -0 %CAU
WARNING "La causale collegata deve essere una causale senza ulteriori collegamenti"
END END
STRING F_DCAUCOLL 50 40 STRING F_DCAUCOLL 50 40
@ -141,6 +143,8 @@ BEGIN
OUTPUT F_DCAUCOLL S0 OUTPUT F_DCAUCOLL S0
OUTPUT F_CAUCOLL CODTAB OUTPUT F_CAUCOLL CODTAB
CHECKTYPE NORMAL CHECKTYPE NORMAL
ADD NONE //RUN MG0 -0 %CAU
WARNING "La causale collegata deve essere una causale senza ulteriori collegamenti"
END END
ENDPAGE ENDPAGE

8
mg/batbgca.uml
View File

@ -12,14 +12,13 @@ PAGE "Gruppi Codice Articoli" 11 60 14
// FLAGS "R" // FLAGS "R"
//END //END
// codice parte del formato codice // codice parte del formato codice
NUMBER F_CODLIV 1 NUMBER F_CODLIV 1
BEGIN BEGIN
PROMPT 2 2 "Numero parte " PROMPT 2 2 "Numero parte "
FIELD CODTAB[1,1] FIELD CODTAB[1,1]
KEY 1 KEY 1
FLAG "U" FLAG "UP"
USE FCA USE FCA
INPUT CODTAB[1,1] F_CODLIV INPUT CODTAB[1,1] F_CODLIV
DISPLAY "Codice Parte" CODTAB[1,1] DISPLAY "Codice Parte" CODTAB[1,1]
@ -43,8 +42,10 @@ BEGIN
DISPLAY "N.Parte" CODTAB[1,1] DISPLAY "N.Parte" CODTAB[1,1]
COPY OUTPUT F_CODLIV COPY OUTPUT F_CODLIV
CHECKTYPE FORCED CHECKTYPE FORCED
ADD NONE
END END
// STRINGA DEL FORMATO CODICE // STRINGA DEL FORMATO CODICE
STRING F_FORMLIV 23 STRING F_FORMLIV 23
BEGIN BEGIN
@ -74,12 +75,13 @@ BEGIN
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
STRING F_DESGROUP 50 STRING F_DESGROUP 50
BEGIN BEGIN
PROMPT 2 7 "Descrizione del gruppo " PROMPT 2 7 "Descrizione del gruppo "
FIELD S0 FIELD S0
KEY 2 KEY 2
USE GCA KEY 2 USE GCA KEY 2 SELECT CODTAB[1,1]==#F_CODLIV
JOIN FCA ALIAS 500 INTO CODTAB==CODTAB[1,1] JOIN FCA ALIAS 500 INTO CODTAB==CODTAB[1,1]
INPUT S0 F_DESGROUP INPUT S0 F_DESGROUP
DISPLAY "Descrizione@50 " S0 DISPLAY "Descrizione@50 " S0

2
mg/batbgcg.uml
View File

@ -71,7 +71,7 @@ BEGIN
PROMPT 2 7 "Descr. gruppo " PROMPT 2 7 "Descr. gruppo "
FIELD S0 FIELD S0
KEY 2 KEY 2
USE GCG KEY 2 USE GCG KEY 2 SELECT CODTAB[1,1]==F_CODLIV
JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1] JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1]
INPUT S0 F_DESGROUP INPUT S0 F_DESGROUP
DISPLAY "Descrizione@50 " GCG->S0 DISPLAY "Descrizione@50 " GCG->S0

2
mg/f110.dir
View File

@ -1,3 +1,3 @@
110 110
0 0
$movmag|0|0|120|32|Movimenti di magazzino (?)||| $movmag|0|0|128|32|Movimenti di magazzino (?)|||

12
mg/f110.trr
View File

@ -1,13 +1,15 @@
110 110
16 18
NUMREG|3|7|0|Numero di registrazione NUMREG|3|7|0|Numero di registrazione
ANNOES|1|4|0|Codice esercizio ANNOES|1|4|0|Codice esercizio
DATAREG|5|8|0|Data registrazione DATAREG|5|8|0|Data registrazione
DATACOMP|5|8|0|Data competenza DATACOMP|5|8|0|Data competenza
DOCPROVV|1|1|0|Flag numeraz. provvisiora sul documento DOCPROVV|1|1|0|Doc. interno: Flag numeraz. provvisoria
ANNODOC|1|4|0|Anno documento ANNODOC|1|4|0|______________Anno documento
CODNUM|1|4|0|Codice numerazione documento CODNUM|1|4|0|______________Codice numerazione documento
NUMDOC|1|7|0|Numero documento NUMDOC|1|7|0|______________Numero documento
EX_DATADOC|5|8|0|Documento esterno:Data doc
EX_NUMDOC|1|7|0|__________________Num.doc
CATVEN|1|2|0|categoria di vendita (listini) CATVEN|1|2|0|categoria di vendita (listini)
TIPOCV|1|1|0|Tipo condizione di vendita (Listino/contrato/offerta) TIPOCV|1|1|0|Tipo condizione di vendita (Listino/contrato/offerta)
CODCONDV|1|3|0|Codice listino/contratto/offerta CODCONDV|1|3|0|Codice listino/contratto/offerta

2
mg/mg1100.h
View File

@ -23,6 +23,8 @@
#define F_CODCF 123 #define F_CODCF 123
#define F_CODCONDV 124 #define F_CODCONDV 124
#define F_DESCONDV 125 #define F_DESCONDV 125
#define F_EXNUMDOC 126
#define F_EXANNODOC 127
#define H_NUMREG 131 #define H_NUMREG 131
#define H_DATAREG 132 #define H_DATAREG 132

54
mg/mg1100.uml
View File

@ -93,58 +93,18 @@ BEGIN
MESSAGE DISABLE,G_DEFMOV@ MESSAGE DISABLE,G_DEFMOV@
END END
LISTBOX F_NUMPROVV 1 20 STRING F_EXNUMDOC 7
BEGIN BEGIN
PROMPT 0 0 "" FLAGS "U"
FLAGS "HG" PROMPT 2 6 "Documento numero "
ITEM "D|Definitiva" FIELD EX_NUMDOC
END END
STRING F_CODNUM 4
BEGIN
FLAGS "D"
PROMPT 2 6 "Documento: numero "
FIELD CODNUM
END
STRING F_NUMDOC 7 DATE F_EXANNODOC
BEGIN BEGIN
FLAGS "D" PROMPT 30 6 " del "
PROMPT 28 6 "/ " FIELD EX_DATADOC
FIELD NUMDOC
USE LF_DOC
INPUT PROVV F_NUMPROVV SELECT
INPUT ANNO F_ANNOES
INPUT CODNUM F_CODNUM
INPUT NDOC F_NUMDOC
DISPLAY "Num" CODNUM
DISPLAY "Doc" NDOC
DISPLAY "Tipo" TIPODOC
DISPLAY "Anno" ANNO
OUPUT F_CODNUM CODNUM
OUPUT F_NUMDOC NDOC
OUPUT F_ANNODOC ANNO
// OUPUT F_TIPOCF TIPOCF
// OUPUT F_CODCF CODCF
OUPUT F_CODCAUS CAUSMAG1
CHECKTYPE NORMAL
MESSAGE "S",F_RIFADOC
MESSAGE EMPTY "N",F_RIFADOC
END
NUMBER F_ANNODOC 4
BEGIN
FLAGS "D"
PROMPT 40 6 "anno "
FIELD ANNODOC
USE LF_DOC SELECT NDOC==F_NUMDOC
INPUT ANNODOC F_ANNODOC
DISPLAY "Anno" ANNODOC
DISPLAY "NDoc" NDOC
DISPLAY "Tipo" TIPODOC
COPY OUTPUT F_NUMDOC
// CHECKTYPE NORMAL
END END

18
mg/mg4100.frm
View File

@ -183,6 +183,7 @@ SECTION BODY ODD 1
FIELD %CAU->S0 FIELD %CAU->S0
END END
/*
SECTION INFO_DOC 3 0 1 NUM_EXPR LF_MOVMAG->NUMDOC!=0 SECTION INFO_DOC 3 0 1 NUM_EXPR LF_MOVMAG->NUMDOC!=0
STRINGA 6 20 STRINGA 6 20
BEGIN BEGIN
@ -197,6 +198,23 @@ SECTION BODY ODD 1
FIELD 33->DATADOC FIELD 33->DATADOC
END END
END END
*/
SECTION INFO_EXDOC 3 0 1 NUM_EXPR LF_MOVMAG->EX_NUMDOC!=0
STRINGA 6 20
BEGIN
KEY " NUMDOC"
PROMPT 10 1 "Documento "
FIELD LF_MOVMAG->EX_NUMDOC
END
STRINGA 7 20
BEGIN
KEY " datadoc"
PROMPT 30 1 "del "
FIELD EX_DATADOC
END
END
SECTION RIGHE_MOV 3 1 1 FILE LF_RMOVMAG GROUP NUMREG SECTION RIGHE_MOV 3 1 1 FILE LF_RMOVMAG GROUP NUMREG
SECTION CAUS_RIGA 1 1 1 STREXPR LF_RMOVMAG->CAUS!="" SECTION CAUS_RIGA 1 1 1 STREXPR LF_RMOVMAG->CAUS!=""

6
mg/mg4300.cpp
View File

@ -30,8 +30,12 @@ public:
bool ragg_grpfis() const { return get_int("B5"); } bool ragg_grpfis() const { return get_int("B5"); }
bool ragg_caus() const { return get_int("B6"); } bool ragg_caus() const { return get_int("B6"); }
void set_last_numreg(long n) { put("I4",n); }
int last_numreg() const { return get_int("I4"); } int last_numreg() const { return get_int("I4"); }
void set_last_numreg(long n) { put("I4",n); }
// data ultima stampa esercizio precedente
TDate last_print_prec() const { return get_date("D4"); }
// pagina ultima stampa esercizio precedente
int pag_stampate_prec() const{ return get_int("I6"); }
TRegistro_giornalemag(const char* code = "", int year = 0); TRegistro_giornalemag(const char* code = "", int year = 0);
virtual ~TRegistro_giornalemag() {} virtual ~TRegistro_giornalemag() {}

16
mg/mg4300.frm
View File

@ -171,7 +171,19 @@ SECTION BODY ODD 2
PROMPT 31 1 "" PROMPT 31 1 ""
FIELD ALIAS_CAUSALI@->S0 FIELD ALIAS_CAUSALI@->S0
END END
SECTION HEADER_DOC 2 1 1 NUMEXPR LF_MOVMAG->NUMDOC!=0 SECTION HEADER_EXDOC 2 1 1 NUMEXPR LF_MOVMAG->EX_NUMDOC!=0
STRINGA 101 25
BEGIN
PROMPT 10 1 "Documento "
FIELD LF_MOVMAG->EX_NUMDOC
END
STRINGA 101 10
BEGIN
PROMPT 30 1 "del "
FIELD LF_MOVMAG->EX_DATADOC
END
END // end section header doc
SECTION HEADER_DOC 2 1 1 NUMEXPR (LF_MOVMAG->EX_NUMDOC==0) && (LF_MOVMAG->NUMDOC!=0)
STRINGA 101 25 STRINGA 101 25
BEGIN BEGIN
PROMPT 10 1 "Documento " PROMPT 10 1 "Documento "
@ -182,7 +194,7 @@ SECTION BODY ODD 2
PROMPT 30 1 "del " PROMPT 30 1 "del "
FIELD LF_MOVMAG->ANNODOC FIELD LF_MOVMAG->ANNODOC
END END
END END // end section header doc
END END
END // header_ragg_crono END // header_ragg_crono

BIN
mg/mg_ana.doc
View File

Binary file not shown.

4
mg/mgarea.men
View File

@ -62,7 +62,7 @@ Item_08 = "Nazioni", "ba3 -0 %STA", ""
Item_09 = "Lingue", "ba3 -0 %LNG", "" Item_09 = "Lingue", "ba3 -0 %LNG", ""
Item_10 = "Divise", "ba3 -0 %VAL", "" Item_10 = "Divise", "ba3 -0 %VAL", ""
Item_11 = "Cambi giornalieri", "ba3 -0 CAM", "" Item_11 = "Cambi giornalieri", "ba3 -0 CAM", ""
Item_12 = "Esercizi", "ba3 -0 esc", "" Item_12 = "Esercizi", "cg0 -5 esc", ""
[MGAREA_006] [MGAREA_006]
Caption = "Tabelle magazzino" Caption = "Tabelle magazzino"
@ -182,7 +182,7 @@ Item_09 = "Modifica valori", "ve4 -0", ""
[MGAREA_020] [MGAREA_020]
Caption = "Configurazione" Caption = "Configurazione"
Picture = <mg00.bmp> Picture = <ba04.bmp>
Module = 0 Module = 0
Flags = "" Flags = ""
Item_01 = "Magazzino", [MGAREA_022] Item_01 = "Magazzino", [MGAREA_022]