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