Files
DECOMARMOL/PROYECTO/acdir/acprrp001.rdd
T
2026-09-22 20:38:51 -04:00

855 lines
18 KiB
Plaintext

S^1^0^M^acprrp001^MODULE^^
S^2^1^R^controles^^^public
F^0^C:\Users\luis\Documents\fuentes\GENERO FUENTES\Nueva carpeta\decomarmol\MARMOTECH\PROYECTO\acdir\acprrp001.4gl
D^2^152^251^12^0^0
X^2^D^152^12^0^
X^2^c^148^18^0^finish
X^2^c^146^27^0^output
X^2^c^114^17^0^start
S^3^2^P^x^RECORD^^
D^3^153^165^12^0^0
X^3^r^248^32^0^
X^3^r^247^32^0^
X^3^r^246^32^0^
X^3^r^245^32^0^
X^3^r^239^38^0^
X^3^r^238^38^0^
X^3^r^236^38^0^
X^3^r^235^38^0^
X^3^r^234^48^0^
X^3^l^231^20^0^
X^3^r^229^28^0^
X^3^r^228^28^0^
X^3^r^227^28^0^
X^3^r^226^28^0^
X^3^r^225^28^0^
X^3^r^224^28^0^
X^3^r^223^28^0^
X^3^r^222^57^0^
X^3^r^222^28^0^
X^3^l^175^26^0^
X^3^l^175^14^0^
X^3^l^152^22^0^
X^3^D^153^12^0^
S^4^3^P^codigo^SMALLINT^^
D^4^154^154^12^0^0
X^4^r^222^30^0^
X^4^l^175^28^0^
X^4^D^154^12^0^
S^5^3^P^descripcion^CHAR(30)^^
D^5^155^155^12^0^0
X^5^r^222^59^0^
X^5^D^155^12^0^
S^6^3^P^cuenta_no^CHAR(8)^^
D^6^156^156^12^0^0
X^6^r^234^50^0^
X^6^l^231^22^0^
X^6^l^175^16^0^
X^6^D^156^12^0^
S^7^3^P^dcto_compra^CHAR(10)^^
D^7^157^157^12^0^0
X^7^r^223^30^0^
X^7^D^157^12^0^
S^8^3^P^fech_compra^DATE^^
D^8^158^158^12^0^0
X^8^r^224^30^0^
X^8^D^158^12^0^
S^9^3^P^vida_util^INTEGER^^
D^9^159^159^12^0^0
X^9^r^229^30^0^
X^9^D^159^12^0^
S^10^3^P^status_t^CHAR(1)^^
D^10^160^160^12^0^0
X^10^D^160^12^0^
S^11^3^P^valor_compra^DECIMAL(12,2)^^
D^11^161^161^12^0^0
X^11^r^245^34^0^
X^11^r^235^40^0^
X^11^r^225^30^0^
X^11^D^161^12^0^
S^12^3^P^depr_acum^DECIMAL(12,2)^^
D^12^162^162^12^0^0
X^12^r^246^34^0^
X^12^r^236^40^0^
X^12^r^226^30^0^
X^12^D^162^12^0^
S^13^3^P^valor_libro^DECIMAL(12,2)^^
D^13^163^163^12^0^0
X^13^r^248^34^0^
X^13^r^239^40^0^
X^13^r^228^30^0^
X^13^D^163^12^0^
S^14^3^P^deprec^DECIMAL(12,2)^^
D^14^164^164^12^0^0
X^14^r^247^34^0^
X^14^r^238^40^0^
X^14^r^227^30^0^
X^14^D^164^12^0^
S^15^2^V^hora^CHAR(5)^^
D^15^167^167^12^0^0
X^15^r^190^29^0^
X^15^l^179^13^0^
X^15^D^167^12^0^
S^16^2^V^reportDef^base.Report^^
D^16^0^0^0^0^0
S^17^1^F^acprrp001^^^public
D^17^38^149^10^0^0
X^17^D^38^10^0^
X^17^c^35^7^0^
S^18^1^F^main^^^public
D^18^27^36^1^0^0
X^18^D^27^1^0^
S^19^1^V^act_fij^RECORD^^private
D^19^11^23^12^0^0
X^19^r^146^37^0^
X^19^r^144^58^0^
X^19^r^144^37^0^
X^19^l^144^17^0^
X^19^l^142^17^0^
X^19^r^141^37^0^
X^19^l^141^17^0^
X^19^l^140^17^0^
X^19^r^139^51^0^
X^19^r^139^32^0^
X^19^r^139^14^0^
X^19^l^135^17^0^
X^19^r^134^13^0^
X^19^r^131^27^0^
X^19^l^130^38^0^
X^19^l^127^17^0^
X^19^r^126^13^0^
X^19^r^123^27^0^
X^19^l^122^38^0^
X^19^l^120^14^0^
X^19^l^119^14^0^
X^19^l^118^14^0^
X^19^r^116^25^0^
X^19^D^11^12^0^
S^20^19^V^codigo^SMALLINT^^
D^20^12^12^12^0^0
X^20^r^131^35^0^
X^20^r^123^35^0^
X^20^D^12^12^0^
S^21^19^V^descripcion^CHAR(30)^^
D^21^13^13^12^0^0
X^21^D^13^12^0^
S^22^19^V^cuenta_no^CHAR(8)^^
D^22^14^14^12^0^0
X^22^D^14^12^0^
S^23^19^V^dcto_compra^CHAR(10)^^
D^23^15^15^12^0^0
X^23^D^15^12^0^
S^24^19^V^fech_compra^DATE^^
D^24^16^16^12^0^0
X^24^D^16^12^0^
S^25^19^V^vida_util^SMALLINT^^
D^25^17^17^12^0^0
X^25^D^17^12^0^
S^26^19^V^status_t^CHAR(1)^^
D^26^18^18^12^0^0
X^26^D^18^12^0^
S^27^19^V^valor_compra^DECIMAL(12,2)^^
D^27^19^19^12^0^0
X^27^r^144^45^0^
X^27^r^141^45^0^
X^27^r^139^59^0^
X^27^D^19^12^0^
S^28^19^V^depr_acum^DECIMAL(12,2)^^
D^28^20^20^12^0^0
X^28^r^144^66^0^
X^28^l^141^25^0^
X^28^r^139^22^0^
X^28^l^127^25^0^
X^28^r^126^21^0^
X^28^l^122^46^0^
X^28^l^118^22^0^
X^28^D^20^12^0^
S^29^19^V^valor_libro^DECIMAL(12,2)^^
D^29^21^21^12^0^0
X^29^l^144^25^0^
X^29^l^140^25^0^
X^29^l^120^22^0^
X^29^D^21^12^0^
S^30^19^V^deprec^DECIMAL(12,2)^^
D^30^22^22^12^0^0
X^30^l^142^25^0^
X^30^r^139^40^0^
X^30^l^135^25^0^
X^30^r^134^21^0^
X^30^l^130^46^0^
X^30^l^119^22^0^
X^30^D^22^12^0^
S^31^1^C^busca_act^base.Cursor^^private
D^31^108^108^12^0^0
X^31^u^109^38^0^
X^31^D^108^12^0^
S^32^1^C^activos^base.Cursor^^private
D^32^109^109^12^0^0
X^32^u^116^12^0^
X^32^u^110^9^0^
X^32^D^109^12^0^
S^33^0^V^status^INTEGER^^builtin
F^1^C:\Program Files (x86)\FourJs\Genero Studio2.50\fgl\lib/fgl.4gl
D^33^14^14^1^1^1
X^33^r^79^10^0^
X^33^D^14^1^1^
S^34^0^V^int_flag^INTEGER^^builtin
D^34^14^14^9^1^1
X^34^l^88^9^0^
X^34^r^85^5^0^
X^34^D^14^9^1^
S^35^0^V^activo^RECORD^^global
F^2^acprgb000.4gl
D^35^4^16^10^2^2
X^35^D^4^10^2^
S^36^35^V^codigo^SMALLINT^^
D^36^5^5^5^2^2
X^36^D^5^5^2^
S^37^35^V^descripcion^CHAR(30)^^
D^37^6^6^5^2^2
X^37^D^6^5^2^
S^38^35^V^cuenta_no^CHAR(8)^^
D^38^7^7^5^2^2
X^38^D^7^5^2^
S^39^35^V^cta_depr^CHAR(8)^^
D^39^8^8^5^2^2
X^39^D^8^5^2^
S^40^35^V^cta_gasto^CHAR(8)^^
D^40^9^9^5^2^2
X^40^D^9^5^2^
S^41^35^V^departamento^SMALLINT^^
D^41^10^10^5^2^2
X^41^D^10^5^2^
S^42^35^V^tasa_cambio^DECIMAL(8,2)^^
D^42^11^11^5^2^2
X^42^D^11^5^2^
S^43^35^V^fech_compra^DATE^^
D^43^12^12^5^2^2
X^43^D^12^5^2^
S^44^35^V^dcto_compra^CHAR(10)^^
D^44^13^13^5^2^2
X^44^D^13^5^2^
S^45^35^V^duracion^INTEGER^^
D^45^14^14^5^2^2
X^45^D^14^5^2^
S^46^35^V^valor_compra^DECIMAL(12,2)^^
D^46^15^15^5^2^2
X^46^D^15^5^2^
S^47^0^V^usuarios^CHAR(50)^^global
D^47^17^17^2^2^2
X^47^r^32^33^0^
X^47^l^29^28^0^
X^47^D^17^2^2^
S^48^0^V^clave^CHAR(50)^^global
D^48^17^17^11^2^2
X^48^r^32^48^0^
X^48^l^30^28^0^
X^48^D^17^11^2^
S^49^0^V^p_companias^RECORD^^global
D^49^18^18^2^2^2
X^49^r^33^18^0^
X^49^D^18^2^2^
S^50^49^V^cod_comp^CHAR(5)^decomarmol.companias.cod_comp^
D^50^0^0^0^0^0
X^50^D^18^2^2^
S^51^49^V^nombre^CHAR(40)^decomarmol.companias.nombre^
D^51^0^0^0^0^0
X^51^D^18^2^2^
S^52^49^V^rnc^CHAR(30)^decomarmol.companias.rnc^
D^52^0^0^0^0^0
X^52^D^18^2^2^
S^53^49^V^direccion^CHAR(40)^decomarmol.companias.direccion^
D^53^0^0^0^0^0
X^53^D^18^2^2^
S^54^49^V^telefono^CHAR(15)^decomarmol.companias.telefono^
D^54^0^0^0^0^0
X^54^D^18^2^2^
S^55^49^V^fax^CHAR(15)^decomarmol.companias.fax^
D^55^0^0^0^0^0
X^55^D^18^2^2^
S^56^49^V^administrador^CHAR(40)^decomarmol.companias.administrador^
D^56^0^0^0^0^0
X^56^D^18^2^2^
S^57^49^V^email^CHAR(100)^decomarmol.companias.email^
D^57^0^0^0^0^0
X^57^D^18^2^2^
S^58^49^V^paginaweb^CHAR(100)^decomarmol.companias.paginaweb^
D^58^0^0^0^0^0
X^58^D^18^2^2^
S^59^49^V^direccion1^CHAR(50)^decomarmol.companias.direccion1^
D^59^0^0^0^0^0
X^59^D^18^2^2^
S^60^49^V^telefono1^CHAR(15)^decomarmol.companias.telefono1^
D^60^0^0^0^0^0
X^60^D^18^2^2^
S^61^49^V^fax1^CHAR(15)^decomarmol.companias.fax1^
D^61^0^0^0^0^0
X^61^D^18^2^2^
S^62^49^V^status_t^CHAR(1)^decomarmol.companias.status_t^
D^62^0^0^0^0^0
X^62^D^18^2^2^
S^63^49^V^us_crea^CHAR(9)^decomarmol.companias.us_crea^
D^63^0^0^0^0^0
X^63^D^18^2^2^
S^64^49^V^fech_crea^DATE^decomarmol.companias.fech_crea^
D^64^0^0^0^0^0
X^64^D^18^2^2^
S^65^49^V^us_mod^CHAR(9)^decomarmol.companias.us_mod^
D^65^0^0^0^0^0
X^65^D^18^2^2^
S^66^49^V^fech_mod^DATE^decomarmol.companias.fech_mod^
D^66^0^0^0^0^0
X^66^D^18^2^2^
S^67^49^V^codnomina^CHAR(30)^decomarmol.companias.codnomina^
D^67^0^0^0^0^0
X^67^D^18^2^2^
S^68^49^V^cuenta_no_inv^CHAR(10)^decomarmol.companias.cuenta_no_inv^
D^68^0^0^0^0^0
X^68^D^18^2^2^
S^69^49^V^dias_vence_reservas^SMALLINT^decomarmol.companias.dias_vence_reservas^
D^69^0^0^0^0^0
X^69^D^18^2^2^
S^70^0^V^HANDLER^om.SaxDocumentHandler^^global
D^70^19^19^4^2^2
X^70^r^114^42^0^
X^70^l^113^45^0^
X^70^D^19^4^2^
S^71^0^V^r_output^STRING^^global
D^71^20^20^10^2^2
X^71^r^113^25^0^
X^71^l^112^39^0^
X^71^D^20^10^2^
S^72^0^V^normal^CHAR(3)^^global
D^72^23^23^10^2^2
X^72^r^249^41^0^
X^72^D^23^10^2^
S^73^0^V^negrilla_on^CHAR(3)^^global
D^73^23^23^17^2^2
X^73^D^23^17^2^
S^74^0^V^negrillas_of^CHAR(3)^^global
D^74^23^23^29^2^2
X^74^D^23^29^2^
S^75^0^V^comp_on^CHAR(3)^^global
D^75^23^23^42^2^2
X^75^r^181^29^0^
X^75^D^23^42^2^
S^76^0^V^comp_off^CHAR(3)^^global
D^76^23^23^50^2^2
X^76^D^23^50^2^
S^77^0^V^doce^CHAR(3)^^global
D^77^23^23^59^2^2
X^77^D^23^59^2^
S^78^0^V^doble_on^CHAR(3)^^global
D^78^23^23^64^2^2
X^78^D^23^64^2^
S^79^0^V^doble_off^CHAR(3)^^global
D^79^23^23^73^2^2
X^79^D^23^73^2^
S^80^0^V^cmd^CHAR(150)^^global
D^80^25^25^10^2^2
X^80^D^25^10^2^
S^81^0^V^imprime^CHAR(150)^^global
D^81^25^25^14^2^2
X^81^D^25^14^2^
S^82^0^V^copia^CHAR(150)^^global
D^82^25^25^22^2^2
X^82^D^25^22^2^
S^83^0^V^archivo^CHAR(80)^^global
D^83^25^25^38^2^2
X^83^D^25^38^2^
S^84^0^V^impresor^SMALLINT^^global
D^84^26^26^10^2^2
X^84^D^26^10^2^
S^85^0^V^activ^RECORD^^global
D^85^29^29^8^2^2
X^85^D^29^8^2^
S^86^85^V^codigo^SMALLINT^decomarmol.actb00001.codigo^
D^86^0^0^0^0^0
X^86^D^29^8^2^
S^87^85^V^descripcion^CHAR(40)^decomarmol.actb00001.descripcion^
D^87^0^0^0^0^0
X^87^D^29^8^2^
S^88^85^V^cuenta_no^CHAR(8)^decomarmol.actb00001.cuenta_no^
D^88^0^0^0^0^0
X^88^D^29^8^2^
S^89^85^V^cta_depr^CHAR(8)^decomarmol.actb00001.cta_depr^
D^89^0^0^0^0^0
X^89^D^29^8^2^
S^90^85^V^cta_gasto^CHAR(8)^decomarmol.actb00001.cta_gasto^
D^90^0^0^0^0^0
X^90^D^29^8^2^
S^91^85^V^departamento^SMALLINT^decomarmol.actb00001.departamento^
D^91^0^0^0^0^0
X^91^D^29^8^2^
S^92^85^V^fech_compra^DATE^decomarmol.actb00001.fech_compra^
D^92^0^0^0^0^0
X^92^D^29^8^2^
S^93^85^V^duracion^INTEGER^decomarmol.actb00001.duracion^
D^93^0^0^0^0^0
X^93^D^29^8^2^
S^94^85^V^fech_elim^DATE^decomarmol.actb00001.fech_elim^
D^94^0^0^0^0^0
X^94^D^29^8^2^
S^95^85^V^referencia^VARCHAR(25)^decomarmol.actb00001.referencia^
D^95^0^0^0^0^0
X^95^D^29^8^2^
S^96^85^V^fabricante^VARCHAR(50)^decomarmol.actb00001.fabricante^
D^96^0^0^0^0^0
X^96^D^29^8^2^
S^97^85^V^status_t^CHAR(1)^decomarmol.actb00001.status_t^
D^97^0^0^0^0^0
X^97^D^29^8^2^
S^98^85^V^us_crea^CHAR(9)^decomarmol.actb00001.us_crea^
D^98^0^0^0^0^0
X^98^D^29^8^2^
S^99^85^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.actb00001.fech_crea^
D^99^0^0^0^0^0
X^99^D^29^8^2^
S^100^85^V^us_mod^CHAR(9)^decomarmol.actb00001.us_mod^
D^100^0^0^0^0^0
X^100^D^29^8^2^
S^101^85^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.actb00001.fech_mod^
D^101^0^0^0^0^0
X^101^D^29^8^2^
S^102^0^V^categ^RECORD^^global
D^102^31^31^8^2^2
X^102^D^31^8^2^
S^103^102^V^cod_mov^SMALLINT^decomarmol.actb00002.cod_mov^
D^103^0^0^0^0^0
X^103^D^31^8^2^
S^104^102^V^descrip^CHAR(30)^decomarmol.actb00002.descrip^
D^104^0^0^0^0^0
X^104^D^31^8^2^
S^105^102^V^tipo_mov^CHAR(1)^decomarmol.actb00002.tipo_mov^
D^105^0^0^0^0^0
X^105^D^31^8^2^
S^106^102^V^uso^CHAR(1)^decomarmol.actb00002.uso^
D^106^0^0^0^0^0
X^106^D^31^8^2^
S^107^102^V^status_t^CHAR(1)^decomarmol.actb00002.status_t^
D^107^0^0^0^0^0
X^107^D^31^8^2^
S^108^102^V^us_crea^CHAR(50)^decomarmol.actb00002.us_crea^
D^108^0^0^0^0^0
X^108^D^31^8^2^
S^109^102^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.actb00002.fech_crea^
D^109^0^0^0^0^0
X^109^D^31^8^2^
S^110^102^V^us_mod^CHAR(50)^decomarmol.actb00002.us_mod^
D^110^0^0^0^0^0
X^110^D^31^8^2^
S^111^102^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.actb00002.fech_mod^
D^111^0^0^0^0^0
X^111^D^31^8^2^
S^112^0^V^trans^RECORD^^global
D^112^33^33^8^2^2
X^112^D^33^8^2^
S^113^112^V^codigo^INTEGER^decomarmol.actb00004.codigo^
D^113^0^0^0^0^0
X^113^D^33^8^2^
S^114^112^V^num_doc^VARCHAR(10)^decomarmol.actb00004.num_doc^
D^114^0^0^0^0^0
X^114^D^33^8^2^
S^115^112^V^fecha^DATE^decomarmol.actb00004.fecha^
D^115^0^0^0^0^0
X^115^D^33^8^2^
S^116^112^V^cod_mov^INTEGER^decomarmol.actb00004.cod_mov^
D^116^0^0^0^0^0
X^116^D^33^8^2^
S^117^112^V^tasa_cambio^DECIMAL(7,2)^decomarmol.actb00004.tasa_cambio^
D^117^0^0^0^0^0
X^117^D^33^8^2^
S^118^112^V^monto^DECIMAL(12,2)^decomarmol.actb00004.monto^
D^118^0^0^0^0^0
X^118^D^33^8^2^
S^119^112^V^observacion^CHAR(40)^decomarmol.actb00004.observacion^
D^119^0^0^0^0^0
X^119^D^33^8^2^
S^120^112^V^status_t^VARCHAR(1)^decomarmol.actb00004.status_t^
D^120^0^0^0^0^0
X^120^D^33^8^2^
S^121^112^V^us_crea^VARCHAR(50)^decomarmol.actb00004.us_crea^
D^121^0^0^0^0^0
X^121^D^33^8^2^
S^122^112^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.actb00004.fech_crea^
D^122^0^0^0^0^0
X^122^D^33^8^2^
S^123^112^V^us_mod^VARCHAR(50)^decomarmol.actb00004.us_mod^
D^123^0^0^0^0^0
X^123^D^33^8^2^
S^124^112^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.actb00004.fech_mod^
D^124^0^0^0^0^0
X^124^D^33^8^2^
S^125^0^V^busca_dpto^DYNAMIC ARRAY OF RECORD^^global
D^125^35^38^8^2^2
X^125^D^35^8^2^
S^126^125^V^departamento^SMALLINT^^
D^126^36^36^4^2^2
X^126^D^36^4^2^
S^127^125^V^nom_dpto^CHAR(30)^^
D^127^37^37^4^2^2
X^127^D^37^4^2^
S^128^0^V^estado^RECORD^^global
D^128^40^46^8^2^2
X^128^D^40^8^2^
S^129^128^V^status_t^CHAR(1)^^
D^129^41^41^5^2^2
X^129^D^41^5^2^
S^130^128^V^us_crea^CHAR(9)^^
D^130^42^42^5^2^2
X^130^D^42^5^2^
S^131^128^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.actb00001.fech_crea^
D^131^43^43^5^2^2
X^131^D^43^5^2^
S^132^128^V^us_mod^CHAR(9)^^
D^132^44^44^5^2^2
X^132^D^44^5^2^
S^133^128^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.actb00001.fech_mod^
D^133^45^45^5^2^2
X^133^D^45^5^2^
S^134^0^V^descripcion^CHAR(30)^^global
D^134^48^48^9^2^2
X^134^D^48^9^2^
S^135^0^V^fecha_corte^DATE^^global
D^135^49^49^9^2^2
X^135^r^192^48^0^
X^135^r^132^26^0^
X^135^r^124^27^0^
X^135^l^110^23^0^
X^135^l^76^59^0^
X^135^D^49^9^2^
S^136^0^V^fecha1^DATE^^global
D^136^49^49^21^2^2
X^136^D^49^21^2^
S^137^0^V^opcion^CHAR(2)^^global
D^137^50^50^9^2^2
X^137^D^50^9^2^
S^138^0^V^opt^CHAR(3)^^global
D^138^51^51^9^2^2
X^138^D^51^9^2^
S^139^0^V^l^SMALLINT^^global
D^139^52^52^9^2^2
X^139^r^189^25^0^
X^139^l^188^15^0^
X^139^r^186^25^0^
X^139^l^185^15^0^
X^139^r^183^25^0^
X^139^l^180^15^0^
X^139^D^52^9^2^
S^140^0^V^tipo_papel^SMALLINT^^global
D^140^52^52^11^2^2
X^140^r^54^16^0^
X^140^l^53^6^0^
X^140^D^52^11^2^
S^141^0^V^bandera^SMALLINT^^global
D^141^52^52^22^2^2
X^141^D^52^22^2^
S^142^0^V^numero_msg^SMALLINT^^global
D^142^52^52^30^2^2
X^142^r^87^14^0^
X^142^l^86^9^0^
X^142^r^81^19^0^
X^142^l^80^14^0^
X^142^r^72^19^0^
X^142^l^71^14^0^
X^142^r^65^19^0^
X^142^l^64^14^0^
X^142^D^52^30^2^
S^143^0^V^criterio^STRING^^global
D^143^53^53^9^2^2
X^143^r^103^5^0^
X^143^l^94^12^0^
X^143^D^53^9^2^
S^144^0^V^selec^STRING^^global
D^144^53^53^18^2^2
X^144^D^53^18^2^
S^145^0^V^selec1^STRING^^global
D^145^53^53^24^2^2
X^145^r^108^27^0^
X^145^l^97^6^0^
X^145^D^53^24^2^
S^146^0^V^p_ano1^INTEGER^^global
D^146^54^54^9^2^2
X^146^r^77^21^0^
X^146^r^63^10^0^
X^146^l^60^23^0^
X^146^l^59^11^0^
X^146^l^56^16^0^
X^146^D^54^9^2^
S^147^0^V^p_mes1^INTEGER^^global
D^147^54^54^16^2^2
X^147^r^77^40^0^
X^147^r^70^10^0^
X^147^l^56^23^0^
X^147^D^54^16^2^
S^148^0^V^idx^INTEGER^^global
D^148^54^54^23^2^2
X^148^D^54^23^2^
S^149^0^V^idx1^INTEGER^^global
D^149^54^54^27^2^2
X^149^D^54^27^2^
S^150^0^V^curr^INTEGER^^global
D^150^54^54^32^2^2
X^150^D^54^32^2^
S^151^0^V^fila^INTEGER^^global
D^151^54^54^37^2^2
X^151^D^54^37^2^
S^152^0^V^scr_l^INTEGER^^global
D^152^54^54^42^2^2
X^152^D^54^42^2^
S^153^0^V^negrillas_on^CHAR(3)^^global
D^153^56^56^45^2^2
X^153^r^243^27^0^
X^153^r^233^28^0^
X^153^r^181^37^0^
X^153^D^56^45^2^
S^154^0^V^negrillas_off^CHAR(3)^^global
D^154^56^56^58^2^2
X^154^r^249^27^0^
X^154^r^240^28^0^
X^154^r^217^17^0^
X^154^D^56^58^2^
S^155^0^V^p_compania^RECORD^^global
D^155^58^58^9^2^2
X^155^r^183^28^0^
X^155^r^180^33^0^
X^155^D^58^9^2^
S^156^155^V^cod_comp^CHAR(5)^decomarmol.companias.cod_comp^
D^156^0^0^0^0^0
X^156^D^58^9^2^
S^157^155^V^nombre^CHAR(40)^decomarmol.companias.nombre^
D^157^0^0^0^0^0
X^157^r^183^39^0^
X^157^r^180^44^0^
X^157^D^58^9^2^
S^158^155^V^rnc^CHAR(30)^decomarmol.companias.rnc^
D^158^0^0^0^0^0
X^158^D^58^9^2^
S^159^155^V^direccion^CHAR(40)^decomarmol.companias.direccion^
D^159^0^0^0^0^0
X^159^D^58^9^2^
S^160^155^V^telefono^CHAR(15)^decomarmol.companias.telefono^
D^160^0^0^0^0^0
X^160^D^58^9^2^
S^161^155^V^fax^CHAR(15)^decomarmol.companias.fax^
D^161^0^0^0^0^0
X^161^D^58^9^2^
S^162^155^V^administrador^CHAR(40)^decomarmol.companias.administrador^
D^162^0^0^0^0^0
X^162^D^58^9^2^
S^163^155^V^email^CHAR(100)^decomarmol.companias.email^
D^163^0^0^0^0^0
X^163^D^58^9^2^
S^164^155^V^paginaweb^CHAR(100)^decomarmol.companias.paginaweb^
D^164^0^0^0^0^0
X^164^D^58^9^2^
S^165^155^V^direccion1^CHAR(50)^decomarmol.companias.direccion1^
D^165^0^0^0^0^0
X^165^D^58^9^2^
S^166^155^V^telefono1^CHAR(15)^decomarmol.companias.telefono1^
D^166^0^0^0^0^0
X^166^D^58^9^2^
S^167^155^V^fax1^CHAR(15)^decomarmol.companias.fax1^
D^167^0^0^0^0^0
X^167^D^58^9^2^
S^168^155^V^status_t^CHAR(1)^decomarmol.companias.status_t^
D^168^0^0^0^0^0
X^168^D^58^9^2^
S^169^155^V^us_crea^CHAR(9)^decomarmol.companias.us_crea^
D^169^0^0^0^0^0
X^169^D^58^9^2^
S^170^155^V^fech_crea^DATE^decomarmol.companias.fech_crea^
D^170^0^0^0^0^0
X^170^D^58^9^2^
S^171^155^V^us_mod^CHAR(9)^decomarmol.companias.us_mod^
D^171^0^0^0^0^0
X^171^D^58^9^2^
S^172^155^V^fech_mod^DATE^decomarmol.companias.fech_mod^
D^172^0^0^0^0^0
X^172^D^58^9^2^
S^173^155^V^codnomina^CHAR(30)^decomarmol.companias.codnomina^
D^173^0^0^0^0^0
X^173^D^58^9^2^
S^174^155^V^cuenta_no_inv^CHAR(10)^decomarmol.companias.cuenta_no_inv^
D^174^0^0^0^0^0
X^174^D^58^9^2^
S^175^155^V^dias_vence_reservas^SMALLINT^decomarmol.companias.dias_vence_reservas^
D^175^0^0^0^0^0
X^175^D^58^9^2^
S^176^0^F^configureoutput^^^extern
X^176^c^113^9^0^
S^177^0^F^seleccionarsalida^^^extern
X^177^c^112^9^0^
S^178^0^F^msg^^^extern
X^178^c^87^10^0^
X^178^c^81^15^0^
X^178^c^72^15^0^
X^178^c^65^15^0^
S^179^0^F^msgrp000^^^extern
X^179^c^54^7^0^
T^9^23^d^0^0^DEFINE
T^11^23^d^0^0^RECORD
T^27^36^f^0^0^MAIN
T^27^27^d^0^0^DEFINE
T^38^149^f^0^0^FUNCTION
T^38^38^d^0^0^DEFINE
T^56^84^i^0^0^INPUT
T^58^60^i^0^0^
T^62^67^i^0^0^
T^63^67^c^0^0^IF
T^64^66^c^0^0^THEN
T^69^83^i^0^0^
T^70^74^c^0^0^IF
T^71^73^c^0^0^THEN
T^79^83^c^0^0^IF
T^80^82^c^0^0^THEN
T^85^90^c^0^0^IF
T^86^89^c^0^0^THEN
T^116^147^l^0^0^FOREACH
T^126^128^c^0^0^IF
T^127^127^c^0^0^THEN
T^134^136^c^0^0^IF
T^135^135^c^0^0^THEN
T^139^145^c^0^0^IF
T^140^142^c^0^0^THEN
T^143^144^c^0^0^ELSE
T^152^251^f^0^0^REPORT
T^153^167^d^0^0^DEFINE
T^153^165^d^0^0^RECORD
r^2^TOP MARGIN^0
r^2^LEFT MARGIN^0
r^2^BOTTOM MARGIN^2
r^2^PAGE LENGTH^100
r^2^ORDER EXTERNAL^0
o^2^6^1
o^2^4^1
T^178^217^a^0^0^PAGE HEADER
x^181^0^
p^c^1
p^v^75
p^v^153
x^182^0^
p^c^1
p^l^acprrp001
p^c^expr
p^e^
p^c^133
p^l^Pag.
p^e^
x^186^0^
p^c^expr
p^l^Sistema de Activos Fijos
p^c^133
p^e^
x^189^0^
p^c^expr
p^l^Control de Activos
p^c^136
p^v^15
x^192^0^
p^c^1
p^l^FECHA DE CORTE:
p^v^135
x^193^0^
p^c^1
p^l^--------------------------------------------------
p^l^--------------------------------------------------
p^l^--------------------------------------------------
x^197^0^
p^c^45
p^l^Documento
p^c^57
p^l^Fecha
p^c^73
p^l^Valor
p^c^86
p^l^Depreciacion
p^c^103
p^l^Depreciacion
p^c^122
p^l^Valor
p^c^137
p^l^Vida
x^205^0^
p^c^1
p^l^Activo
p^c^45
p^l^Compra
p^c^57
p^l^Compra
p^c^73
p^l^Original
p^c^86
p^l^Acumulada
p^c^103
p^l^Mes
p^c^122
p^l^Libro
p^c^137
p^l^Util
x^214^0^
p^c^1
p^l^--------------------------------------------------
p^l^--------------------------------------------------
p^l^--------------------------------------------------
x^217^0^
p^v^154
T^219^229^a^0^0^ON EVERY ROW
x^222^0^
p^c^1
p^v^4
p^l^
p^e^
p^c^45
p^e^
p^c^57
p^v^8
p^c^67
p^v^11
p^c^84
p^v^12
p^c^105
p^v^14
p^c^116
p^v^13
p^c^138
p^v^9
T^231^240^a^0^0^AFTER GROUP OF 6
x^233^0^
p^c^1
p^v^153
x^234^0^
p^c^5
p^l^TOTAL CUENTA--->
p^e^
p^c^67
p^e^
p^c^84
p^e^
p^c^101
p^e^
p^c^116
p^e^
x^240^0^
p^c^1
p^v^154
T^242^249^a^0^0^ON LAST ROW
x^243^0^
p^c^1
p^v^153
x^244^0^
p^c^5
p^l^TOTAL GRAL.--->
p^c^67
p^e^
p^c^84
p^e^
p^c^101
p^e^
p^c^116
p^e^
x^249^0^
p^c^1
p^v^154
p^v^72