Patch level : 10.1050
Files correlati : ci1.exe cg3.exe Ricompilazione Demo : [ ] Commento : Apertura / Chiusura a contailità separata git-svn-id: svn://10.65.10.50/branches/R_10_00@22395 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
e261bafeca
commit
103a0fdb0d
@ -655,6 +655,7 @@ void TRilevamento_cons_msk::riempi_sheet(char tipo)
|
||||
riga.add(rilore.get(RILORE_CUP), sheet.cid2index(S_CUP));
|
||||
riga.add(rilore.get(RILORE_CIG), sheet.cid2index(S_CIG));
|
||||
riga.add(tipo == 'D' ? 0 : rilore.get(RILORE_ID), sheet.cid2index(S_ID));
|
||||
riga.add(rilore.get(RILORE_RIMBORSO), sheet.cid2index(S_RIMBORSO));
|
||||
|
||||
const int r = sheet.items() - 1;
|
||||
|
||||
@ -1059,6 +1060,7 @@ void TRilevamento_cons_msk::registra()
|
||||
const real costo(riga.get(sheet.cid2index(S_COSTO)));
|
||||
const TString16 cup(riga.get(sheet.cid2index(S_CUP)));
|
||||
const TString16 cig(riga.get(sheet.cid2index(S_CIG)));
|
||||
const bool rimborso = strcmp(riga.get(sheet.cid2index(S_RIMBORSO)), "X") == 0;
|
||||
|
||||
get_row_anal_fields(riga, codcosto, codcms, codfase);
|
||||
const bool found = rilroa.read('C', id) == NOERR;
|
||||
@ -1114,6 +1116,7 @@ void TRilevamento_cons_msk::registra()
|
||||
rilroa.put(RILORE_COSTO, costo);
|
||||
rilroa.put(RILORE_CUP, cup);
|
||||
rilroa.put(RILORE_CIG, cig);
|
||||
rilroa.put(RILORE_RIMBORSO, rimborso);
|
||||
|
||||
if (_numcn.full() && _tipocn.full())
|
||||
{
|
||||
|
@ -61,7 +61,8 @@
|
||||
#define S_CIG 122
|
||||
#define S_DESRIS 123
|
||||
#define S_DESATT 224
|
||||
#define S_ID 124
|
||||
#define S_RIMBORSO 124
|
||||
#define S_ID 125
|
||||
|
||||
#define S_CMSH 350
|
||||
#define S_DCUP 351
|
||||
|
@ -175,6 +175,7 @@ BEGIN
|
||||
ITEM "CUP@15"
|
||||
ITEM "CIG@10"
|
||||
ITEM "Descrizione@50"
|
||||
ITEM "Rimborso"
|
||||
ITEM "ID@8"
|
||||
END
|
||||
|
||||
@ -409,9 +410,15 @@ BEGIN
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
BOOLEAN S_RIMBORSO
|
||||
BEGIN
|
||||
PROMPT 31 14 "Rimborso"
|
||||
END
|
||||
|
||||
|
||||
BOOLEAN S_DEL
|
||||
BEGIN
|
||||
PROMPT 31 14 "Elimina"
|
||||
PROMPT 2 15 "Elimina"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
@ -1,3 +1,3 @@
|
||||
125
|
||||
0
|
||||
$rilore|||163|0|Rilevamento Ore|||
|
||||
$rilore|3882|3890|164|0|Rilevamento Ore|||
|
||||
|
@ -1,5 +1,5 @@
|
||||
125
|
||||
20
|
||||
21
|
||||
TIPO|1|1|0|<D>efault <P>reventivo <C>onsuntivo
|
||||
ID|3|8|0|Id del record
|
||||
TIPORA|1|1|0|<R>isorsa <A>ttrezzatura
|
||||
@ -20,6 +20,7 @@ NDOC|3|7|0|Chiave doc - NDOC
|
||||
IDRIGA|3|6|0|Chiave doc -IDRIGA
|
||||
CUP|1|15|0|Codice Unico di Progetto
|
||||
CIG|1|10|0|Codice Identificativo di Gara
|
||||
RIMBORSO|8|1|0|Rimborso
|
||||
5
|
||||
TIPO+ID|
|
||||
TIPO+DADATA+TIPORA+CODICE+TPORA+CODCOSTO+CODCMS+CODFASE|X
|
||||
|
@ -21,5 +21,6 @@
|
||||
#define RILORE_IDRIGA "IDRIGA"
|
||||
#define RILORE_CUP "CUP"
|
||||
#define RILORE_CIG "CIG"
|
||||
#define RILORE_RIMBORSO "RIMBORSO"
|
||||
|
||||
#endif
|
||||
|
Loading…
x
Reference in New Issue
Block a user