Files correlati : Ricompilazione Demo : [ ] Commento :modernizzate un casino di maschere! git-svn-id: svn://10.65.10.50/trunk@18142 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			127 lines
		
	
	
		
			1.8 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			127 lines
		
	
	
		
			1.8 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "pr1400.h"
 | 
						|
 | 
						|
TOOLBAR "topbar" 0 0 0 2
 | 
						|
#include <printbar.h>
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
PAGE "Stampa statistiche temporali" 0 2 0 0
 | 
						|
 | 
						|
LISTBOX F_ORDINAMENTO 16
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 2 "Ordinamento per "
 | 
						|
  FLAGS "U"
 | 
						|
  ITEM "C|Codice"
 | 
						|
  MESSAGE HIDE,G_RAGSOC@|SHOW,G_CODAGE@
 | 
						|
  ITEM "R|Ragione sociale"
 | 
						|
  MESSAGE SHOW,G_RAGSOC@|HIDE,G_CODAGE@
 | 
						|
END
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 76 4
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 3 "Intervallo agenti"
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DAAGE 5
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 4 "Dall'agente "
 | 
						|
  FLAGS "UZ"
 | 
						|
  USE LF_AGENTI
 | 
						|
  INPUT CODAGE F_DAAGE
 | 
						|
  DISPLAY "Codice" CODAGE
 | 
						|
  DISPLAY "Descr@50" RAGSOC
 | 
						|
  OUTPUT F_DAAGE CODAGE
 | 
						|
  OUTPUT F_DESFROM RAGSOC
 | 
						|
  CHECKTYPE NORMAL
 | 
						|
  GROUP G_CODAGE
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DESFROM 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 25 4 ""
 | 
						|
  FLAGS "D"
 | 
						|
  GROUP G_CODAGE
 | 
						|
END
 | 
						|
 | 
						|
STRING F_AAGE 5
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 5 "All'agente  "
 | 
						|
  FLAGS "UZ"
 | 
						|
  COPY USE F_DAAGE
 | 
						|
  INPUT CODAGE F_AAGE
 | 
						|
  COPY DISPLAY F_DAAGE
 | 
						|
  OUTPUT F_AAGE CODAGE
 | 
						|
  OUTPUT F_DESTO RAGSOC
 | 
						|
  CHECKTYPE NORMAL
 | 
						|
  GROUP G_CODAGE
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DESTO 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 25 5 ""
 | 
						|
  FLAGS "D"
 | 
						|
  GROUP G_CODAGE
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DADES 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 4 "Dall'agente "
 | 
						|
  USE LF_AGENTI KEY 2
 | 
						|
  INPUT RAGSOC F_DADES
 | 
						|
  DISPLAY "Descr@50" RAGSOC
 | 
						|
  DISPLAY "Codice@20" CODAGE
 | 
						|
  OUTPUT F_DADES RAGSOC
 | 
						|
  CHECKTYPE NORMAL
 | 
						|
  GROUP G_RAGSOC
 | 
						|
END
 | 
						|
 | 
						|
STRING F_ADES 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 5 "All'agente  "
 | 
						|
  COPY USE F_DADES
 | 
						|
  INPUT RAGSOC F_ADES
 | 
						|
  COPY DISPLAY F_DADES
 | 
						|
  OUTPUT F_ADES RAGSOC
 | 
						|
  CHECKTYPE NORMAL
 | 
						|
  GROUP G_RAGSOC
 | 
						|
END
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 38 3
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 7 "Intervallo date"
 | 
						|
END
 | 
						|
 | 
						|
DATE F_DATEFROM
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 8 "Da   "
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
DATE F_DATETO
 | 
						|
BEGIN
 | 
						|
  PROMPT 24 8 "A   " 
 | 
						|
  FLAGS "A"
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
LISTBOX F_GROUPMONTH 2
 | 
						|
BEGIN
 | 
						|
  PROMPT 42 8 "Mesi da raggruppare "
 | 
						|
  ITEM "1|1"
 | 
						|
  ITEM "2|2"
 | 
						|
  ITEM "3|3"
 | 
						|
  ITEM "4|4"
 | 
						|
  ITEM "5|5"
 | 
						|
  ITEM "6|6"
 | 
						|
  ITEM "7|7"
 | 
						|
  ITEM "8|8"
 | 
						|
  ITEM "9|9"
 | 
						|
  ITEM "10|10"
 | 
						|
  ITEM "11|11"
 | 
						|
  ITEM "12|12"
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
ENDMASK
 | 
						|
 |