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_CUP), sheet.cid2index(S_CUP));
 | 
				
			||||||
    riga.add(rilore.get(RILORE_CIG), sheet.cid2index(S_CIG));
 | 
					    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(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;
 | 
							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 real      costo(riga.get(sheet.cid2index(S_COSTO)));
 | 
				
			||||||
    const TString16 cup(riga.get(sheet.cid2index(S_CUP)));
 | 
					    const TString16 cup(riga.get(sheet.cid2index(S_CUP)));
 | 
				
			||||||
    const TString16 cig(riga.get(sheet.cid2index(S_CIG)));
 | 
					    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);
 | 
							get_row_anal_fields(riga, codcosto, codcms, codfase);
 | 
				
			||||||
    const bool found = rilroa.read('C', id) == NOERR;
 | 
					    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_COSTO, costo);
 | 
				
			||||||
      rilroa.put(RILORE_CUP, cup);
 | 
					      rilroa.put(RILORE_CUP, cup);
 | 
				
			||||||
      rilroa.put(RILORE_CIG, cig);
 | 
					      rilroa.put(RILORE_CIG, cig);
 | 
				
			||||||
 | 
					      rilroa.put(RILORE_RIMBORSO, rimborso);
 | 
				
			||||||
 | 
					
 | 
				
			||||||
			if (_numcn.full() && _tipocn.full())
 | 
								if (_numcn.full() && _tipocn.full())
 | 
				
			||||||
			{
 | 
								{
 | 
				
			||||||
 | 
				
			|||||||
@ -61,7 +61,8 @@
 | 
				
			|||||||
#define S_CIG 				122
 | 
					#define S_CIG 				122
 | 
				
			||||||
#define S_DESRIS      123
 | 
					#define S_DESRIS      123
 | 
				
			||||||
#define S_DESATT      224
 | 
					#define S_DESATT      224
 | 
				
			||||||
#define S_ID					124
 | 
					#define S_RIMBORSO		124
 | 
				
			||||||
 | 
					#define S_ID					125
 | 
				
			||||||
 | 
					
 | 
				
			||||||
#define S_CMSH				350
 | 
					#define S_CMSH				350
 | 
				
			||||||
#define S_DCUP 				351
 | 
					#define S_DCUP 				351
 | 
				
			||||||
 | 
				
			|||||||
@ -175,6 +175,7 @@ BEGIN
 | 
				
			|||||||
  ITEM "CUP@15"
 | 
					  ITEM "CUP@15"
 | 
				
			||||||
  ITEM "CIG@10"
 | 
					  ITEM "CIG@10"
 | 
				
			||||||
  ITEM "Descrizione@50"
 | 
					  ITEM "Descrizione@50"
 | 
				
			||||||
 | 
					  ITEM "Rimborso"
 | 
				
			||||||
  ITEM "ID@8"
 | 
					  ITEM "ID@8"
 | 
				
			||||||
END
 | 
					END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
@ -409,9 +410,15 @@ BEGIN
 | 
				
			|||||||
  FLAGS "D"
 | 
					  FLAGS "D"
 | 
				
			||||||
END
 | 
					END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					BOOLEAN S_RIMBORSO
 | 
				
			||||||
 | 
					BEGIN
 | 
				
			||||||
 | 
						PROMPT 31 14 "Rimborso"
 | 
				
			||||||
 | 
					END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					
 | 
				
			||||||
BOOLEAN S_DEL
 | 
					BOOLEAN S_DEL
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
	PROMPT 31 14 "Elimina"
 | 
						PROMPT 2 15 "Elimina"
 | 
				
			||||||
END
 | 
					END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
ENDPAGE
 | 
					ENDPAGE
 | 
				
			||||||
 | 
				
			|||||||
@ -1,3 +1,3 @@
 | 
				
			|||||||
125
 | 
					125
 | 
				
			||||||
0
 | 
					0
 | 
				
			||||||
$rilore|||163|0|Rilevamento Ore|||
 | 
					$rilore|3882|3890|164|0|Rilevamento Ore|||
 | 
				
			||||||
 | 
				
			|||||||
@ -1,5 +1,5 @@
 | 
				
			|||||||
125
 | 
					125
 | 
				
			||||||
20
 | 
					21
 | 
				
			||||||
TIPO|1|1|0|<D>efault <P>reventivo <C>onsuntivo
 | 
					TIPO|1|1|0|<D>efault <P>reventivo <C>onsuntivo
 | 
				
			||||||
ID|3|8|0|Id del record
 | 
					ID|3|8|0|Id del record
 | 
				
			||||||
TIPORA|1|1|0|<R>isorsa <A>ttrezzatura
 | 
					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
 | 
					IDRIGA|3|6|0|Chiave doc -IDRIGA
 | 
				
			||||||
CUP|1|15|0|Codice Unico di Progetto
 | 
					CUP|1|15|0|Codice Unico di Progetto
 | 
				
			||||||
CIG|1|10|0|Codice Identificativo di Gara
 | 
					CIG|1|10|0|Codice Identificativo di Gara
 | 
				
			||||||
 | 
					RIMBORSO|8|1|0|Rimborso
 | 
				
			||||||
5
 | 
					5
 | 
				
			||||||
TIPO+ID| 
 | 
					TIPO+ID| 
 | 
				
			||||||
TIPO+DADATA+TIPORA+CODICE+TPORA+CODCOSTO+CODCMS+CODFASE|X
 | 
					TIPO+DADATA+TIPORA+CODICE+TPORA+CODCOSTO+CODCMS+CODFASE|X
 | 
				
			||||||
 | 
				
			|||||||
@ -21,5 +21,6 @@
 | 
				
			|||||||
#define RILORE_IDRIGA     "IDRIGA"
 | 
					#define RILORE_IDRIGA     "IDRIGA"
 | 
				
			||||||
#define RILORE_CUP        "CUP"
 | 
					#define RILORE_CUP        "CUP"
 | 
				
			||||||
#define RILORE_CIG        "CIG"
 | 
					#define RILORE_CIG        "CIG"
 | 
				
			||||||
 | 
					#define RILORE_RIMBORSO   "RIMBORSO"
 | 
				
			||||||
 | 
					
 | 
				
			||||||
#endif 
 | 
					#endif 
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user