Files correlati : pd6342 pd6342a.msk Ricompilazione Demo : [ ] Commento : Correzioni di Guy git-svn-id: svn://10.65.10.50/branches/R_10_00@20974 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			529 lines
		
	
	
		
			6.4 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			529 lines
		
	
	
		
			6.4 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
| #include "pd6342400a.h"
 | |
| 
 | |
| TOOLBAR "" 0 0 0 2
 | |
| 
 | |
| BUTTON DLG_CERCA
 | |
| BEGIN
 | |
|   PROMPT 1 1 "Cerca"
 | |
|   PICTURE TOOL_FINDREC
 | |
| END
 | |
| 
 | |
| BUTTON DLG_SALVA
 | |
| BEGIN
 | |
|   PROMPT 1 1 "Salva"
 | |
|   PICTURE TOOL_SAVEREC
 | |
| END
 | |
| 
 | |
| BUTTON DLG_ANNULLA
 | |
| BEGIN
 | |
|   PROMPT 1 1 "Annulla"
 | |
|   PICTURE TOOL_CANCEL
 | |
| END
 | |
| 
 | |
| #include <elabar.h>
 | |
| 
 | |
| ENDPAGE
 | |
| 
 | |
| PAGE "Quadra movimenti" -1 -1 80 0  
 | |
| 
 | |
| GROUPBOX DLG_NULL 78 3
 | |
| BEGIN
 | |
| 	PROMPT 1 0 "@bFiltro righe analitiche"
 | |
| END
 | |
| 
 | |
| DATE F_DADATA
 | |
| BEGIN
 | |
|   PROMPT 2 1 "Considera i movimenti dal "
 | |
|   CHECKTYPE REQUIRED
 | |
| END
 | |
| 
 | |
| DATE F_ADATA
 | |
| BEGIN
 | |
|   PROMPT 42 1 "al "
 | |
|   FLAGS "A"
 | |
|   CHECKTYPE REQUIRED
 | |
| END
 | |
| 
 | |
| GROUPBOX DLG_NULL 78 5
 | |
| BEGIN
 | |
| 	PROMPT 1 3 "@bParametri per la quadratura"
 | |
| END
 | |
| 
 | |
| NUMBER F_NUMREGCG 7
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Mov. contabile    "
 | |
|   USE LF_MOV SELECT TOTDOC>0
 | |
|   INPUT NUMREG F_NUMREGCG
 | |
|   DISPLAY "Numreg" NUMREG
 | |
|   DISPLAY "Descrizione@50" DESCR
 | |
|   DISPLAY "Totale documento@R" TOTDOC
 | |
|   OUTPUT F_NUMREGCG NUMREG
 | |
|   OUTPUT F_DESREGCG DESCR
 | |
|   OUTPUT F_TOTDOC TOTDOC
 | |
|   CHECKTYPE REQUIRED
 | |
| END
 | |
| 
 | |
| STRING F_DESREGCG 50 47
 | |
| BEGIN
 | |
|   PROMPT 30 4 ""
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| CURRENCY F_TOTDOC 18
 | |
| BEGIN
 | |
|   PROMPT 2 5 "Tot. da quadrare  "
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| CURRENCY F_TOTRIGHE 18
 | |
| BEGIN
 | |
|   PROMPT 42 5 "Tot. righe "
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| SPREADSHEET F_MOVNNQUAD
 | |
| BEGIN
 | |
|   PROMPT 0 8 ""
 | |
|   ITEM "Dare@9"
 | |
|   ITEM "Avere@9"
 | |
|   ITEM "Descrizione@15"  
 | |
|   ITEM "CDC1"
 | |
|   ITEM "CDC2"
 | |
|   ITEM "CDC3"
 | |
|   ITEM "CDC4"
 | |
|   ITEM "CDC5"
 | |
|   ITEM "CDC6"
 | |
|   ITEM "CDC7"
 | |
|   ITEM "CDC8"
 | |
|   ITEM "CDC9"
 | |
|   ITEM "CDC10"
 | |
|   ITEM "CDC11"
 | |
|   ITEM "CDC12"
 | |
