Files correlati : Ricompilazione Demo : [ ] Commento :Ricompilazione files git-svn-id: svn://10.65.10.50/trunk@19971 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			72 lines
		
	
	
		
			1.1 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			72 lines
		
	
	
		
			1.1 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "pd5317100.h"
 | 
						|
 | 
						|
TOOLBAR "topbar" 0 0 0 2
 | 
						|
#include "printbar.h"    
 | 
						|
ENDPAGE 
 | 
						|
 | 
						|
PAGE "Stampa Listino Carrelli" -1 -1 40 5
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 76 5 
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 1 "@b Parametri Carrelli"
 | 
						|
END
 | 
						|
 | 
						|
STRING F_COD_CMS 6
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 2 "Da Numero"
 | 
						|
  FLAGS "U"  
 | 
						|
  USE 147
 | 
						|
  INPUT CODCMS F_COD_CMS
 | 
						|
  DISPLAY "Codice" CODCMS
 | 
						|
  DISPLAY "Descrizione@50" DESCRIZ
 | 
						|
  OUTPUT F_COD_CMS CODCMS
 | 
						|
  OUTPUT F_DES_CMS DESCRIZ 
 | 
						|
  CHECKTYPE SEARCH
 | 
						|
  MESSAGE EMPTY "",F_DES_CMS
 | 
						|
  FIELD #FROM
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DES_CMS 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 25 2 ""
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
STRING F_COD_CMS_TO 6
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 3 "A Numero "
 | 
						|
  FLAGS "U"  
 | 
						|
  USE 147
 | 
						|
  INPUT CODCMS F_COD_CMS_TO
 | 
						|
  DISPLAY "Codice" CODCMS
 | 
						|
  DISPLAY "Descrizione@50" DESCRIZ
 | 
						|
  OUTPUT F_COD_CMS_TO CODCMS
 | 
						|
  OUTPUT F_DES_CMS_TO DESCRIZ 
 | 
						|
  CHECKTYPE SEARCH
 | 
						|
  MESSAGE EMPTY "",F_DES_CMS_TO
 | 
						|
  FIELD #TO
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DES_CMS_TO 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 25 3 ""
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_VENDUTO
 | 
						|
BEGIN
 | 
						|
  FIELD #F_VEN
 | 
						|
  PROMPT 2 6 "Venduti"
 | 
						|
  MESSAGE TRUE " ",F_CARICO
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_CARICO
 | 
						|
BEGIN
 | 
						|
  FIELD #F_CAR
 | 
						|
  PROMPT 2 8 "In Carico"
 | 
						|
  MESSAGE TRUE " ",F_VENDUTO
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
ENDMASK
 |