Files correlati : cg2.exe cg2100a.msk cg2100b.msk cg2100c.msk Ricompilazione Demo : [ ] Commento : Nuove implementazioni: 18 Implementare la possibilità di portare nel saldaconto anche le partite su conti normali. (Creazione scadenze) 28 Implementare la visualizzazione del saldo in fase di inserimento. Nuovo bottone o funzione automatica di visualizzazione git-svn-id: svn://10.65.10.50/trunk@11457 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			118 lines
		
	
	
		
			2.0 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			118 lines
		
	
	
		
			2.0 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "cg2100.h"
 | 
						|
 | 
						|
TOOLBAR "" 0 -2 0 2
 | 
						|
#include <toolbar.h>
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
PAGE "Ricerca" -1 -1 77 8
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 78 3
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 1 "@bDitta"
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_CODDITTA 5
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 2 "Codice "
 | 
						|
  FLAGS "FD"
 | 
						|
  USE LF_NDITTE
 | 
						|
  CHECKTYPE NORMAL
 | 
						|
  INPUT CODDITTA F_CODDITTA
 | 
						|
  OUTPUT F_RAGSOC RAGSOC
 | 
						|
END
 | 
						|
 | 
						|
STRING F_RAGSOC 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 17 2 "Ragione "
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 78 7
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 5 "@bMovimento di prima nota"
 | 
						|
  FLAGS "R"
 | 
						|
END
 | 
						|
 | 
						|
DATE F_DATAREG
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 6 "Data operazione     "
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
  HELP "Data in cui viene registrata l'operazione"
 | 
						|
  MESSAGE COPY,F_ANNOIVA,7,10
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_ANNOIVA 4
 | 
						|
BEGIN
 | 
						|
  PROMPT 52 6 "Anno IVA          "
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
STRING F_CODCAUS 3
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 8 "Causale    "
 | 
						|
  FLAGS "UZ"
 | 
						|
  FIELD CODCAUS
 | 
						|
  USE LF_CAUSALI
 | 
						|
  INPUT CODCAUS F_CODCAUS
 | 
						|
  DISPLAY "Codice" CODCAUS
 | 
						|
  DISPLAY "Descrizione@50" DESCR
 | 
						|
  DISPLAY "Tipo" TIPODOC
 | 
						|
  DISPLAY "Registro" REG
 | 
						|
  OUTPUT F_CODCAUS CODCAUS
 | 
						|
  OUTPUT F_DESCRCAUS DESCR
 | 
						|
  ADD RUN cg0 -4
 | 
						|
  CHECKTYPE NORMAL
 | 
						|
  WARNING "Causale assente"
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DESCRCAUS 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 23 8 ""
 | 
						|
  USE LF_CAUSALI KEY 2
 | 
						|
  CHECKTYPE NORMAL
 | 
						|
  INPUT DESCR F_DESCRCAUS
 | 
						|
  DISPLAY "Descrizione@50" DESCR
 | 
						|
  DISPLAY "Codice" CODCAUS
 | 
						|
  DISPLAY "Tipo" TIPODOC
 | 
						|
  DISPLAY "Registro" REG
 | 
						|
  COPY OUTPUT F_CODCAUS
 | 
						|
  ADD RUN cg0 -4
 | 
						|
END
 | 
						|
                          
 | 
						|
NUMBER F_NUMREG 7
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 10 "Numero operazione   "
 | 
						|
  HELP "Numero del movimento di prima nota da gestire"
 | 
						|
  FLAGS "R"
 | 
						|
  FIELD LF_MOV->NUMREG
 | 
						|
  USE LF_MOV
 | 
						|
  INPUT NUMREG F_NUMREG
 | 
						|
  DISPLAY "Numero@7" NUMREG
 | 
						|
  DISPLAY "Data@10" DATAREG
 | 
						|
  DISPLAY "Causale" CODCAUS
 | 
						|
  DISPLAY "Documento" NUMDOC
 | 
						|
  DISPLAY "Protoc." PROTIVA
 | 
						|
  DISPLAY "Descrizione@50" DESCR
 | 
						|
  OUTPUT F_NUMREG NUMREG
 | 
						|
  KEY 1
 | 
						|
END
 | 
						|
 | 
						|
/* DATACOMP new way
 | 
						|
DATE F_DATACOMP
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 9 "Data di competenza  "
 | 
						|
  HELP "Data di competenza dell'operazione"
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_ANNOES 4
 | 
						|
BEGIN
 | 
						|
  PROMPT 52 9 "Codice esercizio  "
 | 
						|
  FLAGS "DRZ"
 | 
						|
END
 | 
						|
*/
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
ENDMASK
 |