|   ITEM "CONT1"
 | |
|   ITEM "CONT2"
 | |
|   ITEM "CONT3"
 | |
|   ITEM "CONT4"
 | |
|   ITEM "Reg@5"
 | |
|   ITEM "Riga@5"
 | |
|   ITEM "Data"
 | |
| END
 | |
| 
 | |
| SPREADSHEET F_MOVQUAD 39 0
 | |
| BEGIN
 | |
|   PROMPT 41 8 ""
 | |
|   ITEM "Dare@9"
 | |
|   ITEM "Avere@9"
 | |
|   ITEM "Descrizione@15"  
 | |
|   ITEM "CDC1"
 | |
|   ITEM "CDC2"
 | |
|   ITEM "CDC3"
 | |
|   ITEM "CDC4"
 | |
|   ITEM "CDC5"
 | |
|   ITEM "CDC6"
 | |
|   ITEM "CDC7"
 | |
|   ITEM "CDC8"
 | |
|   ITEM "CDC9"
 | |
|   ITEM "CDC10"
 | |
|   ITEM "CDC11"
 | |
|   ITEM "CDC12"
 | |
|   ITEM "CONT1"
 | |
|   ITEM "CONT2"
 | |
|   ITEM "CONT3"
 | |
|   ITEM "CONT4"
 | |
|   ITEM "Reg@5"
 | |
|   ITEM "Riga@5"
 | |
|   ITEM "Data"
 | |
| END
 | |
| 
 | |
| ENDPAGE
 | |
| ENDMASK
 | |
| 
 | |
| PAGE "Riga analitica" -1 -1 78 13
 | |
| 
 | |
| CURRENCY NQ_DARE 15
 | |
| BEGIN
 | |
|   PROMPT 2  1 "Dare "
 | |
| END
 | |
| 
 | |
| CURRENCY NQ_AVERE 15
 | |
| BEGIN
 | |
|   PROMPT 43 1 "Avere "
 | |
| END
 | |
| 
 | |
| STRING NQ_DESCR 50
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Descrizione "
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC1 20
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Cdc 1"
 | |
|   USE LF_CDC
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC2 20
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC3 20
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC4 20
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC5 20
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC6 20
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC7 20
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC8 20
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC9 20
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC10 20
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC11 20
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CDC12 20
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Cdc 2"
 | |
|   COPY USE NQ_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CONT1 20
 | |
| BEGIN
 | |
|   PROMPT 2 5 "Con 1"
 | |
|   USE LF_PCON
 | |
|   CHECKTYPE NORMAL
 | |
|   GROUP 1
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CONT2 20
 | |
| BEGIN
 | |
|   PROMPT 21 5 "Con 2"
 | |
|   COPY USE NQ_CONT1
 | |
|   CHECKTYPE NORMAL
 | |
|   GROUP 1
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CONT3 20
 | |
| BEGIN
 | |
|   PROMPT 41 5 "Con 3"
 | |
|   COPY USE NQ_CONT1
 | |
|   CHECKTYPE NORMAL
 | |
|   GROUP 1
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING NQ_CONT4 20
 | |
| BEGIN
 | |
|   PROMPT 61 5 "Con 4"
 | |
|   COPY USE NQ_CONT1
 | |
|   CHECKTYPE NORMAL
 | |
|   GROUP 1
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| NUMBER NQ_NUMREG 10
 | |
| BEGIN
 | |
|   PROMPT 2 7 "Num. registrazione"
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| NUMBER NQ_NUMRIGA 10
 | |
| BEGIN
 | |
|   PROMPT 33 7 "Num. riga"
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| DATE NQ_DATACOMP
 | |
| BEGIN
 | |
|   PROMPT 2 8 "Data competenza   "
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| BUTTON DLG_USER 2 2
 | |
| BEGIN
 | |
|   PROMPT 200 200 ""
 | |
| END
 | |
| 
 | |
| ENDPAGE
 | |
| 
 | |
| TOOLBAR "" 0 0 0 2
 | |
| 
 | |
| BUTTON DLG_OK 2 2
 | |
| BEGIN
 | |
