Files correlati : Ricompilazione Demo : [ ] Commento : Revisione Maschere modulo vd git-svn-id: svn://10.65.10.50/trunk@16685 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			99 lines
		
	
	
		
			1.2 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			99 lines
		
	
	
		
			1.2 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "vd1600.h"
 | 
						|
 | 
						|
TOOLBAR "" 0 0 0 2
 | 
						|
 | 
						|
BUTTON DLG_PRINT 10 2
 | 
						|
BEGIN
 | 
						|
  PROMPT -14 -11 ""
 | 
						|
  MESSAGE EXIT,K_ENTER
 | 
						|
END
 | 
						|
 | 
						|
BUTTON DLG_INFO 10 2
 | 
						|
BEGIN
 | 
						|
  PROMPT -24 -11 ""
 | 
						|
END
 | 
						|
 | 
						|
BUTTON DLG_HELP 10 2
 | 
						|
BEGIN
 | 
						|
  PROMPT -34 -11 ""
 | 
						|
END
 | 
						|
 | 
						|
BUTTON DLG_QUIT 11 2
 | 
						|
BEGIN
 | 
						|
  PROMPT -44 -11 ""
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
PAGE "Parametri stampa"  0 0 0 0
 | 
						|
 | 
						|
STRING F_CODCASSA 3
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 2 "Cassa "
 | 
						|
  USE CAS
 | 
						|
  INPUT CODTAB F_CODCASSA
 | 
						|
  DISPLAY "Codice" CODTAB
 | 
						|
  DISPLAY "Descrizione @50" S0
 | 
						|
  OUTPUT F_CODCASSA CODTAB
 | 
						|
  OUTPUT F_CASSA_DESCR S0
 | 
						|
  FIELD CODCASSA
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
  FLAGS "UZ"
 | 
						|
END
 | 
						|
 | 
						|
STRING F_CASSA_DESCR 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 15 2 ""
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
DATE F_DADATA
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 3 "Dalla data   "
 | 
						|
  FLAGS "A"
 | 
						|
  FIELD DADATA
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
DATE F_ADATA
 | 
						|
BEGIN
 | 
						|
  PROMPT 30 3 "Alla data   "
 | 
						|
  FLAGS "A"
 | 
						|
  FIELD ADATA
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
STRING F_CODNUM 4
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 4 "Numerazione scontrini "
 | 
						|
  FLAGS "DG"
 | 
						|
  USE %NUM
 | 
						|
  INPUT CODTAB F_CODNUM
 | 
						|
  OUTPUT F_DESNUM S0
 | 
						|
  FIELD CODNUM
 | 
						|
  CHECKTYPE NORMAL
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DESNUM 50 35
 | 
						|
BEGIN
 | 
						|
  PROMPT 30 4 ""
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_ANNO 4
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 6 ""
 | 
						|
  FLAGD "HDGA"
 | 
						|
  FIELD ANNO
 | 
						|
END
 | 
						|
 | 
						|
STRING F_REPORT 256 56
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 8 "Report       "
 | 
						|
  FLAGS "B"
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
ENDMASK
 |