Patch level : 12.00 1263
Files correlati : Commento : Aggiunto stato alla copia documento
This commit is contained in:
		
							parent
							
								
									7f416cbc7b
								
							
						
					
					
						commit
						c6f94af3f4
					
				@ -228,6 +228,8 @@ void TCopydoc_app::main_loop()
 | 
			
		||||
        sf.items() == filtro.items())
 | 
			
		||||
      filtro.cut(0);
 | 
			
		||||
 | 
			
		||||
		TString stato = m.get(F_TO_STATO);
 | 
			
		||||
 | 
			
		||||
    TRelation rel(LF_DOC);
 | 
			
		||||
    TCursor cur(&rel, filtro, 1, &rec_from, &rec_to);
 | 
			
		||||
        
 | 
			
		||||
@ -286,6 +288,8 @@ void TCopydoc_app::main_loop()
 | 
			
		||||
              }
 | 
			
		||||
            }
 | 
			
		||||
          }
 | 
			
		||||
					if (stato.full())
 | 
			
		||||
						newdoc.put(DOC_STATO, stato);
 | 
			
		||||
					newdoc.write();
 | 
			
		||||
        }
 | 
			
		||||
      }
 | 
			
		||||
 | 
			
		||||
@ -15,6 +15,7 @@
 | 
			
		||||
#define F_TO_PROVV     303
 | 
			
		||||
#define F_TO_DES       304
 | 
			
		||||
#define F_TO_NDOC      305
 | 
			
		||||
#define F_TO_STATO		 306
 | 
			
		||||
 | 
			
		||||
#define F_TIPO_SEL     101 
 | 
			
		||||
#define F_TIPO_DOC     102  
 | 
			
		||||
 | 
			
		||||
@ -96,7 +96,18 @@ END
 | 
			
		||||
 | 
			
		||||
NUMBER F_TO_NDOC 6
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 30 6 "Numero "
 | 
			
		||||
  PROMPT 29 6 "Numero "
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING F_TO_STATO 1
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 45 6 "Stato "
 | 
			
		||||
  USE %STD
 | 
			
		||||
  INPUT CODTAB F_TO_STATO
 | 
			
		||||
  DISPLAY "Codice" CODTAB
 | 
			
		||||
  DISPLAY "Descrizione@50" S0
 | 
			
		||||
  OUTPUT F_TO_STATO CODTAB  
 | 
			
		||||
  FLAG "U"  
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
LIST F_TO_PROVV 1 12
 | 
			
		||||
 | 
			
		||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user