|   PROMPT 1 1 ""
 | |
| END
 | |
| 
 | |
| BUTTON DLG_DELREC 2 2
 | |
| BEGIN
 | |
|   PROMPT 2 1 "Sposta"
 | |
|   PICTURE BMP_LINK  
 | |
| END
 | |
| 
 | |
| BUTTON DLG_CANCEL 2 2
 | |
| BEGIN
 | |
|   PROMPT 3 1 ""
 | |
| END
 | |
| 
 | |
| ENDPAGE
 | |
| ENDMASK
 | |
| 
 | |
| PAGE "Riga analitica" -1 -1 78 13
 | |
| 
 | |
| CURRENCY Q_DARE 15
 | |
| BEGIN
 | |
|   PROMPT 2  1 "Dare "
 | |
| END
 | |
| 
 | |
| CURRENCY Q_AVERE 15
 | |
| BEGIN
 | |
|   PROMPT 43 1 "Avere "
 | |
| END
 | |
| 
 | |
| STRING Q_DESCR 50
 | |
| BEGIN
 | |
|   PROMPT 2 2 "Descrizione "
 | |
| END
 | |
| 
 | |
| STRING Q_CDC1 20
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Cdc 1"
 | |
|   USE LF_CDC
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC2 20
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC3 20
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC4 20
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC5 20
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC6 20
 | |
| BEGIN
 | |
|   PROMPT 2 3 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC7 20
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC8 20
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC9 20
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC10 20
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC11 20
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CDC12 20
 | |
| BEGIN
 | |
|   PROMPT 2 4 "Cdc 2"
 | |
|   COPY USE Q_CDC1
 | |
|   CHECKTYPE NORMAL
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CONT1 20
 | |
| BEGIN
 | |
|   PROMPT 2 5 "Con 1"
 | |
|   USE LF_PCON
 | |
|   CHECKTYPE NORMAL
 | |
|   GROUP 1
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CONT2 20
 | |
| BEGIN
 | |
|   PROMPT 21 5 "Con 2"
 | |
|   COPY USE Q_CONT1
 | |
|   CHECKTYPE NORMAL
 | |
|   GROUP 1
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CONT3 20
 | |
| BEGIN
 | |
|   PROMPT 41 5 "Con 3"
 | |
|   COPY USE Q_CONT1
 | |
|   CHECKTYPE NORMAL
 | |
|   GROUP 1
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| STRING Q_CONT4 20
 | |
| BEGIN
 | |
|   PROMPT 61 5 "Con 4"
 | |
|   COPY USE Q_CONT1
 | |
|   CHECKTYPE NORMAL
 | |
|   GROUP 1
 | |
|   FLAGS "H"
 | |
| END
 | |
| 
 | |
| NUMBER Q_NUMREG 10
 | |
| BEGIN
 | |
|   PROMPT 2 7 "Num. registrazione"
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| NUMBER Q_NUMRIGA 10
 | |
| BEGIN
 | |
|   PROMPT 33 7 "Num. riga"
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| DATE Q_DATACOMP
 | |
| BEGIN
 | |
|   PROMPT 2 8 "Data competenza   "
 | |
|   FLAGS "D"
 | |
| END
 | |
| 
 | |
| BUTTON DLG_USER 2 2
 | |
| BEGIN
 | |
|   PROMPT 200 200 ""
 | |
| END
 | |
| 
 | |
| ENDPAGE
 | |
| 
 | |
| TOOLBAR "" 0 0 0 2
 | |
| 
 | |
| BUTTON DLG_OK 2 2
 | |
| BEGIN
 | |
|   PROMPT 1 1 ""
 | |
| END
 | |
| 
 | |
| BUTTON DLG_DELREC 2 2
 | |
| BEGIN
 | |
|   PROMPT 2 1 "Sposta"
 | |
|   PICTURE BMP_LINK  
 | |
| END
 | |
| 
 | |
| BUTTON DLG_CANCEL 2 2
 | |
| BEGIN
 | |
|   PROMPT 3 1 ""
 | |
| END
 | |
| 
 | |
| ENDPAGE
 | |
| ENDMASK |