aggiunta la maschera per le righe effetto
git-svn-id: svn://10.65.10.50/trunk@3866 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
		
							parent
							
								
									7b344797cf
								
							
						
					
					
						commit
						c0267f0832
					
				
							
								
								
									
										81
									
								
								ef/ef0100c.uml
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										81
									
								
								ef/ef0100c.uml
									
									
									
									
									
										Executable file
									
								
							@ -0,0 +1,81 @@
 | 
			
		||||
#include "ef0100.h"
 | 
			
		||||
 | 
			
		||||
PAGE "Righe Effetto"  -1 -1 76 13
 | 
			
		||||
 | 
			
		||||
NUMBER F_IMPFATT 18 2
 | 
			
		||||
BEGIN              
 | 
			
		||||
        PROMPT 2 1 "Importo fattura "
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER F_IMPEFF 18 2
 | 
			
		||||
BEGIN         
 | 
			
		||||
  PROMPT 2 2  "Importo effett. "
 | 
			
		||||
  NUM_EXPR #F_IMPFATT>=#F_IMPEFF
 | 
			
		||||
  WARNING "L'importo dell'effetto non puo' superare l'importo della fattura"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER F_IMPFATTVAL 18 3
 | 
			
		||||
BEGIN         
 | 
			
		||||
  PROMPT 2 3 "Imp. fatt. val  "
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER F_IMPEFFVAL 18 3
 | 
			
		||||
BEGIN        
 | 
			
		||||
  PROMPT 2 4 "Imp. effet. val "
 | 
			
		||||
  NUM_EXPR #F_IMPFATTVAL>=#F_IMPEFFVAL
 | 
			
		||||
  WARNING "L'importo dell'effetto in valuta non puo' superare l'importo della fattura in valuta"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER F_ANNO 4 
 | 
			
		||||
BEGIN
 | 
			
		||||
        PROMPT 2 5 "Anno partita    "
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING F_NUMPART 7
 | 
			
		||||
BEGIN              
 | 
			
		||||
        PROMPT 2 6 "Nr. partita     "
 | 
			
		||||
        FLAG "R"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER F_NUMRIGA 4
 | 
			
		||||
BEGIN              
 | 
			
		||||
        PROMPT 2 7 "Nr. riga        "
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER F_NUMRATA 3
 | 
			
		||||
BEGIN             
 | 
			
		||||
        PROMPT 2 8 "Nr. rata        "
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING F_NUMFATT 7
 | 
			
		||||
BEGIN
 | 
			
		||||
        PROMPT 2 9 "Nr. fattura     "
 | 
			
		||||
        FLAG "R"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
DATA F_DATAFATT
 | 
			
		||||
BEGIN               
 | 
			
		||||
        PROMPT  2 10 "Data fattura    "
 | 
			
		||||
        FLAG "R"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_OK 9 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT -13 -1 ""
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_CANCEL 9 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT -23 -1 ""
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_DELREC 9 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT -33 -1 "Elimina"
 | 
			
		||||
  MESSAGE EXIT, K_DEL
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
ENDPAGE
 | 
			
		||||
 | 
			
		||||
ENDMASK
 | 
			
		||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user