S^1^0^M^cgprrp015^MODULE^^ S^2^1^R^diario1^^^public F^0^D:\genero fuentes\DECOMARMOL320\decomarmol\PROYECTO\cgdir\cgprrp015.4gl D^2^340^463^11^0^0 X^2^c^139^24^0^finish X^2^c^137^28^0^output X^2^c^113^24^0^start X^2^D^340^11^0^ S^3^2^P^x^RECORD^^ D^3^341^351^11^0^0 X^3^l^424^26^0^ X^3^r^419^36^0^ X^3^r^419^30^0^ X^3^r^419^22^0^ X^3^r^419^11^0^ X^3^r^418^37^0^ X^3^r^418^28^0^ X^3^r^418^18^0^ X^3^r^417^48^0^ X^3^r^417^37^0^ X^3^l^413^17^0^ X^3^r^412^13^0^ X^3^l^410^17^0^ X^3^r^409^13^0^ X^3^r^408^45^0^ X^3^r^408^34^0^ X^3^r^407^32^0^ X^3^r^406^32^0^ X^3^r^403^11^0^ X^3^r^402^11^0^ X^3^r^398^32^0^ X^3^r^398^20^0^ X^3^r^391^30^0^ X^3^r^382^30^0^ X^3^l^375^23^0^ X^3^l^340^19^0^ X^3^D^341^11^0^ S^4^3^P^fecha^DATE^^ D^4^342^342^6^0^0 X^4^D^342^6^0^ S^5^3^P^tipo^SMALLINT^^ D^5^343^343^6^0^0 X^5^D^343^6^0^ S^6^3^P^ref^CHAR(14)^^ D^6^344^344^6^0^0 X^6^D^344^6^0^ S^7^3^P^cuenta_no^CHAR(8)^^ D^7^345^345^6^0^0 X^7^D^345^6^0^ S^8^3^P^descripcion^CHAR(30)^^ D^8^346^346^6^0^0 X^8^D^346^6^0^ S^9^3^P^detalle1^CHAR(30)^^ D^9^347^347^6^0^0 X^9^D^347^6^0^ S^10^3^P^detalle2^CHAR(30)^^ D^10^348^348^6^0^0 X^10^D^348^6^0^ S^11^3^P^debito^DECIMAL(12,2)^^ D^11^349^349^6^0^0 X^11^D^349^6^0^ S^12^3^P^credito^DECIMAL(12,2)^^ D^12^350^350^6^0^0 X^12^D^350^6^0^ S^13^2^P^fecha1^DATE^^ D^13^352^352^11^0^0 X^13^r^419^56^0^ X^13^r^402^22^0^ X^13^r^382^56^0^ X^13^l^340^21^0^ X^13^D^352^11^0^ S^14^2^P^fecha2^DATE^^ D^14^352^352^18^0^0 X^14^r^419^63^0^ X^14^r^403^22^0^ X^14^r^391^56^0^ X^14^l^340^28^0^ X^14^D^352^18^0^ S^15^2^V^total1^DECIMAL(12,2)^^ D^15^353^355^11^0^0 X^15^l^457^21^0^ X^15^r^442^20^0^ X^15^r^439^45^0^ X^15^r^406^23^0^ X^15^l^406^14^0^ X^15^l^377^14^0^ X^15^D^353^11^0^ S^16^2^V^total2^DECIMAL(12,2)^^ D^16^353^355^18^0^0 X^16^l^458^21^0^ X^16^r^442^27^0^ X^16^r^440^45^0^ X^16^r^407^23^0^ X^16^l^407^14^0^ X^16^l^378^14^0^ X^16^D^353^18^0^ S^17^2^V^total3^DECIMAL(12,2)^^ D^17^353^355^25^0^0 X^17^l^454^21^0^ X^17^r^448^26^0^ X^17^r^439^36^0^ X^17^l^439^27^0^ X^17^l^429^30^0^ X^17^r^428^26^0^ X^17^D^353^25^0^ S^18^2^V^total4^DECIMAL(12,2)^^ D^18^353^355^32^0^0 X^18^l^455^21^0^ X^18^r^449^27^0^ X^18^r^440^36^0^ X^18^l^440^27^0^ X^18^l^433^30^0^ X^18^r^432^26^0^ X^18^D^353^32^0^ S^19^2^V^total5^DECIMAL(12,2)^^ D^19^353^355^39^0^0 X^19^l^456^21^0^ X^19^r^450^27^0^ X^19^r^441^36^0^ X^19^l^441^27^0^ X^19^l^437^30^0^ X^19^r^436^26^0^ X^19^D^353^39^0^ S^20^2^V^total6^DECIMAL(12,2)^^ D^20^353^355^46^0^0 X^20^D^353^46^0^ S^21^2^V^debito^DECIMAL(12,2)^^ D^21^353^355^53^0^0 X^21^D^353^53^0^ S^22^2^V^credito^DECIMAL(12,2)^^ D^22^353^355^60^0^0 X^22^D^353^60^0^ S^23^2^V^balance^DECIMAL(12,2)^^ D^23^353^355^68^0^0 X^23^l^459^21^0^ X^23^r^441^45^0^ X^23^r^426^17^0^ X^23^r^418^57^0^ X^23^r^408^23^0^ X^23^l^408^13^0^ X^23^l^386^17^0^ X^23^r^385^13^0^ X^23^D^353^68^0^ S^24^2^V^balance_final^DECIMAL(12,2)^^ D^24^354^355^11^0^0 X^24^r^426^33^0^ X^24^l^395^17^0^ X^24^r^394^13^0^ X^24^l^390^15^0^ X^24^D^354^11^0^ S^25^2^V^balance1^DECIMAL(12,2)^^ D^25^354^355^25^0^0 X^25^r^418^48^0^ X^25^r^417^25^0^ X^25^l^417^14^0^ X^25^D^354^25^0^ S^26^2^V^balance2^DECIMAL(12,2)^^ D^26^354^355^34^0^0 X^26^r^398^11^0^ X^26^l^381^46^0^ X^26^l^379^14^0^ X^26^D^354^34^0^ S^27^2^V^doble_on^CHAR(2)^^ D^27^358^358^12^0^0 X^27^D^358^12^0^ S^28^2^V^doble_off^CHAR(2)^^ D^28^359^359^12^0^0 X^28^D^359^12^0^ S^29^2^V^negrillas_on^CHAR(2)^^ D^29^360^360^12^0^0 X^29^D^360^12^0^ S^30^2^V^negrillas_off^CHAR(2)^^ D^30^361^361^12^0^0 X^30^D^361^12^0^ S^31^2^V^comp_on^CHAR(2)^^ D^31^362^362^12^0^0 X^31^D^362^12^0^ S^32^2^V^comp_off^CHAR(2)^^ D^32^363^363^12^0^0 X^32^D^363^12^0^ S^33^2^V^doce^CHAR(2)^^ D^33^364^364^12^0^0 X^33^D^364^12^0^ S^34^2^V^normal^CHAR(2)^^ D^34^365^365^12^0^0 X^34^D^365^12^0^ S^35^2^V^hora^CHAR(5)^^ D^35^366^366^12^0^0 X^35^l^373^13^0^ X^35^D^366^12^0^ S^36^2^V^reportDef^base.Report^^ D^36^0^0^0^0^0 S^37^1^F^cgprrp015^^^public D^37^40^146^12^0^0 X^37^c^37^7^0^ X^37^D^40^12^0^ S^38^1^F^main^^^public D^38^28^38^1^0^0 X^38^D^28^1^0^ S^39^1^V^diario^RECORD^^private D^39^12^22^9^0^0 X^39^r^137^36^0^ X^39^r^125^25^0^ X^39^D^12^9^0^ S^40^39^V^fecha^DATE^^ D^40^13^13^4^0^0 X^40^D^13^4^0^ S^41^39^V^tipo^SMALLINT^^ D^41^14^14^4^0^0 X^41^D^14^4^0^ S^42^39^V^ref^CHAR(14)^^ D^42^15^15^4^0^0 X^42^D^15^4^0^ S^43^39^V^cuenta_no^CHAR(8)^^ D^43^16^16^4^0^0 X^43^D^16^4^0^ S^44^39^V^descripcion^CHAR(30)^^ D^44^17^17^4^0^0 X^44^D^17^4^0^ S^45^39^V^detalle1^CHAR(30)^^ D^45^18^18^4^0^0 X^45^D^18^4^0^ S^46^39^V^detalle2^CHAR(30)^^ D^46^19^19^4^0^0 X^46^D^19^4^0^ S^47^39^V^debito^DECIMAL(12,2)^^ D^47^20^20^4^0^0 X^47^D^20^4^0^ S^48^39^V^credito^DECIMAL(12,2)^^ D^48^21^21^4^0^0 X^48^D^21^4^0^ S^49^1^V^t^STRING^^private D^49^23^23^3^0^0 X^49^D^23^3^0^ S^50^1^V^t1^STRING^^private D^50^23^23^5^0^0 X^50^D^23^5^0^ S^51^1^V^fecha_inicial^DATE^^private D^51^24^24^10^0^0 X^51^r^137^45^0^ X^51^r^57^9^0^ X^51^l^54^18^0^ X^51^D^24^10^0^ S^52^1^V^fecha_final^DATE^^private D^52^24^24^24^0^0 X^52^r^137^59^0^ X^52^l^118^25^0^ X^52^r^64^10^0^ X^52^l^54^32^0^ X^52^D^24^24^0^ S^53^1^V^t_debito^DECIMAL(12,2)^^private D^53^25^25^10^0^0 X^53^r^452^13^0^ X^53^l^448^15^0^ X^53^l^140^26^0^ X^53^D^25^10^0^ S^54^1^V^t_credito^DECIMAL(12,2)^^private D^54^25^25^19^0^0 X^54^r^452^22^0^ X^54^l^449^15^0^ X^54^l^140^35^0^ X^54^D^25^19^0^ S^55^1^V^t_balance^DECIMAL(12,2)^^private D^55^25^25^29^0^0 X^55^r^452^32^0^ X^55^l^450^15^0^ X^55^l^140^45^0^ X^55^D^25^29^0^ S^56^1^V^p_ano^CHAR(4)^^private D^56^26^26^10^0^0 X^56^D^26^10^0^ S^57^1^V^p_mes^SMALLINT^^private D^57^27^27^10^0^0 X^57^D^27^10^0^ S^58^1^C^comando^base.SqlHandle^^private D^58^116^116^16^0^0 X^58^u^117^33^0^ X^58^D^116^16^0^ S^59^1^C^busco^base.SqlHandle^^private D^59^117^117^16^0^0 X^59^u^125^14^0^ X^59^u^118^13^0^ X^59^D^117^16^0^ S^60^0^V^status^INTEGER^^builtin F^1^C:\Program Files\FourJs\Genero Studio3.20.09\fgl\lib/fgl.4gl D^60^15^15^9^1^1 X^60^r^126^16^0^ X^60^r^124^14^0^ X^60^D^15^9^1^ S^61^0^V^int_flag^INTEGER^^builtin D^61^15^15^17^1^1 X^61^l^133^21^0^ X^61^r^130^16^0^ X^61^l^84^13^0^ X^61^r^81^9^0^ X^61^l^75^12^0^ X^61^r^72^8^0^ X^61^l^41^7^0^ X^61^D^15^17^1^ S^62^0^V^cuentas1^DYNAMIC ARRAY OF RECORD^^global F^2^cgprgb000.4gl D^62^4^8^8^2^2 X^62^D^4^8^2^ S^63^62^V^cuenta_no^VARCHAR(8)^decomarmol.cgtb00001.cuenta_no^ D^63^5^5^4^2^2 X^63^D^5^4^2^ S^64^62^V^descripcion^VARCHAR(50)^decomarmol.cgtb00001.descripcion^ D^64^6^6^4^2^2 X^64^D^6^4^2^ S^65^62^V^nivel^SMALLINT^decomarmol.cgtb00001.nivel^ D^65^7^7^4^2^2 X^65^D^7^4^2^ S^66^0^V^handler^om.SaxDocumentHandler^^global D^66^9^9^8^2^2 X^66^r^113^47^0^ X^66^l^108^14^0^ X^66^D^9^8^2^ S^67^0^V^r_filename^STRING^^global D^67^10^10^10^2^2 X^67^r^102^42^0^ X^67^l^100^5^0^ X^67^D^10^10^2^ S^68^0^V^r_output^STRING^^global D^68^11^11^11^2^2 X^68^r^106^39^0^ X^68^l^105^46^0^ X^68^D^11^11^2^ S^69^0^V^preview^INTEGER^^global D^69^12^12^11^2^2 X^69^r^107^40^0^ X^69^l^104^14^0^ X^69^D^12^11^2^ S^70^0^V^fl_ini_rep^STRING^^global D^70^13^13^11^2^2 X^70^D^13^11^2^ S^71^0^V^p_compania^RECORD^^global D^71^14^14^10^2^2 X^71^r^419^43^0^ X^71^r^35^18^0^ X^71^D^14^10^2^ S^72^71^V^cod_comp^CHAR(5)^decomarmol.companias.cod_comp^ D^72^0^0^0^0^0 S^73^71^V^nombre^CHAR(40)^decomarmol.companias.nombre^ D^73^0^0^0^0^0 S^74^71^V^rnc^CHAR(30)^decomarmol.companias.rnc^ D^74^0^0^0^0^0 S^75^71^V^direccion^CHAR(40)^decomarmol.companias.direccion^ D^75^0^0^0^0^0 S^76^71^V^telefono^CHAR(15)^decomarmol.companias.telefono^ D^76^0^0^0^0^0 S^77^71^V^fax^CHAR(15)^decomarmol.companias.fax^ D^77^0^0^0^0^0 S^78^71^V^administrador^CHAR(40)^decomarmol.companias.administrador^ D^78^0^0^0^0^0 S^79^71^V^email^CHAR(100)^decomarmol.companias.email^ D^79^0^0^0^0^0 S^80^71^V^paginaweb^CHAR(100)^decomarmol.companias.paginaweb^ D^80^0^0^0^0^0 S^81^71^V^direccion1^CHAR(50)^decomarmol.companias.direccion1^ D^81^0^0^0^0^0 S^82^71^V^telefono1^CHAR(15)^decomarmol.companias.telefono1^ D^82^0^0^0^0^0 S^83^71^V^fax1^CHAR(15)^decomarmol.companias.fax1^ D^83^0^0^0^0^0 S^84^71^V^status_t^CHAR(1)^decomarmol.companias.status_t^ D^84^0^0^0^0^0 S^85^71^V^us_crea^CHAR(9)^decomarmol.companias.us_crea^ D^85^0^0^0^0^0 S^86^71^V^fech_crea^DATE^decomarmol.companias.fech_crea^ D^86^0^0^0^0^0 S^87^71^V^us_mod^CHAR(9)^decomarmol.companias.us_mod^ D^87^0^0^0^0^0 S^88^71^V^fech_mod^DATE^decomarmol.companias.fech_mod^ D^88^0^0^0^0^0 S^89^71^V^codnomina^CHAR(30)^decomarmol.companias.codnomina^ D^89^0^0^0^0^0 S^90^71^V^cuenta_no_inv^CHAR(10)^decomarmol.companias.cuenta_no_inv^ D^90^0^0^0^0^0 S^91^71^V^dias_vence_reservas^SMALLINT^decomarmol.companias.dias_vence_reservas^ D^91^0^0^0^0^0 S^92^0^V^lj^SMALLINT^^global D^92^15^15^12^2^2 X^92^D^15^12^2^ S^93^0^V^idx_ac^SMALLINT^^global D^93^15^15^15^2^2 X^93^D^15^15^2^ S^94^0^V^ano^SMALLINT^^global D^94^15^15^22^2^2 X^94^D^15^22^2^ S^95^0^V^idx_a^SMALLINT^^global D^95^15^15^26^2^2 X^95^D^15^26^2^ S^96^0^V^idx_c^SMALLINT^^global D^96^15^15^32^2^2 X^96^D^15^32^2^ S^97^0^V^l^SMALLINT^^global D^97^15^15^38^2^2 X^97^D^15^38^2^ S^98^0^V^unidades1^ARRAY[19] OF CHAR(10)^^global D^98^16^16^10^2^2 X^98^D^16^10^2^ S^99^0^V^decenas^ARRAY[81] OF CHAR(20)^^global D^99^17^17^10^2^2 X^99^D^17^10^2^ S^100^0^V^centenas^ARRAY[10] OF CHAR(20)^^global D^100^18^18^10^2^2 X^100^D^18^10^2^ S^101^0^V^miles^ARRAY[9] OF CHAR(2)^^global D^101^19^19^10^2^2 X^101^D^19^10^2^ S^102^0^V^p_descrip^CHAR(30)^^global D^102^20^20^10^2^2 X^102^D^20^10^2^ S^103^0^V^anula_seguro^CHAR(1)^^global D^103^21^21^10^2^2 X^103^D^21^10^2^ S^104^0^V^presupa^RECORD^^global D^104^22^22^10^2^2 X^104^D^22^10^2^ S^105^104^V^cuenta_no^CHAR(8)^decomarmol.cgtb00023.cuenta_no^ D^105^0^0^0^0^0 S^106^104^V^presupuesto^DECIMAL(12,2)^decomarmol.cgtb00023.presupuesto^ D^106^0^0^0^0^0 S^107^104^V^ano^SMALLINT^decomarmol.cgtb00023.ano^ D^107^0^0^0^0^0 S^108^104^V^mes^SMALLINT^decomarmol.cgtb00023.mes^ D^108^0^0^0^0^0 S^109^104^V^status_t^CHAR(1)^decomarmol.cgtb00023.status_t^ D^109^0^0^0^0^0 S^110^104^V^us_crea^CHAR(9)^decomarmol.cgtb00023.us_crea^ D^110^0^0^0^0^0 S^111^104^V^fech_crea^DATE^decomarmol.cgtb00023.fech_crea^ D^111^0^0^0^0^0 S^112^104^V^us_mod^CHAR(9)^decomarmol.cgtb00023.us_mod^ D^112^0^0^0^0^0 S^113^104^V^fech_mod^DATE^decomarmol.cgtb00023.fech_mod^ D^113^0^0^0^0^0 S^114^0^V^nombre_m^CHAR(10)^decomarmol.mestable.descrip^global D^114^23^23^10^2^2 X^114^D^23^10^2^ S^115^0^V^usuarios^CHAR(80)^^global D^115^24^24^10^2^2 X^115^r^34^34^0^ X^115^l^30^28^0^ X^115^D^24^10^2^ S^116^0^V^clave^CHAR(80)^^global D^116^24^24^19^2^2 X^116^r^34^49^0^ X^116^l^31^28^0^ X^116^D^24^19^2^ S^117^0^V^progreso^SMALLINT^^global D^117^25^25^10^2^2 X^117^D^25^10^2^ S^118^0^V^HANDLER^om.SaxDocumentHandler^^global D^118^26^26^10^2^2 X^118^D^26^10^2^ S^119^0^V^r_output^STRING^^global D^119^27^27^10^2^2 X^119^D^27^10^2^ S^120^0^V^afecta^STRING^^global D^120^27^27^19^2^2 X^120^D^27^19^2^ S^121^0^V^pventas^ui.ComboBox^^global D^121^28^28^10^2^2 X^121^D^28^10^2^ S^122^0^V^ptipoNegocio^ui.ComboBox^^global D^122^28^28^18^2^2 X^122^D^28^18^2^ S^123^0^V^ventas^SMALLINT^^global D^123^29^29^10^2^2 X^123^D^29^10^2^ S^124^0^V^fecha_inicial^DATE^^global D^124^30^30^10^2^2 X^124^D^30^10^2^ S^125^0^V^fecha_final^DATE^^global D^125^30^30^24^2^2 X^125^D^30^24^2^ S^126^0^V^p_fecha^DATE^^global D^126^30^30^36^2^2 X^126^D^30^36^2^ S^127^0^V^entrada^VARCHAR(14)^^global D^127^31^31^10^2^2 X^127^D^31^10^2^ S^128^0^V^entra1^VARCHAR(14)^^global D^128^31^31^18^2^2 X^128^D^31^18^2^ S^129^0^V^nom_cli^VARCHAR(30)^^global D^129^32^32^10^2^2 X^129^D^32^10^2^ S^130^0^V^detalle1^VARCHAR(30)^^global D^130^32^32^18^2^2 X^130^D^32^18^2^ S^131^0^V^fecha1^DATE^^global D^131^33^33^10^2^2 X^131^D^33^10^2^ S^132^0^V^fecha2^DATE^^global D^132^33^33^17^2^2 X^132^D^33^17^2^ S^133^0^V^entra^VARCHAR(14)^^global D^133^34^34^10^2^2 X^133^D^34^10^2^ S^134^0^V^tasa^DECIMAL(10,2)^^global D^134^35^35^10^2^2 X^134^D^35^10^2^ S^135^0^V^nombre_cta^CHAR(100)^^global D^135^36^36^10^2^2 X^135^D^36^10^2^ S^136^0^V^debito^DECIMAL(12,2)^^global D^136^37^37^19^2^2 X^136^D^37^19^2^ S^137^0^V^debito1^DECIMAL(12,2)^^global D^137^37^37^26^2^2 X^137^D^37^26^2^ S^138^0^V^credito^DECIMAL(12,2)^^global D^138^37^37^34^2^2 X^138^D^37^34^2^ S^139^0^V^credito1^DECIMAL(12,2)^^global D^139^37^37^42^2^2 X^139^D^37^42^2^ S^140^0^V^p_vetb02^RECORD^^global D^140^38^38^19^2^2 X^140^D^38^19^2^ S^141^140^V^cod_cia^SMALLINT^decomarmol.vetb00002.cod_cia^ D^141^0^0^0^0^0 S^142^140^V^factura^INTEGER^decomarmol.vetb00002.factura^ D^142^0^0^0^0^0 S^143^140^V^fecha_factura^DATE^decomarmol.vetb00002.fecha_factura^ D^143^0^0^0^0^0 S^144^140^V^ventas^VARCHAR(1)^decomarmol.vetb00002.ventas^ D^144^0^0^0^0^0 S^145^140^V^zona^VARCHAR(3)^decomarmol.vetb00002.zona^ D^145^0^0^0^0^0 S^146^140^V^orden^INTEGER^decomarmol.vetb00002.orden^ D^146^0^0^0^0^0 S^147^140^V^fecha_orden^DATE^decomarmol.vetb00002.fecha_orden^ D^147^0^0^0^0^0 S^148^140^V^conduce^INTEGER^decomarmol.vetb00002.conduce^ D^148^0^0^0^0^0 S^149^140^V^fecha_conduce^DATE^decomarmol.vetb00002.fecha_conduce^ D^149^0^0^0^0^0 S^150^140^V^tipo_cliente^SMALLINT^decomarmol.vetb00002.tipo_cliente^ D^150^0^0^0^0^0 S^151^140^V^sec_cliente^INTEGER^decomarmol.vetb00002.sec_cliente^ D^151^0^0^0^0^0 S^152^140^V^cod_vend^INTEGER^decomarmol.vetb00002.cod_vend^ D^152^0^0^0^0^0 S^153^140^V^sec_vend^SMALLINT^decomarmol.vetb00002.sec_vend^ D^153^0^0^0^0^0 S^154^140^V^cond_pago^SMALLINT^decomarmol.vetb00002.cond_pago^ D^154^0^0^0^0^0 S^155^140^V^porc_itbi^DECIMAL(5,2)^decomarmol.vetb00002.porc_itbi^ D^155^0^0^0^0^0 S^156^140^V^porc_desc^DECIMAL(8,2)^decomarmol.vetb00002.porc_desc^ D^156^0^0^0^0^0 S^157^140^V^prima_us^DECIMAL(6,2)^decomarmol.vetb00002.prima_us^ D^157^0^0^0^0^0 S^158^140^V^sub_total^DECIMAL(10,2)^decomarmol.vetb00002.sub_total^ D^158^0^0^0^0^0 S^159^140^V^monto_desc^DECIMAL(10,2)^decomarmol.vetb00002.monto_desc^ D^159^0^0^0^0^0 S^160^140^V^monto_itbi^DECIMAL(10,2)^decomarmol.vetb00002.monto_itbi^ D^160^0^0^0^0^0 S^161^140^V^neto^DECIMAL(10,2)^decomarmol.vetb00002.neto^ D^161^0^0^0^0^0 S^162^140^V^fecha_embarque^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fecha_embarque^ D^162^0^0^0^0^0 S^163^140^V^status_impresion^VARCHAR(1)^decomarmol.vetb00002.status_impresion^ D^163^0^0^0^0^0 S^164^140^V^status_t^VARCHAR(1)^decomarmol.vetb00002.status_t^ D^164^0^0^0^0^0 S^165^140^V^us_crea^VARCHAR(50)^decomarmol.vetb00002.us_crea^ D^165^0^0^0^0^0 S^166^140^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fech_crea^ D^166^0^0^0^0^0 S^167^140^V^us_mod^VARCHAR(50)^decomarmol.vetb00002.us_mod^ D^167^0^0^0^0^0 S^168^140^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fech_mod^ D^168^0^0^0^0^0 S^169^140^V^documento^CHAR(15)^decomarmol.vetb00002.documento^ D^169^0^0^0^0^0 S^170^140^V^placa_transporte^CHAR(25)^decomarmol.vetb00002.placa_transporte^ D^170^0^0^0^0^0 S^171^140^V^bodega^SMALLINT^decomarmol.vetb00002.bodega^ D^171^0^0^0^0^0 S^172^140^V^cotizacion_no^INTEGER^decomarmol.vetb00002.cotizacion_no^ D^172^0^0^0^0^0 S^173^140^V^tipo_factura^CHAR(20)^decomarmol.vetb00002.tipo_factura^ D^173^0^0^0^0^0 S^174^140^V^documento_ref^CHAR(25)^decomarmol.vetb00002.documento_ref^ D^174^0^0^0^0^0 S^175^140^V^descripcion_documento^VARCHAR(100)^decomarmol.vetb00002.descripcion_documento^ D^175^0^0^0^0^0 S^176^0^V^p_vetb03^RECORD^^global D^176^39^39^12^2^2 X^176^D^39^12^2^ S^177^176^V^cod_cia^SMALLINT^decomarmol.vetb00003.cod_cia^ D^177^0^0^0^0^0 S^178^176^V^factura^INTEGER^decomarmol.vetb00003.factura^ D^178^0^0^0^0^0 S^179^176^V^area^SMALLINT^decomarmol.vetb00003.area^ D^179^0^0^0^0^0 S^180^176^V^cod_n^SMALLINT^decomarmol.vetb00003.cod_n^ D^180^0^0^0^0^0 S^181^176^V^cod_grupo^SMALLINT^decomarmol.vetb00003.cod_grupo^ D^181^0^0^0^0^0 S^182^176^V^cod_tipo^SMALLINT^decomarmol.vetb00003.cod_tipo^ D^182^0^0^0^0^0 S^183^176^V^cod_sec^SMALLINT^decomarmol.vetb00003.cod_sec^ D^183^0^0^0^0^0 S^184^176^V^cantidad^DECIMAL(12,5)^decomarmol.vetb00003.cantidad^ D^184^0^0^0^0^0 S^185^176^V^cantidad_2^DECIMAL(14,2)^decomarmol.vetb00003.cantidad_2^ D^185^0^0^0^0^0 S^186^176^V^bonificacion^DECIMAL(12,2)^decomarmol.vetb00003.bonificacion^ D^186^0^0^0^0^0 S^187^176^V^precio^DECIMAL(12,2)^decomarmol.vetb00003.precio^ D^187^0^0^0^0^0 S^188^176^V^status_t^CHAR(1)^decomarmol.vetb00003.status_t^ D^188^0^0^0^0^0 S^189^176^V^us_crea^CHAR(50)^decomarmol.vetb00003.us_crea^ D^189^0^0^0^0^0 S^190^176^V^fech_crea^DATE^decomarmol.vetb00003.fech_crea^ D^190^0^0^0^0^0 S^191^176^V^us_mod^CHAR(50)^decomarmol.vetb00003.us_mod^ D^191^0^0^0^0^0 S^192^176^V^fech_mod^DATE^decomarmol.vetb00003.fech_mod^ D^192^0^0^0^0^0 S^193^176^V^bodega^SMALLINT^decomarmol.vetb00003.bodega^ D^193^0^0^0^0^0 S^194^176^V^id_kit^INTEGER^decomarmol.vetb00003.id_kit^ D^194^0^0^0^0^0 S^195^0^V^p_iptb02^RECORD^^global D^195^40^58^12^2^2 X^195^D^40^12^2^ S^196^195^V^bodega^SMALLINT^decomarmol.iptb00002.bodega^ D^196^41^41^9^2^2 X^196^D^41^9^2^ S^197^195^V^cod_cia^SMALLINT^decomarmol.iptb00002.cod_cia^ D^197^42^42^5^2^2 X^197^D^42^5^2^ S^198^195^V^cod_grupo^SMALLINT^decomarmol.iptb00002.cod_grupo^ D^198^43^43^5^2^2 X^198^D^43^5^2^ S^199^195^V^cod_n^SMALLINT^decomarmol.iptb00002.cod_n^ D^199^44^44^5^2^2 X^199^D^44^5^2^ S^200^195^V^cod_sec^SMALLINT^decomarmol.iptb00002.cod_sec^ D^200^45^45^5^2^2 X^200^D^45^5^2^ S^201^195^V^cod_tipo^SMALLINT^decomarmol.iptb00002.cod_tipo^ D^201^46^46^5^2^2 X^201^D^46^5^2^ S^202^195^V^codid^INTEGER^decomarmol.iptb00002.codid^ D^202^47^47^5^2^2 X^202^D^47^5^2^ S^203^195^V^control_existencia^VARCHAR(2)^decomarmol.iptb00002.control_existencia^ D^203^48^48^5^2^2 X^203^D^48^5^2^ S^204^195^V^control_itbis^VARCHAR(2)^decomarmol.iptb00002.control_itbis^ D^204^49^49^5^2^2 X^204^D^49^5^2^ S^205^195^V^descrip_esp^VARCHAR(180)^decomarmol.iptb00002.descrip_esp^ D^205^50^50^5^2^2 X^205^D^50^5^2^ S^206^195^V^descrip_ing^VARCHAR(80)^decomarmol.iptb00002.descrip_ing^ D^206^51^51^5^2^2 X^206^D^51^5^2^ S^207^195^V^nomenclatura^VARCHAR(50)^decomarmol.iptb00002.nomenclatura^ D^207^52^52^5^2^2 X^207^D^52^5^2^ S^208^195^V^porc_desc^DECIMAL(12,2)^decomarmol.iptb00002.porc_desc^ D^208^53^53^5^2^2 X^208^D^53^5^2^ S^209^195^V^status_t^CHAR(1)^decomarmol.iptb00002.status_t^ D^209^54^54^5^2^2 X^209^D^54^5^2^ S^210^195^V^unidad_med^VARCHAR(50)^decomarmol.iptb00002.unidad_med^ D^210^55^55^5^2^2 X^210^D^55^5^2^ S^211^195^V^us_crea^VARCHAR(50)^decomarmol.iptb00002.us_crea^ D^211^56^56^5^2^2 X^211^D^56^5^2^ S^212^195^V^us_mod^VARCHAR(50)^decomarmol.iptb00002.us_mod^ D^212^57^57^5^2^2 X^212^D^57^5^2^ S^213^0^V^p_clave^CHAR(12)^^global D^213^59^59^5^2^2 X^213^D^59^5^2^ S^214^0^V^p_vetb04^RECORD^^global D^214^60^60^12^2^2 X^214^D^60^12^2^ S^215^214^V^tipo_cliente^SMALLINT^decomarmol.vetb00004.tipo_cliente^ D^215^0^0^0^0^0 S^216^214^V^sec_cliente^SMALLINT^decomarmol.vetb00004.sec_cliente^ D^216^0^0^0^0^0 S^217^214^V^nombre^CHAR(100)^decomarmol.vetb00004.nombre^ D^217^0^0^0^0^0 S^218^214^V^cod_zona^SMALLINT^decomarmol.vetb00004.cod_zona^ D^218^0^0^0^0^0 S^219^214^V^cod_provincia^SMALLINT^decomarmol.vetb00004.cod_provincia^ D^219^0^0^0^0^0 S^220^214^V^telefono^CHAR(25)^decomarmol.vetb00004.telefono^ D^220^0^0^0^0^0 S^221^214^V^fax^CHAR(25)^decomarmol.vetb00004.fax^ D^221^0^0^0^0^0 S^222^214^V^telex^CHAR(25)^decomarmol.vetb00004.telex^ D^222^0^0^0^0^0 S^223^214^V^patente^VARCHAR(80)^decomarmol.vetb00004.patente^ D^223^0^0^0^0^0 S^224^214^V^limite_credito^DECIMAL(10,2)^decomarmol.vetb00004.limite_credito^ D^224^0^0^0^0^0 S^225^214^V^zona_postal^CHAR(10)^decomarmol.vetb00004.zona_postal^ D^225^0^0^0^0^0 S^226^214^V^num_rnc^CHAR(25)^decomarmol.vetb00004.num_rnc^ D^226^0^0^0^0^0 S^227^214^V^nombre_patente^CHAR(30)^decomarmol.vetb00004.nombre_patente^ D^227^0^0^0^0^0 S^228^214^V^status_t^CHAR(1)^decomarmol.vetb00004.status_t^ D^228^0^0^0^0^0 S^229^214^V^us_crea^CHAR(50)^decomarmol.vetb00004.us_crea^ D^229^0^0^0^0^0 S^230^214^V^fech_crea^DATE^decomarmol.vetb00004.fech_crea^ D^230^0^0^0^0^0 S^231^214^V^us_mod^CHAR(50)^decomarmol.vetb00004.us_mod^ D^231^0^0^0^0^0 S^232^214^V^fech_mod^DATE^decomarmol.vetb00004.fech_mod^ D^232^0^0^0^0^0 S^233^214^V^puesto_laboral^VARCHAR(50)^decomarmol.vetb00004.puesto_laboral^ D^233^0^0^0^0^0 S^234^214^V^telefono_casa^CHAR(25)^decomarmol.vetb00004.telefono_casa^ D^234^0^0^0^0^0 S^235^214^V^tipo_negocio^SMALLINT^decomarmol.vetb00004.tipo_negocio^ D^235^0^0^0^0^0 S^236^214^V^cond_pago^SMALLINT^decomarmol.vetb00004.cond_pago^ D^236^0^0^0^0^0 S^237^214^V^id_ciudad^SMALLINT^decomarmol.vetb00004.id_ciudad^ D^237^0^0^0^0^0 S^238^214^V^url^VARCHAR(200)^decomarmol.vetb00004.url^ D^238^0^0^0^0^0 S^239^0^V^p_iptb20^RECORD^^global D^239^61^61^12^2^2 X^239^D^61^12^2^ S^240^239^V^cod_n^INTEGER^decomarmol.iptb00020.cod_n^ D^240^0^0^0^0^0 S^241^239^V^producto^CHAR(30)^decomarmol.iptb00020.producto^ D^241^0^0^0^0^0 S^242^239^V^status_t^CHAR(1)^decomarmol.iptb00020.status_t^ D^242^0^0^0^0^0 S^243^239^V^us_crea^CHAR(9)^decomarmol.iptb00020.us_crea^ D^243^0^0^0^0^0 S^244^239^V^fech_crea^DATE^decomarmol.iptb00020.fech_crea^ D^244^0^0^0^0^0 S^245^239^V^us_mod^CHAR(9)^decomarmol.iptb00020.us_mod^ D^245^0^0^0^0^0 S^246^239^V^fech_mod^DATE^decomarmol.iptb00020.fech_mod^ D^246^0^0^0^0^0 S^247^239^V^cod_inv^SMALLINT^decomarmol.iptb00020.cod_inv^ D^247^0^0^0^0^0 S^248^239^V^comentario^CHAR(80)^decomarmol.iptb00020.comentario^ D^248^0^0^0^0^0 S^249^0^V^p_cgtb34^RECORD^^global D^249^62^62^12^2^2 X^249^D^62^12^2^ S^250^249^V^cuenta_no^CHAR(10)^decomarmol.cgtb00034.cuenta_no^ D^250^0^0^0^0^0 S^251^249^V^departamento^SMALLINT^decomarmol.cgtb00034.departamento^ D^251^0^0^0^0^0 S^252^249^V^cod_n^SMALLINT^decomarmol.cgtb00034.cod_n^ D^252^0^0^0^0^0 S^253^249^V^sec_vend^INTEGER^decomarmol.cgtb00034.sec_vend^ D^253^0^0^0^0^0 S^254^249^V^cod_cia^SMALLINT^decomarmol.cgtb00034.cod_cia^ D^254^0^0^0^0^0 S^255^249^V^id^CHAR(2)^decomarmol.cgtb00034.id^ D^255^0^0^0^0^0 S^256^0^V^opt4^CHAR(3)^^global D^256^66^67^10^2^2 X^256^D^66^10^2^ S^257^0^V^opt3^CHAR(3)^^global D^257^66^67^15^2^2 X^257^D^66^15^2^ S^258^0^V^impresion^CHAR(3)^^global D^258^66^67^20^2^2 X^258^D^66^20^2^ S^259^0^V^verdad^CHAR(3)^^global D^259^66^67^30^2^2 X^259^D^66^30^2^ S^260^0^V^identifica^CHAR(3)^^global D^260^66^67^37^2^2 X^260^D^66^37^2^ S^261^0^V^existe^CHAR(3)^^global D^261^66^67^48^2^2 X^261^D^66^48^2^ S^262^0^V^tiene_facturas^CHAR(3)^^global D^262^66^67^55^2^2 X^262^D^66^55^2^ S^263^0^V^p_param^CHAR(3)^^global D^263^67^67^10^2^2 X^263^D^67^10^2^ S^264^0^V^opt^CHAR(3)^^global D^264^67^67^18^2^2 X^264^D^67^18^2^ S^265^0^V^control^CHAR(3)^^global D^265^67^67^22^2^2 X^265^D^67^22^2^ S^266^0^V^detalle^CHAR(3)^^global D^266^67^67^30^2^2 X^266^D^67^30^2^ S^267^0^V^status_reg^CHAR(3)^^global D^267^67^67^38^2^2 X^267^D^67^38^2^ S^268^0^V^criterio^STRING^^global D^268^68^68^10^2^2 X^268^r^92^52^0^ X^268^l^79^16^0^ X^268^D^68^10^2^ S^269^0^V^selec^STRING^^global D^269^68^68^19^2^2 X^269^r^116^29^0^ X^269^l^88^11^0^ X^269^D^68^19^2^ S^270^0^V^selec1^STRING^^global D^270^68^68^25^2^2 X^270^D^68^25^2^ S^271^0^V^selec2^STRING^^global D^271^68^68^32^2^2 X^271^D^68^32^2^ S^272^0^V^selec4^STRING^^global D^272^68^68^39^2^2 X^272^D^68^39^2^ S^273^0^V^selec3^STRING^^global D^273^68^68^46^2^2 X^273^D^68^46^2^ S^274^0^V^tipo2^CHAR(3)^^global D^274^70^70^10^2^2 X^274^D^70^10^2^ S^275^0^V^opcion^CHAR(3)^^global D^275^70^70^16^2^2 X^275^D^70^16^2^ S^276^0^V^valor_letras^CHAR(90)^^global D^276^71^71^10^2^2 X^276^D^71^10^2^ S^277^0^V^compania^CHAR(50)^^global D^277^72^72^10^2^2 X^277^D^72^10^2^ S^278^0^V^parametro^CHAR(10)^^global D^278^73^73^10^2^2 X^278^D^73^10^2^ S^279^0^V^bandera^INTEGER^^global D^279^74^74^10^2^2 X^279^D^74^10^2^ S^280^0^V^scr_l^INTEGER^^global D^280^74^74^18^2^2 X^280^D^74^18^2^ S^281^0^V^curr1^INTEGER^^global D^281^74^74^24^2^2 X^281^D^74^24^2^ S^282^0^V^curr^INTEGER^^global D^282^74^74^30^2^2 X^282^D^74^30^2^ S^283^0^V^idx^INTEGER^^global D^283^74^74^35^2^2 X^283^D^74^35^2^ S^284^0^V^numero_msg^INTEGER^^global D^284^74^74^39^2^2 X^284^r^132^26^0^ X^284^l^131^21^0^ X^284^r^83^18^0^ X^284^l^82^13^0^ X^284^r^74^17^0^ X^284^l^73^12^0^ X^284^r^66^19^0^ X^284^l^65^14^0^ X^284^r^59^18^0^ X^284^l^58^13^0^ X^284^D^74^39^2^ S^285^0^V^nombre_bco^CHAR(30)^^global D^285^75^75^10^2^2 X^285^D^75^10^2^ S^286^0^V^descrip^CHAR(30)^^global D^286^75^75^21^2^2 X^286^D^75^21^2^ S^287^0^V^p_descripcion^CHAR(30)^^global D^287^75^75^29^2^2 X^287^D^75^29^2^ S^288^0^V^nombre^CHAR(30)^^global D^288^75^75^43^2^2 X^288^D^75^43^2^ S^289^0^V^regi^SMALLINT^^global D^289^76^76^10^2^2 X^289^D^76^10^2^ S^290^0^V^tipo_papel^SMALLINT^^global D^290^76^76^15^2^2 X^290^r^52^18^0^ X^290^l^51^8^0^ X^290^D^76^15^2^ S^291^0^V^l^SMALLINT^^global D^291^76^76^26^2^2 X^291^D^76^26^2^ S^292^0^V^impresor^SMALLINT^^global D^292^77^77^10^2^2 X^292^l^32^28^0^ X^292^D^77^10^2^ S^293^0^V^normal^CHAR(3)^^global D^293^79^80^10^2^2 X^293^D^79^10^2^ S^294^0^V^negrilla_on^CHAR(3)^^global D^294^79^80^17^2^2 X^294^D^79^17^2^ S^295^0^V^negrillas_of^CHAR(3)^^global D^295^79^80^29^2^2 X^295^D^79^29^2^ S^296^0^V^comp_on^CHAR(3)^^global D^296^79^80^42^2^2 X^296^D^79^42^2^ S^297^0^V^comp_off^CHAR(3)^^global D^297^79^80^50^2^2 X^297^D^79^50^2^ S^298^0^V^doce^CHAR(3)^^global D^298^79^80^59^2^2 X^298^D^79^59^2^ S^299^0^V^doble_on^CHAR(3)^^global D^299^79^80^64^2^2 X^299^D^79^64^2^ S^300^0^V^doble_off^CHAR(3)^^global D^300^79^80^73^2^2 X^300^D^79^73^2^ S^301^0^V^cmd^CHAR(150)^^global D^301^81^81^10^2^2 X^301^D^81^10^2^ S^302^0^V^imprime^CHAR(150)^^global D^302^81^81^14^2^2 X^302^D^81^14^2^ S^303^0^V^copia^CHAR(150)^^global D^303^81^81^22^2^2 X^303^D^81^22^2^ S^304^0^V^archivo^CHAR(80)^^global D^304^81^81^38^2^2 X^304^D^81^38^2^ S^305^0^V^arr_bancos^ARRAY[50] OF RECORD^^global D^305^82^85^11^2^2 X^305^D^82^11^2^ S^306^305^V^cuenta_no^VARCHAR(8)^decomarmol.cgtb00012.cuenta_no^ D^306^83^83^11^2^2 X^306^D^83^11^2^ S^307^305^V^nombre_bco^VARCHAR(40)^decomarmol.cgtb00012.nombre_bco^ D^307^84^84^11^2^2 X^307^D^84^11^2^ S^308^0^V^ws^ARRAY[100] OF RECORD^^global D^308^86^89^11^2^2 X^308^D^86^11^2^ S^309^308^V^departamento^SMALLINT^^ D^309^87^87^11^2^2 X^309^D^87^11^2^ S^310^308^V^nombre^CHAR(30)^^ D^310^88^88^11^2^2 X^310^D^88^11^2^ S^311^0^V^arr_cuenta^ARRAY[200] OF RECORD^^global D^311^91^94^11^2^2 X^311^D^91^11^2^ S^312^311^V^cuenta_no^CHAR(8)^decomarmol.cgtb00009.cuenta_no^ D^312^92^92^7^2^2 X^312^D^92^7^2^ S^313^311^V^descripcion^VARCHAR(50)^decomarmol.cgtb00001.descripcion^ D^313^93^93^7^2^2 X^313^D^93^7^2^ S^314^0^V^numero1^CHAR(7)^^global D^314^96^96^8^2^2 X^314^D^96^8^2^ S^315^0^V^usuario^CHAR(9)^^global D^315^97^97^8^2^2 X^315^D^97^8^2^ S^316^0^V^fecha_crea^CHAR(20)^decomarmol.cgtb00004.fech_crea^global D^316^98^98^8^2^2 X^316^D^98^8^2^ S^317^0^V^datos_ck^RECORD^^global D^317^99^99^8^2^2 X^317^D^99^8^2^ S^318^317^V^cheque_no^INTEGER^decomarmol.cgtb00012.cheque_no^ D^318^0^0^0^0^0 S^319^317^V^cuenta_no^VARCHAR(8)^decomarmol.cgtb00012.cuenta_no^ D^319^0^0^0^0^0 S^320^317^V^nombre_bco^VARCHAR(40)^decomarmol.cgtb00012.nombre_bco^ D^320^0^0^0^0^0 S^321^317^V^direccion^VARCHAR(50)^decomarmol.cgtb00012.direccion^ D^321^0^0^0^0^0 S^322^317^V^cuenta_bank^VARCHAR(14)^decomarmol.cgtb00012.cuenta_bank^ D^322^0^0^0^0^0 S^323^317^V^codigo_1^VARCHAR(7)^decomarmol.cgtb00012.codigo_1^ D^323^0^0^0^0^0 S^324^317^V^codigo_2^VARCHAR(7)^decomarmol.cgtb00012.codigo_2^ D^324^0^0^0^0^0 S^325^317^V^status_t^VARCHAR(1)^decomarmol.cgtb00012.status_t^ D^325^0^0^0^0^0 S^326^317^V^us_crea^VARCHAR(9)^decomarmol.cgtb00012.us_crea^ D^326^0^0^0^0^0 S^327^317^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.cgtb00012.fech_crea^ D^327^0^0^0^0^0 S^328^317^V^us_mod^VARCHAR(9)^decomarmol.cgtb00012.us_mod^ D^328^0^0^0^0^0 S^329^317^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.cgtb00012.fech_mod^ D^329^0^0^0^0^0 S^330^317^V^formato^CHAR(18)^decomarmol.cgtb00012.formato^ D^330^0^0^0^0^0 S^331^317^V^tipo_doc^VARCHAR(2)^decomarmol.cgtb00012.tipo_doc^ D^331^0^0^0^0^0 S^332^0^V^cronologico^RECORD^^global D^332^100^100^8^2^2 X^332^D^100^8^2^ S^333^332^V^cod_cro^CHAR(8)^decomarmol.cgtb00031.cod_cro^ D^333^0^0^0^0^0 S^334^332^V^beneficiario^CHAR(60)^decomarmol.cgtb00031.beneficiario^ D^334^0^0^0^0^0 S^335^332^V^status_t^CHAR(1)^decomarmol.cgtb00031.status_t^ D^335^0^0^0^0^0 S^336^332^V^us_crea^CHAR(9)^decomarmol.cgtb00031.us_crea^ D^336^0^0^0^0^0 S^337^332^V^fech_crea^DATE^decomarmol.cgtb00031.fech_crea^ D^337^0^0^0^0^0 S^338^332^V^us_mod^CHAR(9)^decomarmol.cgtb00031.us_mod^ D^338^0^0^0^0^0 S^339^332^V^fech_mod^DATE^decomarmol.cgtb00031.fech_mod^ D^339^0^0^0^0^0 S^340^0^V^entrega^RECORD^^global D^340^101^101^8^2^2 X^340^D^101^8^2^ S^341^340^V^cheque_no^INTEGER^decomarmol.cgtb00032.cheque_no^ D^341^0^0^0^0^0 S^342^340^V^banco^CHAR(8)^decomarmol.cgtb00032.banco^ D^342^0^0^0^0^0 S^343^340^V^fecha^DATE^decomarmol.cgtb00032.fecha^ D^343^0^0^0^0^0 S^344^340^V^cod_cro^CHAR(8)^decomarmol.cgtb00032.cod_cro^ D^344^0^0^0^0^0 S^345^340^V^recibido_por^CHAR(60)^decomarmol.cgtb00032.recibido_por^ D^345^0^0^0^0^0 S^346^340^V^cedula^CHAR(20)^decomarmol.cgtb00032.cedula^ D^346^0^0^0^0^0 S^347^340^V^direccion^CHAR(40)^decomarmol.cgtb00032.direccion^ D^347^0^0^0^0^0 S^348^340^V^fecha_ent^DATE^decomarmol.cgtb00032.fecha_ent^ D^348^0^0^0^0^0 S^349^340^V^hora_ent^CHAR(5)^decomarmol.cgtb00032.hora_ent^ D^349^0^0^0^0^0 S^350^340^V^status_t^CHAR(1)^decomarmol.cgtb00032.status_t^ D^350^0^0^0^0^0 S^351^340^V^us_crea^CHAR(9)^decomarmol.cgtb00032.us_crea^ D^351^0^0^0^0^0 S^352^340^V^fech_crea^DATE^decomarmol.cgtb00032.fech_crea^ D^352^0^0^0^0^0 S^353^340^V^us_mod^CHAR(9)^decomarmol.cgtb00032.us_mod^ D^353^0^0^0^0^0 S^354^340^V^fech_mod^DATE^decomarmol.cgtb00032.fech_mod^ D^354^0^0^0^0^0 S^355^0^V^entrega1^RECORD^^global D^355^102^102^8^2^2 X^355^D^102^8^2^ S^356^355^V^cheque_no^INTEGER^decomarmol.cgtb00033.cheque_no^ D^356^0^0^0^0^0 S^357^355^V^banco^CHAR(8)^decomarmol.cgtb00033.banco^ D^357^0^0^0^0^0 S^358^355^V^fecha^DATE^decomarmol.cgtb00033.fecha^ D^358^0^0^0^0^0 S^359^355^V^monto^DECIMAL(12,2)^decomarmol.cgtb00033.monto^ D^359^0^0^0^0^0 S^360^355^V^portador^CHAR(60)^decomarmol.cgtb00033.portador^ D^360^0^0^0^0^0 S^361^355^V^cod_cro^CHAR(8)^decomarmol.cgtb00033.cod_cro^ D^361^0^0^0^0^0 S^362^355^V^recibido_por^CHAR(60)^decomarmol.cgtb00033.recibido_por^ D^362^0^0^0^0^0 S^363^355^V^cedula^CHAR(20)^decomarmol.cgtb00033.cedula^ D^363^0^0^0^0^0 S^364^355^V^direccion^CHAR(40)^decomarmol.cgtb00033.direccion^ D^364^0^0^0^0^0 S^365^355^V^fecha_ent^DATE^decomarmol.cgtb00033.fecha_ent^ D^365^0^0^0^0^0 S^366^355^V^hora_ent^CHAR(5)^decomarmol.cgtb00033.hora_ent^ D^366^0^0^0^0^0 S^367^355^V^status_t^CHAR(1)^decomarmol.cgtb00033.status_t^ D^367^0^0^0^0^0 S^368^355^V^us_crea^CHAR(9)^decomarmol.cgtb00033.us_crea^ D^368^0^0^0^0^0 S^369^355^V^fech_crea^DATE^decomarmol.cgtb00033.fech_crea^ D^369^0^0^0^0^0 S^370^355^V^us_mod^CHAR(9)^decomarmol.cgtb00033.us_mod^ D^370^0^0^0^0^0 S^371^355^V^fech_mod^DATE^decomarmol.cgtb00033.fech_mod^ D^371^0^0^0^0^0 S^372^0^V^estado_c^CHAR(1)^^global D^372^104^104^8^2^2 X^372^D^104^8^2^ S^373^0^V^selec_p^CHAR(1000)^^global D^373^105^105^8^2^2 X^373^D^105^8^2^ S^374^0^V^cuenta_a^CHAR(8)^^global D^374^106^106^8^2^2 X^374^D^106^8^2^ S^375^0^V^cuenta_b^CHAR(8)^^global D^375^106^106^17^2^2 X^375^D^106^17^2^ S^376^0^V^ins_cp^INTEGER^^global D^376^107^107^8^2^2 X^376^D^107^8^2^ S^377^0^V^m^INTEGER^^global D^377^107^107^15^2^2 X^377^D^107^15^2^ S^378^0^V^i^INTEGER^^global D^378^107^107^17^2^2 X^378^D^107^17^2^ S^379^0^V^p_nivel^INTEGER^^global D^379^107^107^19^2^2 X^379^D^107^19^2^ S^380^0^V^codigo^INTEGER^^global D^380^107^107^27^2^2 X^380^D^107^27^2^ S^381^0^V^meses^ARRAY[12] OF CHAR(10)^^global D^381^108^108^8^2^2 X^381^D^108^8^2^ S^382^0^V^referencia^CHAR(9)^^global D^382^109^109^8^2^2 X^382^D^109^8^2^ S^383^0^V^tipo_doc1^CHAR(2)^^global D^383^110^110^8^2^2 X^383^D^110^8^2^ S^384^0^V^depto^INTEGER^^global D^384^111^111^8^2^2 X^384^D^111^8^2^ S^385^0^V^cxp^INTEGER^^global D^385^111^111^14^2^2 X^385^D^111^14^2^ S^386^0^V^numero^INTEGER^^global D^386^111^111^18^2^2 X^386^D^111^18^2^ S^387^0^V^aplicar^INTEGER^^global D^387^111^111^25^2^2 X^387^D^111^25^2^ S^388^0^V^cuenta_cxp^SMALLINT^^global D^388^112^112^8^2^2 X^388^D^112^8^2^ S^389^0^V^cuenta_cta^SMALLINT^^global D^389^112^112^19^2^2 X^389^D^112^19^2^ S^390^0^V^cod1_sp^SMALLINT^^global D^390^112^112^30^2^2 X^390^D^112^30^2^ S^391^0^V^cod1_sp_sec^SMALLINT^^global D^391^112^112^38^2^2 X^391^D^112^38^2^ S^392^0^V^p_orden^SMALLINT^^global D^392^112^112^50^2^2 X^392^D^112^50^2^ S^393^0^V^chequea^CHAR(3)^^global D^393^113^114^8^2^2 X^393^D^113^8^2^ S^394^0^V^sale_arr^CHAR(3)^^global D^394^113^114^16^2^2 X^394^D^113^16^2^ S^395^0^V^p_cata^CHAR(3)^^global D^395^113^114^25^2^2 X^395^D^113^25^2^ S^396^0^V^tipo_d^CHAR(3)^^global D^396^113^114^32^2^2 X^396^D^113^32^2^ S^397^0^V^p_ref^CHAR(3)^^global D^397^113^114^39^2^2 X^397^D^113^39^2^ S^398^0^V^acept_dpto^CHAR(3)^^global D^398^113^114^45^2^2 X^398^D^113^45^2^ S^399^0^V^opc^CHAR(3)^^global D^399^113^114^56^2^2 X^399^D^113^56^2^ S^400^0^V^opc1^CHAR(3)^^global D^400^113^114^60^2^2 X^400^D^113^60^2^ S^401^0^V^limpia^CHAR(3)^^global D^401^114^114^9^2^2 X^401^D^114^9^2^ S^402^0^V^tiene_cta^CHAR(3)^^global D^402^114^114^16^2^2 X^402^D^114^16^2^ S^403^0^V^ctrl_cxp^CHAR(3)^^global D^403^114^114^26^2^2 X^403^D^114^26^2^ S^404^0^V^p_origen^CHAR(3)^^global D^404^114^114^35^2^2 X^404^D^114^35^2^ S^405^0^V^p_tipo^CHAR(2)^^global D^405^115^115^8^2^2 X^405^D^115^8^2^ S^406^0^V^remanente^DECIMAL(12,2)^^global D^406^116^117^8^2^2 X^406^D^116^8^2^ S^407^0^V^monto^DECIMAL(12,2)^^global D^407^116^117^18^2^2 X^407^D^116^18^2^ S^408^0^V^valor_f^DECIMAL(12,2)^^global D^408^116^117^24^2^2 X^408^D^116^24^2^ S^409^0^V^valor_fac^DECIMAL(12,2)^^global D^409^116^117^32^2^2 X^409^D^116^32^2^ S^410^0^V^val_pen^DECIMAL(12,2)^^global D^410^116^117^42^2^2 X^410^D^116^42^2^ S^411^0^V^valor_fac1^DECIMAL(12,2)^^global D^411^116^117^50^2^2 X^411^D^116^50^2^ S^412^0^V^valor_cxp^DECIMAL(12,2)^^global D^412^116^117^61^2^2 X^412^D^116^61^2^ S^413^0^V^valor2^DECIMAL(12,2)^^global D^413^117^117^8^2^2 X^413^D^117^8^2^ S^414^0^V^valor^DECIMAL(12,2)^^global D^414^117^117^15^2^2 X^414^D^117^15^2^ S^415^0^V^nombre_emp^CHAR(15)^^global D^415^118^118^8^2^2 X^415^D^118^8^2^ S^416^0^V^apellido_emp^CHAR(15)^^global D^416^118^118^19^2^2 X^416^D^118^19^2^ S^417^0^V^nom_tipo^CHAR(15)^^global D^417^118^118^32^2^2 X^417^D^118^32^2^ S^418^0^V^nombre_dpto^CHAR(30)^^global D^418^119^119^8^2^2 X^418^D^119^8^2^ S^419^0^V^nombre_cata^CHAR(30)^^global D^419^119^119^20^2^2 X^419^D^119^20^2^ S^420^0^V^facturas^CHAR(70)^^global D^420^120^120^8^2^2 X^420^D^120^8^2^ S^421^0^V^ordenes^CHAR(70)^^global D^421^120^120^17^2^2 X^421^D^120^17^2^ S^422^0^V^nom_cuenta^CHAR(70)^^global D^422^120^120^25^2^2 X^422^D^120^25^2^ S^423^0^V^orden1^CHAR(6)^^global D^423^121^121^8^2^2 X^423^D^121^8^2^ S^424^0^V^factura1^CHAR(10)^^global D^424^122^122^8^2^2 X^424^D^122^8^2^ S^425^0^V^refe^DYNAMIC ARRAY OF CHAR(12)^^global D^425^123^123^8^2^2 X^425^D^123^8^2^ S^426^0^V^cuentas^DYNAMIC ARRAY OF RECORD^^global D^426^125^129^8^2^2 X^426^D^125^8^2^ S^427^426^V^cuenta_no^VARCHAR(8)^decomarmol.cgtb00001.cuenta_no^ D^427^126^126^8^2^2 X^427^D^126^8^2^ S^428^426^V^descripcion^VARCHAR(50)^decomarmol.cgtb00001.descripcion^ D^428^127^127^8^2^2 X^428^D^127^8^2^ S^429^426^V^nivel^SMALLINT^decomarmol.cgtb00001.nivel^ D^429^128^128^8^2^2 X^429^D^128^8^2^ S^430^0^V^aplica_wd^DYNAMIC ARRAY OF RECORD^^global D^430^131^134^8^2^2 X^430^D^131^8^2^ S^431^430^V^aplica_a^CHAR(20)^^ D^431^132^132^8^2^2 X^431^D^132^8^2^ S^432^430^V^pendiente^DECIMAL(12,2)^^ D^432^133^133^8^2^2 X^432^D^133^8^2^ S^433^0^V^arr_recibo^DYNAMIC ARRAY OF RECORD^^global D^433^136^142^8^2^2 X^433^D^136^8^2^ S^434^433^V^tipo^VARCHAR(2)^decomarmol.cptb00001.tipo^ D^434^137^137^8^2^2 X^434^D^137^8^2^ S^435^433^V^orden_no^INTEGER^decomarmol.cptb00001.orden_no^ D^435^138^138^8^2^2 X^435^D^138^8^2^ S^436^433^V^aplica_a^CHAR(20)^^ D^436^139^139^8^2^2 X^436^D^139^8^2^ S^437^433^V^valor_pen^DECIMAL(12,2)^^ D^437^140^140^8^2^2 X^437^D^140^8^2^ S^438^433^V^valor_pag^DECIMAL(12,2)^^ D^438^141^141^8^2^2 X^438^D^141^8^2^ S^439^0^V^arr_cuenta1^DYNAMIC ARRAY OF RECORD^^global D^439^144^153^8^2^2 X^439^D^144^8^2^ S^440^439^V^cuenta_no^VARCHAR(8)^decomarmol.cgtb00004.cuenta_no^ D^440^145^145^8^2^2 X^440^D^145^8^2^ S^441^439^V^departamento^SMALLINT^decomarmol.cgtb00004.departamento^ D^441^146^146^8^2^2 X^441^D^146^8^2^ S^442^439^V^cod_aux^SMALLINT^decomarmol.cgtb00004.cod_aux^ D^442^147^147^8^2^2 X^442^D^147^8^2^ S^443^439^V^cod_sec^SMALLINT^decomarmol.cgtb00004.cod_sec^ D^443^148^148^8^2^2 X^443^D^148^8^2^ S^444^439^V^num_doc^VARCHAR(12)^decomarmol.cgtb00004.num_doc^ D^444^149^149^8^2^2 X^444^D^149^8^2^ S^445^439^V^nom_cuenta^CHAR(30)^^ D^445^150^150^8^2^2 X^445^D^150^8^2^ S^446^439^V^debito^DECIMAL(12,2)^decomarmol.cgtb00004.debito^ D^446^151^151^8^2^2 X^446^D^151^8^2^ S^447^439^V^credito^DECIMAL(12,2)^decomarmol.cgtb00004.credito^ D^447^152^152^8^2^2 X^447^D^152^8^2^ S^448^0^V^recibo^RECORD^^global D^448^155^166^8^2^2 X^448^D^155^8^2^ S^449^448^V^tipo_doc^VARCHAR(2)^decomarmol.cptb00001.tipo_doc^ D^449^156^156^8^2^2 X^449^D^156^8^2^ S^450^448^V^cuenta_p^VARCHAR(8)^decomarmol.cgtb00004.cuenta_no^ D^450^157^157^8^2^2 X^450^D^157^8^2^ S^451^448^V^numero^INTEGER^^ D^451^158^158^8^2^2 X^451^D^158^8^2^ S^452^448^V^cod_sp^SMALLINT^decomarmol.cptb00001.cod_sp^ D^452^159^159^8^2^2 X^452^D^159^8^2^ S^453^448^V^cod_sp_sec^SMALLINT^decomarmol.cptb00001.cod_sp_sec^ D^453^160^160^8^2^2 X^453^D^160^8^2^ S^454^448^V^nom_sup^CHAR(44)^^ D^454^161^161^8^2^2 X^454^D^161^8^2^ S^455^448^V^fecha^DATE^^ D^455^162^162^8^2^2 X^455^D^162^8^2^ S^456^448^V^tasa^DECIMAL(8,2)^decomarmol.cgtb00005.tasa^ D^456^163^163^8^2^2 X^456^D^163^8^2^ S^457^448^V^monto^DECIMAL(12,2)^^ D^457^164^164^8^2^2 X^457^D^164^8^2^ S^458^448^V^codigo^SMALLINT^decomarmol.tetb00003.codigo^ D^458^165^165^8^2^2 X^458^D^165^8^2^ S^459^0^V^detalle_1^CHAR(40)^^global D^459^167^167^8^2^2 X^459^D^167^8^2^ S^460^0^V^detalle_2^CHAR(40)^^global D^460^168^168^8^2^2 X^460^D^168^8^2^ S^461^0^V^detalle_3^CHAR(40)^^global D^461^169^169^8^2^2 X^461^D^169^8^2^ S^462^0^V^detalle_4^CHAR(40)^^global D^462^170^170^8^2^2 X^462^D^170^8^2^ S^463^0^V^detalle_5^CHAR(40)^^global D^463^171^171^8^2^2 X^463^D^171^8^2^ S^464^0^V^valor_1^DECIMAL(12,2)^^global D^464^172^172^8^2^2 X^464^D^172^8^2^ S^465^0^V^valor_2^DECIMAL(12,2)^^global D^465^173^173^8^2^2 X^465^D^173^8^2^ S^466^0^V^valor_3^DECIMAL(12,2)^^global D^466^174^174^8^2^2 X^466^D^174^8^2^ S^467^0^V^valor_4^DECIMAL(12,2)^^global D^467^175^175^8^2^2 X^467^D^175^8^2^ S^468^0^V^valor_5^DECIMAL(12,2)^^global D^468^176^176^8^2^2 X^468^D^176^8^2^ S^469^0^V^porc_p^DECIMAL(10,2)^^global D^469^178^178^8^2^2 X^469^D^178^8^2^ S^470^0^V^emp^SMALLINT^^global D^470^179^179^8^2^2 X^470^D^179^8^2^ S^471^0^V^hoy^DATE^^global D^471^180^180^8^2^2 X^471^D^180^8^2^ S^472^0^V^descrip1^CHAR(20)^^global D^472^180^180^17^2^2 X^472^D^180^17^2^ S^473^0^V^ch_fecha^CHAR(10)^^global D^473^180^180^35^2^2 X^473^D^180^35^2^ S^474^0^V^entradas^RECORD^^global D^474^181^181^11^2^2 X^474^D^181^11^2^ S^475^474^V^entrada_no^SMALLINT^decomarmol.cgtb00011.entrada_no^ D^475^0^0^0^0^0 S^476^474^V^descripcion^VARCHAR(60)^decomarmol.cgtb00011.descripcion^ D^476^0^0^0^0^0 S^477^474^V^prog_4gl^VARCHAR(9)^decomarmol.cgtb00011.prog_4gl^ D^477^0^0^0^0^0 S^478^474^V^referencia^VARCHAR(9)^decomarmol.cgtb00011.referencia^ D^478^0^0^0^0^0 S^479^474^V^status_t^VARCHAR(1)^decomarmol.cgtb00011.status_t^ D^479^0^0^0^0^0 S^480^474^V^us_crea^VARCHAR(9)^decomarmol.cgtb00011.us_crea^ D^480^0^0^0^0^0 S^481^474^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.cgtb00011.fech_crea^ D^481^0^0^0^0^0 S^482^474^V^us_mod^VARCHAR(9)^decomarmol.cgtb00011.us_mod^ D^482^0^0^0^0^0 S^483^474^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.cgtb00011.fech_mod^ D^483^0^0^0^0^0 S^484^0^V^catalogo^RECORD^^global D^484^182^182^11^2^2 X^484^D^182^11^2^ S^485^484^V^cuenta_no^VARCHAR(8)^decomarmol.cgtb00001.cuenta_no^ D^485^0^0^0^0^0 S^486^484^V^descripcion^VARCHAR(50)^decomarmol.cgtb00001.descripcion^ D^486^0^0^0^0^0 S^487^484^V^descrip_ing^VARCHAR(50)^decomarmol.cgtb00001.descrip_ing^ D^487^0^0^0^0^0 S^488^484^V^analitico^VARCHAR(1)^decomarmol.cgtb00001.analitico^ D^488^0^0^0^0^0 S^489^484^V^cata^VARCHAR(1)^decomarmol.cgtb00001.cata^ D^489^0^0^0^0^0 S^490^484^V^depto^VARCHAR(1)^decomarmol.cgtb00001.depto^ D^490^0^0^0^0^0 S^491^484^V^nivel^SMALLINT^decomarmol.cgtb00001.nivel^ D^491^0^0^0^0^0 S^492^484^V^ref^VARCHAR(1)^decomarmol.cgtb00001.ref^ D^492^0^0^0^0^0 S^493^484^V^origen^VARCHAR(1)^decomarmol.cgtb00001.origen^ D^493^0^0^0^0^0 S^494^484^V^estado_a^VARCHAR(4)^decomarmol.cgtb00001.estado_a^ D^494^0^0^0^0^0 S^495^484^V^estado_m^VARCHAR(4)^decomarmol.cgtb00001.estado_m^ D^495^0^0^0^0^0 S^496^484^V^aplica_a^VARCHAR(8)^decomarmol.cgtb00001.aplica_a^ D^496^0^0^0^0^0 S^497^484^V^status_t^VARCHAR(1)^decomarmol.cgtb00001.status_t^ D^497^0^0^0^0^0 S^498^484^V^us_crea^VARCHAR(9)^decomarmol.cgtb00001.us_crea^ D^498^0^0^0^0^0 S^499^484^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.cgtb00001.fech_crea^ D^499^0^0^0^0^0 S^500^484^V^us_mod^VARCHAR(9)^decomarmol.cgtb00001.us_mod^ D^500^0^0^0^0^0 S^501^484^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.cgtb00001.fech_mod^ D^501^0^0^0^0^0 S^502^484^V^cuenta_resultado^CHAR(1)^decomarmol.cgtb00001.cuenta_resultado^ D^502^0^0^0^0^0 S^503^484^V^grupo^CHAR(1)^decomarmol.cgtb00001.grupo^ D^503^0^0^0^0^0 S^504^484^V^tipo_cuenta^VARCHAR(50)^decomarmol.cgtb00001.tipo_cuenta^ D^504^0^0^0^0^0 S^505^484^V^selectivo_consumo^CHAR(10)^decomarmol.cgtb00001.selectivo_consumo^ D^505^0^0^0^0^0 S^506^484^V^retencion^CHAR(10)^decomarmol.cgtb00001.retencion^ D^506^0^0^0^0^0 S^507^484^V^codigo_isr^SMALLINT^decomarmol.cgtb00001.codigo_isr^ D^507^0^0^0^0^0 S^508^0^V^p_departa^RECORD^^global D^508^183^183^11^2^2 X^508^D^183^11^2^ S^509^508^V^cuenta_no^CHAR(8)^decomarmol.cgtb00002.cuenta_no^ D^509^0^0^0^0^0 S^510^508^V^departamento^SMALLINT^decomarmol.cgtb00002.departamento^ D^510^0^0^0^0^0 S^511^508^V^status_t^CHAR(1)^decomarmol.cgtb00002.status_t^ D^511^0^0^0^0^0 S^512^508^V^us_crea^CHAR(9)^decomarmol.cgtb00002.us_crea^ D^512^0^0^0^0^0 S^513^508^V^fech_crea^DATE^decomarmol.cgtb00002.fech_crea^ D^513^0^0^0^0^0 S^514^508^V^us_mod^CHAR(9)^decomarmol.cgtb00002.us_mod^ D^514^0^0^0^0^0 S^515^508^V^fech_mod^DATE^decomarmol.cgtb00002.fech_mod^ D^515^0^0^0^0^0 S^516^0^V^p_tipos^RECORD^^global D^516^184^184^11^2^2 X^516^D^184^11^2^ S^517^516^V^tipo^SMALLINT^decomarmol.cgtb00003.tipo^ D^517^0^0^0^0^0 S^518^516^V^clave^CHAR(3)^decomarmol.cgtb00003.clave^ D^518^0^0^0^0^0 S^519^516^V^descripcion^CHAR(30)^decomarmol.cgtb00003.descripcion^ D^519^0^0^0^0^0 S^520^516^V^status_t^CHAR(1)^decomarmol.cgtb00003.status_t^ D^520^0^0^0^0^0 S^521^516^V^us_crea^CHAR(9)^decomarmol.cgtb00003.us_crea^ D^521^0^0^0^0^0 S^522^516^V^fech_crea^DATE^decomarmol.cgtb00003.fech_crea^ D^522^0^0^0^0^0 S^523^516^V^us_mod^CHAR(9)^decomarmol.cgtb00003.us_mod^ D^523^0^0^0^0^0 S^524^516^V^fech_mod^DATE^decomarmol.cgtb00003.fech_mod^ D^524^0^0^0^0^0 S^525^0^V^mov_cuenta^RECORD^^global D^525^185^185^11^2^2 X^525^D^185^11^2^ S^526^525^V^cod_mov^SMALLINT^decomarmol.cgtb00009.cod_mov^ D^526^0^0^0^0^0 S^527^525^V^cuenta_no^CHAR(8)^decomarmol.cgtb00009.cuenta_no^ D^527^0^0^0^0^0 S^528^525^V^status_t^CHAR(1)^decomarmol.cgtb00009.status_t^ D^528^0^0^0^0^0 S^529^525^V^us_crea^CHAR(9)^decomarmol.cgtb00009.us_crea^ D^529^0^0^0^0^0 S^530^525^V^fech_crea^DATE^decomarmol.cgtb00009.fech_crea^ D^530^0^0^0^0^0 S^531^525^V^us_mod^CHAR(9)^decomarmol.cgtb00009.us_mod^ D^531^0^0^0^0^0 S^532^525^V^fech_mod^DATE^decomarmol.cgtb00009.fech_mod^ D^532^0^0^0^0^0 S^533^0^V^movi_cuenta^RECORD^^global D^533^186^186^11^2^2 X^533^D^186^11^2^ S^534^533^V^cod_mov^SMALLINT^decomarmol.cgtb00010.cod_mov^ D^534^0^0^0^0^0 S^535^533^V^cuenta_no^CHAR(8)^decomarmol.cgtb00010.cuenta_no^ D^535^0^0^0^0^0 S^536^533^V^status_t^CHAR(1)^decomarmol.cgtb00010.status_t^ D^536^0^0^0^0^0 S^537^533^V^us_crea^CHAR(9)^decomarmol.cgtb00010.us_crea^ D^537^0^0^0^0^0 S^538^533^V^fech_crea^DATE^decomarmol.cgtb00010.fech_crea^ D^538^0^0^0^0^0 S^539^533^V^us_mod^CHAR(9)^decomarmol.cgtb00010.us_mod^ D^539^0^0^0^0^0 S^540^533^V^fech_mod^DATE^decomarmol.cgtb00010.fech_mod^ D^540^0^0^0^0^0 S^541^0^V^p_fechas^DATE^^global D^541^187^187^8^2^2 X^541^D^187^8^2^ S^542^0^V^comp_fech^DATE^^global D^542^188^188^8^2^2 X^542^D^188^8^2^ S^543^0^V^comp_fech1^DATE^^global D^543^188^188^18^2^2 X^543^D^188^18^2^ S^544^0^V^mes_control^CHAR(2)^^global D^544^189^189^8^2^2 X^544^D^189^8^2^ S^545^0^V^mes_calc^SMALLINT^^global D^545^190^190^8^2^2 X^545^D^190^8^2^ S^546^0^V^dia^SMALLINT^^global D^546^190^190^17^2^2 X^546^D^190^17^2^ S^547^0^V^fecha_c^DATE^^global D^547^191^191^8^2^2 X^547^D^191^8^2^ S^548^0^V^c_ano^CHAR(4)^^global D^548^192^192^8^2^2 X^548^D^192^8^2^ S^549^0^V^a_ano^CHAR(4)^^global D^549^192^192^14^2^2 X^549^D^192^14^2^ S^550^0^V^zona^RECORD^^global D^550^193^193^9^2^2 X^550^D^193^9^2^ S^551^550^V^cod_zona^SMALLINT^decomarmol.vetb00008.cod_zona^ D^551^0^0^0^0^0 S^552^550^V^descrip^CHAR(30)^decomarmol.vetb00008.descrip^ D^552^0^0^0^0^0 S^553^550^V^status_t^CHAR(1)^decomarmol.vetb00008.status_t^ D^553^0^0^0^0^0 S^554^550^V^us_crea^CHAR(50)^decomarmol.vetb00008.us_crea^ D^554^0^0^0^0^0 S^555^550^V^fech_crea^DATE^decomarmol.vetb00008.fech_crea^ D^555^0^0^0^0^0 S^556^550^V^us_mod^CHAR(50)^decomarmol.vetb00008.us_mod^ D^556^0^0^0^0^0 S^557^550^V^fech_mod^DATE^decomarmol.vetb00008.fech_mod^ D^557^0^0^0^0^0 S^558^0^V^zonas^ARRAY[200] OF RECORD^^global D^558^194^197^11^2^2 X^558^D^194^11^2^ S^559^558^V^cod_zona^SMALLINT^decomarmol.vetb00008.cod_zona^ D^559^195^195^10^2^2 X^559^D^195^10^2^ S^560^558^V^descrip^CHAR(30)^decomarmol.vetb00008.descrip^ D^560^196^196^10^2^2 X^560^D^196^10^2^ S^561^0^V^transportista^RECORD^^global D^561^198^198^11^2^2 X^561^D^198^11^2^ S^562^561^V^cod_transp^SMALLINT^decomarmol.vetb00015.cod_transp^ D^562^0^0^0^0^0 S^563^561^V^sec_transp^SMALLINT^decomarmol.vetb00015.sec_transp^ D^563^0^0^0^0^0 S^564^561^V^nombre^CHAR(30)^decomarmol.vetb00015.nombre^ D^564^0^0^0^0^0 S^565^561^V^cedula^INTEGER^decomarmol.vetb00015.cedula^ D^565^0^0^0^0^0 S^566^561^V^serie^SMALLINT^decomarmol.vetb00015.serie^ D^566^0^0^0^0^0 S^567^561^V^calle^CHAR(30)^decomarmol.vetb00015.calle^ D^567^0^0^0^0^0 S^568^561^V^casa_num^CHAR(10)^decomarmol.vetb00015.casa_num^ D^568^0^0^0^0^0 S^569^561^V^barrio^CHAR(20)^decomarmol.vetb00015.barrio^ D^569^0^0^0^0^0 S^570^561^V^urbanizacion^CHAR(20)^decomarmol.vetb00015.urbanizacion^ D^570^0^0^0^0^0 S^571^561^V^cod_zona^SMALLINT^decomarmol.vetb00015.cod_zona^ D^571^0^0^0^0^0 S^572^561^V^cod_provincia^SMALLINT^decomarmol.vetb00015.cod_provincia^ D^572^0^0^0^0^0 S^573^561^V^telefono^CHAR(8)^decomarmol.vetb00015.telefono^ D^573^0^0^0^0^0 S^574^561^V^status_t^CHAR(1)^decomarmol.vetb00015.status_t^ D^574^0^0^0^0^0 S^575^561^V^us_crea^CHAR(50)^decomarmol.vetb00015.us_crea^ D^575^0^0^0^0^0 S^576^561^V^fech_crea^DATE^decomarmol.vetb00015.fech_crea^ D^576^0^0^0^0^0 S^577^561^V^us_mod^CHAR(50)^decomarmol.vetb00015.us_mod^ D^577^0^0^0^0^0 S^578^561^V^fech_mod^DATE^decomarmol.vetb00015.fech_mod^ D^578^0^0^0^0^0 S^579^0^F^fgl_report_commitCurrentSettings^^^extern X^579^c^108^24^0^ S^580^0^F^fgl_report_selectPreview^^^extern X^580^c^107^15^0^ S^581^0^F^fgl_report_selectDevice^^^extern X^581^c^106^15^0^ S^582^0^F^seleccionarsalida^^^extern X^582^c^105^16^0^ S^583^0^F^fgl_report_loadCurrentSettings^^^extern X^583^c^102^11^0^ S^584^0^F^msg^^^extern X^584^c^132^22^0^ X^584^c^83^14^0^ X^584^c^74^13^0^ X^584^c^66^15^0^ X^584^c^59^14^0^ S^585^0^F^msgrp000^^^extern X^585^c^52^9^0^ T^10^27^d^0^0^DEFINE T^12^22^d^0^0^RECORD T^28^38^f^0^0^MAIN T^40^146^f^0^0^FUNCTION T^54^70^i^0^0^INPUT T^56^61^i^0^0^ T^57^61^c^0^0^IF T^58^60^c^0^0^THEN T^63^68^i^0^0^ T^64^68^c^0^0^IF T^65^67^c^0^0^THEN T^72^77^c^0^0^IF T^73^76^c^0^0^THEN T^81^86^c^0^0^IF T^82^85^c^0^0^THEN T^102^112^c^0^0^IF T^104^108^c^0^0^THEN T^124^138^l^0^0^WHILE T^126^128^c^0^0^IF T^127^127^c^0^0^THEN T^127^127^g^0^0^EXIT WHILE T^130^135^c^0^0^IF T^131^134^c^0^0^THEN T^340^463^f^0^0^REPORT T^341^366^d^0^0^DEFINE T^341^351^d^0^0^RECORD T^371^373^a^0^0^FIRST PAGE HEADER T^375^398^a^0^0^BEFORE GROUP OF 7 T^385^387^c^0^0^IF T^386^386^c^0^0^THEN T^394^396^c^0^0^IF T^395^395^c^0^0^THEN x^398^0^ p^v^26 p^v^7 p^v^8 T^400^421^a^0^0^ON EVERY ROW T^402^421^c^0^0^IF T^406^419^c^0^0^THEN T^409^411^c^0^0^IF T^410^410^c^0^0^THEN T^412^414^c^0^0^IF T^413^413^c^0^0^THEN x^418^0^ p^v^12 p^v^11 p^v^9 p^v^25 p^v^23 p^v^10 p^v^4 p^v^6 p^v^5 p^r^71 p^v^13 p^v^14 T^424^443^a^0^0^AFTER GROUP OF 7 T^426^443^c^0^0^IF T^428^442^c^0^0^THEN T^428^430^c^0^0^IF T^429^429^c^0^0^THEN T^432^434^c^0^0^IF T^433^433^c^0^0^THEN T^436^438^c^0^0^IF T^437^437^c^0^0^THEN x^442^0^ p^v^15 p^v^16 T^445^459^a^0^0^ON LAST ROW x^452^0^ p^v^53 p^v^54 p^v^55