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