357 lines
9.9 KiB
Plaintext
357 lines
9.9 KiB
Plaintext
SCHEMA decomarmol
|
|
|
|
GLOBALS
|
|
|
|
DEFINE l,tipo_papel SMALLINT,
|
|
p_companias RECORD LIKE companias.*,
|
|
imp_form CHAR(1),
|
|
opt1 CHAR(3),
|
|
localidad SMALLINT,
|
|
plocalidad ui.combobox,
|
|
kpais ui.combobox,
|
|
|
|
kpuesto ui.ComboBox,
|
|
knivel ui.ComboBox,
|
|
kdepartamento ui.ComboBox,
|
|
knac ui.ComboBox,
|
|
kpar ui.ComboBox,
|
|
localidad SMALLINT,
|
|
pais smallint,
|
|
kciudad ui.combobox,
|
|
ciudad SMALLINT,
|
|
cod_par SMALLINT ,
|
|
xapp_movil CHAR(2)
|
|
|
|
DEFINE handler om.SaxDocumentHandler, -- return value from fgl_report_commitCurrentSettings()
|
|
r_filename STRING, -- filename of Report Design Document including .4rp extension
|
|
r_output STRING, -- output format option
|
|
preview INTEGER -- TRUE/FALSE, to set preview option
|
|
DEFINE historico CHAR(2)
|
|
|
|
DEFINE bandera,progreso SMALLINT
|
|
DEFINE selec21,selec20,selec10,selec3,selec2,selec1,selec STRING
|
|
DEFINE decide,modifica,verdad,p_status,control CHAR(1)
|
|
DEFINE p_param,opc,opt2,existe,ya,opera1,cambio CHAR(3)
|
|
DEFINE opt CHAR(3)
|
|
DEFINE descrip CHAR(21) ,
|
|
p_formulario,formulario CHAR(70),
|
|
usuarios,clave CHAR(80)
|
|
DEFINE nombre1,nombre2,nombre3,nombre4,nombre5,nombre6 CHAR(15)
|
|
DEFINE nombre7,nombre8,apellido1,apellido2,apellido3 CHAR(15)
|
|
DEFINE apellido4,apellido5,apellido6,apellido7,apellido8 CHAR(15)
|
|
DEFINE indice,fila SMALLINT
|
|
DEFINE numero_msg LIKE msgtable.cod_msg
|
|
DEFINE descrip1,descrip2,descrip3,descrip4,descrip5 CHAR(60)
|
|
DEFINE descr CHAR(10)
|
|
DEFINE nombre_mes,desc_idioma CHAR(10)
|
|
DEFINE nombre,empleado,empleado1,empleado2 CHAR(60)
|
|
DEFINE criterio STRING
|
|
|
|
DEFINE regi INTEGER
|
|
DEFINE e,i,curr1,p_act,idx_,idx,curr,scr_l INT
|
|
DEFINE opcion,siguie CHAR(1)
|
|
|
|
DEFINE anoc,mesc,diasc CHAR(3),
|
|
anos,lmeses,dias,preaviso,cesantia_h92,anos_cesantia_92,
|
|
anos_cesantia,meses_cesantia,cesantia_d92,dias_cesantia,
|
|
dias_vacaciones,meses_vacaciones,anos_vacaciones,tiempo_h92 INTEGER,
|
|
tiempo92,p_valor DECIMAL(12,2),
|
|
fecha_inicial DATE,
|
|
cmd,imprime,copia CHAR(150),archivo, file CHAR(80),impresor,progreso SMALLINT
|
|
|
|
DEFINE normal,negrilla_on,negrillas_of,comp_on,comp_off,doce,doble_on,doble_off
|
|
CHAR(3)
|
|
DEFINE cuenta_emp SMALLINT
|
|
DEFINE ptipo_nomina CHAR(1),
|
|
tiempoc,td92c CHAR(8),
|
|
tiempo,mesdia,tiempo_d92,tiempo_vacaciones DECIMAL(8,2)
|
|
|
|
DEFINE letras RECORD
|
|
negrillas_on ,
|
|
negrillas_off ,
|
|
doble_on ,
|
|
doble_off ,
|
|
comp_on ,
|
|
comp_off ,
|
|
doce ,
|
|
normal CHAR(6)
|
|
END RECORD
|
|
|
|
DEFINE rango RECORD
|
|
fech_in DATE,
|
|
fech_fi DATE
|
|
END RECORD
|
|
|
|
DEFINE datos_peri RECORD
|
|
tipo_emp CHAR(1),
|
|
fecha_d CHAR(10),
|
|
fecha_a CHAR(10)
|
|
END RECORD
|
|
|
|
DEFINE datos RECORD
|
|
fech_ini DATE,
|
|
fech_fin DATE
|
|
END RECORD
|
|
|
|
DEFINE c_entra RECORD
|
|
fecha DATE,
|
|
num_nomi INTEGER,
|
|
tipo_emp CHAR(1),
|
|
nombre_tipo CHAR(20)
|
|
END RECORD
|
|
|
|
DEFINE datos_cheque RECORD
|
|
num_emp LIKE adtb00003.num_emp,
|
|
departamento LIKE adtb00003.departamento,
|
|
nivel_emp LIKE adtb00003.nivel_emp,
|
|
cod_puesto LIKE adtb00003.cod_puesto,
|
|
nom1_emp CHAR(35),
|
|
apell1_emp LIKE adtb00003.nom1_emp,
|
|
nom2_emp LIKE adtb00003.nom1_emp,
|
|
apell2_emp LIKE adtb00003.nom1_emp,
|
|
cod_mov LIKE notb00008.cod_mov,
|
|
descrip_mov LIKE notb00002.segundo_enc,
|
|
tipo_d CHAR(1),
|
|
cantidad LIKE notb00008.cantidad,
|
|
valor LIKE notb00008.valor,
|
|
cuenta_no CHAR(20),
|
|
tipocuenta VARCHAR(1),
|
|
codbancodestino VARCHAR(8),
|
|
digiverbancodestino VARCHAR(1),
|
|
cedula VARCHAR(11),
|
|
nombre CHAR(80),
|
|
numero INTEGER,
|
|
fecha DATE,
|
|
acumulado DECIMAL(12,2),
|
|
neto DECIMAL(12,2)
|
|
END RECORD
|
|
|
|
DEFINE comisiones DYNAMIC ARRAY OF RECORD
|
|
sec_vend_a INT,
|
|
nombre_vend CHAR(50),
|
|
porc_cobros DEC(12,2),
|
|
porc_cobros_a DEC(12,2)
|
|
END RECORD
|
|
DEFINE comisiones_adicionales DYNAMIC ARRAY OF RECORD
|
|
sec_vend1 INT,
|
|
nombre_vend1 CHAR(50),
|
|
cod_n SMALLINT,
|
|
descripcion CHAR(80),
|
|
porc_vendedor DEC(12,2),
|
|
porc_supervisor DEC(12,2),
|
|
porc_directo DEC(12,2)
|
|
END RECORD
|
|
DEFINE buscar_emp DYNAMIC ARRAY OF RECORD
|
|
num_emp LIKE adtb00003.num_emp,
|
|
departamento LIKE adtb00003.departamento,
|
|
nivel_emp LIKE adtb00003.nivel_emp,
|
|
cod_puesto LIKE adtb00003.cod_puesto,
|
|
nom1_emp LIKE adtb00003.nom1_emp,
|
|
nom2_emp LIKE adtb00003.nom2_emp,
|
|
apell1_emp LIKE adtb00003.apell1_emp,
|
|
apell2_emp LIKE adtb00003.apell2_emp
|
|
END RECORD
|
|
|
|
DEFINE despl_emp DYNAMIC ARRAY OF RECORD
|
|
num_emp LIKE adtb00003.num_emp,
|
|
departamento LIKE adtb00003.departamento,
|
|
nivel_emp LIKE adtb00003.nivel_emp,
|
|
cod_puesto LIKE adtb00003.cod_puesto,
|
|
nom1_emp LIKE adtb00003.nom1_emp,
|
|
nom2_emp LIKE adtb00003.nom2_emp,
|
|
apell1_emp LIKE adtb00003.apell1_emp,
|
|
apell2_emp LIKE adtb00003.apell2_emp
|
|
END RECORD
|
|
|
|
DEFINE arr_novedad DYNAMIC ARRAY OF RECORD
|
|
num_emp LIKE notb00007.num_emp,
|
|
departamento LIKE notb00007.departamento,
|
|
nivel_emp LIKE notb00007.nivel_emp,
|
|
cod_puesto LIKE notb00007.cod_puesto,
|
|
descrip1 CHAR(60),
|
|
cantidad LIKE notb00007.cantidad,
|
|
valor LIKE notb00007.valor,
|
|
num_trx INT,
|
|
sueldo_act DEC(12,2)
|
|
END RECORD
|
|
|
|
DEFINE arr_fijo ARRAY[200] OF RECORD
|
|
cod_mov LIKE notb00003.cod_mov,
|
|
descrip_mov LIKE notb00002.descrip_mov,
|
|
cantidad LIKE notb00003.cantidad,
|
|
valor LIKE notb00003.valor
|
|
END RECORD
|
|
|
|
DEFINE buscar_movi ARRAY[200] OF RECORD
|
|
cod_mov LIKE notb00002.cod_mov,
|
|
descrip_mov LIKE notb00002.descrip_mov,
|
|
cantidad_cia LIKE notb00002.cantidad_cia,
|
|
cantidad_emp LIKE notb00002.cantidad_emp
|
|
END RECORD
|
|
|
|
DEFINE despl_movi ARRAY[200] OF RECORD
|
|
cod_mov LIKE notb00002.cod_mov,
|
|
descrip_mov LIKE notb00002.descrip_mov,
|
|
cantidad_cia LIKE notb00002.cantidad_cia,
|
|
cantidad_emp LIKE notb00002.cantidad_emp
|
|
END RECORD
|
|
|
|
DEFINE novedad RECORD
|
|
num_nomi SMALLINT,
|
|
tipo_emp CHAR(1),
|
|
fecha_del CHAR(10),
|
|
fecha_al CHAR(10),
|
|
cod_mov LIKE notb00007.cod_mov,
|
|
descrip_mov LIKE notb00002.descrip_mov,
|
|
cod1 SMALLINT,
|
|
cantidad_cia DECIMAL(8,2),
|
|
veces SMALLINT,
|
|
num_nomi1 INTEGER,
|
|
modifica VARCHAR(2)
|
|
END RECORD
|
|
DEFINE emplea RECORD
|
|
num_emp smallint ,
|
|
departamento smallint ,
|
|
nivel_emp smallint ,
|
|
cod_puesto smallint ,
|
|
nom1_emp char(15) ,
|
|
nom2_emp char(15) ,
|
|
apell1_emp char(15) ,
|
|
apell2_emp char(15) ,
|
|
tipo_empleado char(20) ,
|
|
fecha_termino_c date ,
|
|
calle char(50) ,
|
|
casa_num char(10) ,
|
|
barrio char(50) ,
|
|
urbanizacion char(50) ,
|
|
credito char(10) ,
|
|
telefono char(15) ,
|
|
fech_nac date ,
|
|
cod_nac smallint ,
|
|
estado_civil char(1) ,
|
|
tipo_sangre char(3) ,
|
|
cedula char(11) ,
|
|
serie smallint ,
|
|
licencia char(9) ,
|
|
sueldo_ac decimal(10, 2) ,
|
|
nomina char(1) ,
|
|
fech_efec date ,
|
|
fecha_salida date ,
|
|
paga_seg char(1) ,
|
|
cod_seg1 char(11) ,
|
|
cod_seg2 smallint ,
|
|
cod_seg3 smallint ,
|
|
tipocuenta char(1) ,
|
|
cuenta_no varchar(25) ,
|
|
status_t char(1) ,
|
|
us_crea char(50) ,
|
|
fech_crea date ,
|
|
us_mod char(50) ,
|
|
fech_mod date ,
|
|
foto_empleado byte ,
|
|
sucid smallint ,
|
|
monto_seg_med decimal(18, 0) ,
|
|
monto_seg_int decimal(18, 0) ,
|
|
monto_care decimal(18, 0) ,
|
|
fecha_ultimo_aumento date ,
|
|
moneda char(3) ,
|
|
codbancodestino char(8) ,
|
|
digiverbancodestino char(1) ,
|
|
tipo_sueldo char(20) ,
|
|
email varchar(100) ,
|
|
instalador char(10) ,
|
|
cuenta_aux varchar(100) ,
|
|
cuenta_out int ,
|
|
departamento_out int ,
|
|
num_emp_supervisor int ,
|
|
fecha_suspension date ,
|
|
codigo_retiro_bco int ,
|
|
genera_file_bco char(2) ,
|
|
fecha_valido_retiro date ,
|
|
monto_retiro decimal(18, 2) ,
|
|
retiro_comercial char(10) ,
|
|
estado_legal char(20) ,
|
|
observacion varchar(255) ,
|
|
tipo_documento char(50) ,
|
|
gerentemarcas char(10) ,
|
|
alias varchar(100) ,
|
|
url_foto varchar(255)
|
|
END RECORD
|
|
|
|
DEFINE depto RECORD
|
|
departamento smallint ,
|
|
nom_dpto char(30) ,
|
|
status_t char(1) ,
|
|
us_crea char(50) ,
|
|
fech_crea date ,
|
|
us_mod char(50) ,
|
|
fech_mod date ,
|
|
tipo_departamento char(20) ,
|
|
departamento_out int ,
|
|
app_movil char(10) ,
|
|
num_emp_supervisa smallint ,
|
|
grupo varchar(50) ,
|
|
coordinadora varchar(100)
|
|
END RECORD
|
|
|
|
DEFINE mov_nomi RECORD LIKE notb00002.*
|
|
|
|
DEFINE fijo RECORD LIKE notb00003.*
|
|
DEFINE per_nomi RECORD
|
|
tipo_emp char(1) ,
|
|
h_normal decimal(8, 2) ,
|
|
num_nomi int ,
|
|
mes smallint ,
|
|
ano smallint ,
|
|
num_sem smallint ,
|
|
fecha_del date ,
|
|
fecha_al date ,
|
|
status_t char(1) ,
|
|
us_crea char(9) ,
|
|
fech_crea date ,
|
|
us_mod char(9) ,
|
|
fech_mod date ,
|
|
fecha_cierre_nomina date ,
|
|
estado_legal char(50) ,
|
|
monto decimal(12, 2)
|
|
END RECORD
|
|
DEFINE presta RECORD
|
|
num_emp SMALLINT,
|
|
departamento SMALLINT,
|
|
nivel_emp SMALLINT ,
|
|
cod_puesto SMALLINT ,
|
|
num_doc INT ,
|
|
cod_mov SMALLINT,
|
|
fecha DATE ,
|
|
monto decimal(10, 2),
|
|
porciento decimal(5, 2),
|
|
status_t char(1) ,
|
|
us_crea char(9) ,
|
|
fech_crea date,
|
|
us_mod char(9) ,
|
|
fech_mod DATE,
|
|
valor_cuota decimal(12, 2)
|
|
END RECORD
|
|
DEFINE dias_mes RECORD LIKE notb00012.*
|
|
|
|
|
|
DEFINE puesto RECORD
|
|
cod_puesto smallint ,
|
|
nom_puesto char(180) ,
|
|
otra_descripcion char(180) ,
|
|
funciones char(60) ,
|
|
funcion1 char(60) ,
|
|
nivel_sal smallint ,
|
|
salario_min decimal(10, 2) ,
|
|
salario_max decimal(10, 2) ,
|
|
status_t char(1) ,
|
|
us_crea char(9) ,
|
|
fech_crea date ,
|
|
us_mod char(9) ,
|
|
fech_mod date ,
|
|
tipo_puesto varchar(50) ,
|
|
supervisor char(10)
|
|
END RECORD
|
|
DEFINE nacion RECORD LIKE adtb00007.*
|
|
END GLOBALS
|