#define FGastos			2300
#define FEdtGastos		2301
#define FGastosM  		2302


// Estructura de movimiento de gasto
typedef struct DMOVGA {
	Int32       RefSup;      // Referencia del superior
	Int32       Ref;         // Referencia
	UInt8       Nivel;       // Nivel del gasto  1, 2, ...
	Char        Nom[50];     // Nombre del gasto
	Char        tpc;		 // Tipo de selección de cuenta
							 // 0=Seleccionar al capturar
							 //	1=Última seleccionada
							 // 2=Asignada	
	Boolean     did;		 // Está definicida la cuenta
	ID          id;			 // Cuenta con la que se paga
	Char        tpp;		 // Tipo (control) de pago (ver crédito, etc.)
	Periodo     Per;		 // Período
} MOVGA;

// Estructura de gastos
typedef struct DGA {
	UInt8       TipoReg;     // Tipo de registro = 3 o 5
	Int32       ProxRef;     // Proxima referencia
} GA;

void        IniciaRegGA     (void)                  					ES4;
Boolean 	Gastos			(EventType*)								ES4;
Boolean 	EdtGastos		(EventType*)								ES4;
Boolean		FinalizaGA		(void)										ES4;
Char 		IniciaGastos	(Char,Char,UInt16,ID*,Boolean,UInt8*,Char)	ES4;
Int16 		TotGA			(Char,Int16)								ES4;
Int16 		IdGA			(Char,Int16,Int16)							ES4;
Boolean 	CBG_GA			(Char,Char,Int16,void*,Int16*)				ES4;

