Commit inicial: fuentes MBS ERP (Genero 6) + .gitignore + docs/SETUP_PC_MBS.md
This commit is contained in:
@@ -0,0 +1,163 @@
|
||||
SCHEMA smarmotech
|
||||
|
||||
GLOBALS
|
||||
DEFINE p_compania RECORD LIKE companias.*
|
||||
DEFINE unidades1 ARRAY[19] OF CHAR(10)
|
||||
DEFINE decenas ARRAY[81] OF CHAR(20)
|
||||
DEFINE centenas ARRAY[10] OF CHAR(20)
|
||||
DEFINE miles ARRAY[9] OF CHAR(2),
|
||||
p_descrip CHAR(30),
|
||||
anula_seguro CHAR(1),
|
||||
presupa RECORD LIKE cgtb00023.*,
|
||||
nombre_m LIKE mestable.descrip,
|
||||
usuarios,clave CHAR(80),
|
||||
progreso SMALLINT,
|
||||
HANDLER om.SaxDocumentHandler,
|
||||
r_output,afecta STRING,
|
||||
pventas ui.combobox,
|
||||
ventas VARCHAR(2),
|
||||
fecha_inicial,fecha_final,p_fecha DATE,
|
||||
entrada,entra1,entra VARCHAR(25),
|
||||
nom_cli,detalle1 VARCHAR(30),
|
||||
fecha1,fecha2 DATE,
|
||||
|
||||
tasa DEC(10,2),
|
||||
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 opt4,opt3,impresion,verdad,identifica,existe,tiene_facturas,
|
||||
p_param,opt,control,detalle,status_reg CHAR(3),
|
||||
criterio,selec,selec1,selec2,selec4,selec3 STRING,
|
||||
|
||||
tipo2,opcion CHAR(3),
|
||||
valor_letras CHAR(90),
|
||||
compania CHAR(50),
|
||||
parametro CHAR(10),
|
||||
bandera,scr_l,curr1,curr,idx,numero_msg INTEGER,
|
||||
nombre_bco,descrip,p_descripcion,nombre CHAR(30),
|
||||
regi,tipo_papel,l SMALLINT,
|
||||
impresor SMALLINT
|
||||
|
||||
DEFINE normal,negrilla_on,negrillas_of,comp_on,comp_off,doce,doble_on,doble_off
|
||||
CHAR(3),
|
||||
cmd,imprime,copia CHAR(150),archivo CHAR(80)
|
||||
DEFINE arr_bancos ARRAY[50] OF RECORD
|
||||
cuenta_no LIKE cgtb00012.cuenta_no,
|
||||
nombre_bco LIKE cgtb00012.nombre_bco
|
||||
END RECORD
|
||||
DEFINE ws ARRAY[100] OF RECORD
|
||||
departamento SMALLINT,
|
||||
nombre CHAR(30)
|
||||
END RECORD
|
||||
DEFINE datos_cons RECORD
|
||||
fech_in DATE,
|
||||
fech_fi DATE
|
||||
END RECORD
|
||||
DEFINE arr_cuenta ARRAY[200] OF RECORD
|
||||
cuenta_no LIKE cgtb00009.cuenta_no,
|
||||
descripcion LIKE cgtb00001.descripcion
|
||||
END RECORD
|
||||
|
||||
DEFINE numero1 CHAR(7)
|
||||
DEFINE usuario CHAR(9)
|
||||
DEFINE fecha_crea LIKE cgtb00004.fech_crea
|
||||
DEFINE datos_ck RECORD LIKE cgtb00012.*
|
||||
DEFINE cronologico RECORD LIKE cgtb00031.*
|
||||
DEFINE entrega RECORD LIKE cgtb00032.*
|
||||
DEFINE entrega1 RECORD LIKE cgtb00033.*
|
||||
|
||||
DEFINE estado_c CHAR(1)
|
||||
DEFINE selec_p CHAR(1000)
|
||||
DEFINE cuenta_a,cuenta_b CHAR(8)
|
||||
DEFINE ins_cp,m,i,p_nivel,codigo INTEGER
|
||||
DEFINE meses ARRAY [12] OF CHAR(10)
|
||||
DEFINE referencia1 CHAR(9)
|
||||
DEFINE tipo_doc1 CHAR(2)
|
||||
DEFINE depto,cxp,numero,aplicar INTEGER
|
||||
DEFINE cuenta_cxp,cuenta_cta,cod1_sp,cod1_sp_sec,p_orden SMALLINT
|
||||
DEFINE chequea,sale_arr,p_cata,tipo_d,p_ref,acept_dpto,opc,opc1,
|
||||
limpia,tiene_cta,ctrl_cxp,p_origen CHAR(3)
|
||||
DEFINE p_tipo CHAR(2)
|
||||
DEFINE remanente,monto,valor_f,valor_fac,val_pen,valor_fac1,valor_cxp,
|
||||
valor2,valor DECIMAL(12,2)
|
||||
DEFINE nombre_emp,apellido_emp,nom_tipo CHAR(15)
|
||||
DEFINE nombre_dpto,nombre_cata CHAR(30)
|
||||
DEFINE facturas,ordenes,nom_cuenta CHAR(70)
|
||||
DEFINE orden1 CHAR(6)
|
||||
DEFINE factura1 CHAR(10)
|
||||
DEFINE refe DYNAMIC ARRAY OF CHAR(12)
|
||||
|
||||
DEFINE cuentas DYNAMIC ARRAY OF RECORD
|
||||
cuenta_no LIKE cgtb00001.cuenta_no,
|
||||
descripcion LIKE cgtb00001.descripcion,
|
||||
nivel LIKE cgtb00001.nivel
|
||||
END RECORD
|
||||
|
||||
DEFINE aplica_wd DYNAMIC ARRAY OF RECORD
|
||||
aplica_a LIKE cptb00001.aplica_a,
|
||||
pendiente DECIMAL(12,2)
|
||||
END RECORD
|
||||
|
||||
DEFINE arr_recibo DYNAMIC ARRAY OF RECORD
|
||||
tipo LIKE cptb00001.tipo,
|
||||
orden_no LIKE cptb00001.orden_no,
|
||||
aplica_a LIKE cptb00001.aplica_a,
|
||||
valor_pen DECIMAL(12,2),
|
||||
valor_pag DECIMAL(12,2)
|
||||
END RECORD
|
||||
|
||||
DEFINE arr_cuenta1 DYNAMIC ARRAY OF RECORD
|
||||
cuenta_no LIKE cgtb00004.cuenta_no,
|
||||
departamento LIKE cgtb00004.departamento,
|
||||
cod_aux LIKE cgtb00004.cod_aux,
|
||||
cod_sec LIKE cgtb00004.cod_sec,
|
||||
num_doc LIKE cgtb00004.num_doc,
|
||||
nom_cuenta CHAR(30),
|
||||
debito LIKE cgtb00004.debito,
|
||||
credito LIKE cgtb00004.credito
|
||||
END RECORD
|
||||
|
||||
DEFINE recibo RECORD
|
||||
tipo_doc LIKE cptb00001.tipo_doc,
|
||||
cuenta_p LIKE cgtb00004.cuenta_no,
|
||||
numero INTEGER,
|
||||
cod_sp LIKE cptb00001.cod_sp,
|
||||
cod_sp_sec LIKE cptb00001.cod_sp_sec,
|
||||
nom_sup CHAR(44),
|
||||
fecha DATE,
|
||||
tasa LIKE cgtb00005.tasa,
|
||||
monto DECIMAL(12,2),
|
||||
codigo LIKE tetb00003.codigo
|
||||
END RECORD,
|
||||
detalle_1 CHAR(40),
|
||||
detalle_2 CHAR(40),
|
||||
detalle_3 CHAR(40),
|
||||
detalle_4 CHAR(40),
|
||||
detalle_5 CHAR(40),
|
||||
valor_1 DECIMAL(12,2),
|
||||
valor_2 DECIMAL(12,2),
|
||||
valor_3 DECIMAL(12,2),
|
||||
valor_4 DECIMAL(12,2),
|
||||
valor_5 DECIMAL(12,2)
|
||||
|
||||
DEFINE porc_p DECIMAL(10,2)
|
||||
DEFINE emp SMALLINT
|
||||
DEFINE hoy DATE
|
||||
DEFINE entradas RECORD LIKE cgtb00011.*
|
||||
DEFINE catalogo RECORD LIKE cgtb00001.*
|
||||
DEFINE p_departa RECORD LIKE cgtb00002.*
|
||||
DEFINE p_tipos RECORD LIKE cgtb00003.*
|
||||
DEFINE mov_cuenta RECORD LIKE cgtb00009.*
|
||||
DEFINE movi_cuenta RECORD LIKE cgtb00010.*
|
||||
DEFINE p_fechas DATE
|
||||
DEFINE comp_fech,comp_fech1 DATE
|
||||
DEFINE mes_control CHAR(2)
|
||||
DEFINE mes_calc,dia SMALLINT
|
||||
DEFINE fecha_c DATE
|
||||
DEFINE c_ano,a_ano CHAR(4)
|
||||
|
||||
END GLOBALS
|
||||
Reference in New Issue
Block a user