S^1^0^M^irprrpcs008^MODULE S^2^1^R^imprime^ F^0^irprrpcs008.4gl D^2^10^101^8^0^0 X^2^D^10^8^0 S^3^2^P^x^RECORD D^3^11^27^9^0^0 X^3^r^94^20^0 X^3^r^92^41^0 X^3^r^91^53^0 X^3^r^91^43^0 X^3^r^90^41^0 X^3^r^88^47^0 X^3^r^85^23^0 X^3^r^84^25^0 X^3^r^83^54^0 X^3^r^83^42^0 X^3^r^82^43^0 X^3^r^81^41^0 X^3^r^80^46^0 X^3^r^80^18^0 X^3^r^79^42^0 X^3^r^79^19^0 X^3^l^66^19^0 X^3^l^62^19^0 X^3^l^57^19^0 X^3^l^39^44^0 X^3^l^39^33^0 X^3^l^39^21^0 X^3^l^38^59^0 X^3^l^38^43^0 X^3^l^38^33^0 X^3^l^38^23^0 X^3^l^10^16^0 X^3^D^11^9^0 S^4^3^P^cod_n^SMALLINT D^4^12^12^3^0^0 X^4^r^79^21^0 X^4^l^38^61^0 X^4^D^12^3^0 S^5^3^P^cod_grupo^SMALLINT D^5^13^13^3^0^0 X^5^r^79^44^0 X^5^l^39^23^0 X^5^D^13^3^0 S^6^3^P^cod_tipo^SMALLINT D^6^14^14^3^0^0 X^6^r^80^20^0 X^6^l^39^35^0 X^6^D^14^3^0 S^7^3^P^cod_sec^SMALLINT D^7^15^15^3^0^0 X^7^r^80^48^0 X^7^l^39^46^0 X^7^D^15^3^0 S^8^3^P^descripcion^CHAR(40) D^8^16^16^3^0^0 X^8^D^16^3^0 S^9^3^P^unidad_med^CHAR(4) D^9^17^17^3^0^0 X^9^D^17^3^0 S^10^3^P^fisico^DECIMAL(12,4) D^10^18^18^3^0^0 X^10^r^88^49^0 X^10^D^18^3^0 S^11^3^P^teorico^DECIMAL(12,4) D^11^19^19^3^0^0 X^11^r^91^45^0 X^11^r^83^44^0 X^11^D^19^3^0 S^12^3^P^diferencia^DECIMAL(12,4) D^12^20^20^3^0^0 X^12^D^20^3^0 S^13^3^P^costo^DECIMAL(12,4) D^13^21^21^3^0^0 X^13^r^91^55^0 X^13^r^83^56^0 X^13^D^21^3^0 S^14^3^P^valor1^DECIMAL(12,4) D^14^22^22^3^0^0 X^14^r^90^43^0 X^14^r^85^25^0 X^14^r^84^27^0 X^14^r^82^45^0 X^14^D^22^3^0 S^15^3^P^valor2^DECIMAL(12,4) D^15^23^23^3^0^0 X^15^r^92^43^0 X^15^r^81^43^0 X^15^D^23^3^0 S^16^3^P^almacen^SMALLINT D^16^24^24^3^0^0 X^16^l^57^21^0 X^16^l^38^25^0 X^16^D^24^3^0 S^17^3^P^seccion^SMALLINT D^17^25^25^3^0^0 X^17^l^62^21^0 X^17^l^38^35^0 X^17^D^25^3^0 S^18^3^P^tramo^SMALLINT D^18^26^26^3^0^0 X^18^l^66^21^0 X^18^l^38^45^0 X^18^D^26^3^0 S^19^2^P^nombre_cia^CHAR(50) D^19^28^28^4^0^0 X^19^r^94^24^0 X^19^l^53^19^0 X^19^l^38^12^0 X^19^l^10^18^0 X^19^D^28^4^0 S^20^2^P^xalmacen^CHAR(30) D^20^33^33^4^0^0 X^20^r^94^64^0 X^20^l^10^29^0 X^20^D^33^4^0 S^21^2^P^xseccion^CHAR(30) D^21^33^33^13^0^0 X^21^r^94^73^0 X^21^l^10^38^0 X^21^D^33^13^0 S^22^2^P^xtramo^CHAR(30) D^22^33^33^22^0^0 X^22^r^94^82^0 X^22^l^10^47^0 X^22^D^33^22^0 S^23^2^P^xtipo^CHAR(20) D^23^30^30^18^0^0 X^23^r^96^63^0 X^23^l^10^54^0 X^23^D^30^18^0 S^24^2^P^znumdoc^INTEGER D^24^35^35^4^0^0 X^24^r^96^69^0 X^24^l^10^60^0 X^24^D^35^4^0 S^25^2^P^zcodmov^SMALLINT D^25^34^34^4^0^0 X^25^r^96^77^0 X^25^l^10^68^0 X^25^D^34^4^0 S^26^2^P^zdescripmov^CHAR(30) D^26^33^33^29^0^0 X^26^r^96^85^0 X^26^l^10^76^0 X^26^D^33^29^0 S^27^2^P^ptipo^CHAR(20) D^27^30^30^4^0^0 X^27^r^97^33^0 X^27^r^49^8^0 X^27^r^46^8^0 X^27^r^43^6^0 X^27^l^10^88^0 X^27^D^30^4^0 S^28^2^P^porigen^CHAR(30) D^28^29^29^4^0^0 X^28^r^97^39^0 X^28^l^70^19^0 X^28^l^38^51^0 X^28^l^10^94^0 X^28^D^29^4^0 S^29^2^V^pcodigo^CHAR(20) D^29^30^30^10^0^0 X^29^r^94^12^0 X^29^l^79^9^0 X^29^D^30^10^0 S^30^2^V^chtipo^CHAR(20) D^30^30^30^24^0^0 X^30^r^97^26^0 X^30^l^50^12^0 X^30^l^47^12^0 X^30^l^44^12^0 X^30^D^30^24^0 S^31^2^V^total_g_material^DECIMAL(12,2) D^31^32^32^3^0^0 X^31^r^96^12^0 X^31^r^88^28^0 X^31^l^88^9^0 X^31^l^55^8^0 X^31^D^32^3^0 S^32^2^V^ototal_fisico^DECIMAL(12,2) D^32^32^32^21^0^0 X^32^r^97^64^0 X^32^r^90^25^0 X^32^l^90^9^0 X^32^l^73^8^0 X^32^D^32^21^0 S^33^2^V^ototal_teorico^DECIMAL(12,2) D^33^32^32^35^0^0 X^33^r^97^78^0 X^33^r^91^26^0 X^33^l^91^9^0 X^33^l^72^8^0 X^33^D^32^35^0 S^34^2^V^ototal_ajuste^DECIMAL(12,2) D^34^32^32^50^0^0 X^34^r^98^12^0 X^34^r^92^25^0 X^34^l^92^9^0 X^34^l^74^8^0 X^34^D^32^50^0 S^35^2^V^total_teorico^DECIMAL(12,2) D^35^32^32^64^0^0 X^35^r^97^12^0 X^35^r^83^25^0 X^35^l^83^9^0 X^35^l^69^9^0 X^35^D^32^64^0 S^36^2^V^total_general^DECIMAL(12,2) D^36^32^32^78^0^0 X^36^r^95^12^0 X^36^r^94^35^0 X^36^r^81^25^0 X^36^l^81^9^0 X^36^l^54^8^0 X^36^D^32^78^0 S^37^2^V^total_general1^DECIMAL(12,2) D^37^32^32^92^0^0 X^37^r^95^26^0 X^37^r^94^49^0 X^37^r^82^26^0 X^37^l^82^9^0 X^37^l^59^9^0 X^37^D^32^92^0 S^38^2^V^total_almacen^DECIMAL(12,2) D^38^32^32^107^0^0 X^38^D^32^107^0 S^39^2^V^total_seccion^DECIMAL(12,2) D^39^32^32^121^0^0 X^39^r^95^41^0 X^39^r^84^36^0 X^39^l^84^9^0 X^39^l^64^9^0 X^39^D^32^121^0 S^40^2^V^total_tramo^DECIMAL(12,2) D^40^32^32^135^0^0 X^40^r^95^55^0 X^40^r^85^34^0 X^40^l^85^9^0 X^40^l^67^9^0 X^40^D^32^135^0 S^41^2^V^numero_registros^SMALLINT D^41^34^34^12^0^0 X^41^r^95^67^0 X^41^r^78^28^0 X^41^l^78^9^0 X^41^l^60^9^0 X^41^D^34^12^0 S^42^2^V^ttotal_registros^SMALLINT D^42^34^34^29^0^0 X^42^r^96^46^0 X^42^r^87^28^0 X^42^l^87^9^0 X^42^l^68^9^0 X^42^D^34^29^0 S^43^2^V^stotal_registros^SMALLINT D^43^34^34^46^0^0 X^43^r^96^29^0 X^43^r^86^28^0 X^43^l^86^9^0 X^43^l^63^9^0 X^43^D^34^46^0 S^44^2^V^ototal_registros^SMALLINT D^44^34^34^63^0^0 X^44^r^97^47^0 X^44^r^89^28^0 X^44^l^89^9^0 X^44^l^71^8^0 X^44^D^34^63^0 S^45^2^V^chfecha^CHAR(20) D^45^36^36^4^0^0 X^45^r^96^97^0 X^45^l^77^9^0 X^45^D^36^4^0 S^46^2^V^reportDef^base.report D^46^0^0^0^0^0 S^47^0^V^sqlca^RECORD F^1^/home/juan/fourjs/fgl220/lib/fgl.4gl D^47^2^8^1^1^1 X^47^D^2^1^1 S^48^47^V^sqlcode^INTEGER D^48^3^3^2^1^1 X^48^D^3^2^1 S^49^47^V^sqlerrm^VARCHAR(71) D^49^4^4^2^1^1 X^49^D^4^2^1 S^50^47^V^sqlerrp^CHAR(7) D^50^5^5^2^1^1 X^50^D^5^2^1 S^51^47^V^sqlerrd^ARRAY[6] OF INTEGER D^51^6^6^2^1^1 X^51^D^6^2^1 S^52^47^V^sqlawarn^CHAR(7) D^52^7^7^2^1^1 X^52^D^7^2^1 S^53^0^V^status^INTEGER D^53^9^9^1^1^1 X^53^D^9^1^1 S^54^0^V^int_flag^INTEGER D^54^9^9^9^1^1 X^54^D^9^9^1 S^55^0^V^quit_flag^INTEGER D^55^9^9^19^1^1 X^55^D^9^19^1 T^10^10^d^0^0^DEFINE T^10^101^f^0^0^REPORT T^11^36^d^0^0^DEFINE T^11^27^d^0^0^RECORD r^2^ORDER EXTERNAL^0 o^2^19^1 o^2^16^1 o^2^17^1 o^2^18^1 o^2^28^1 o^2^4^1 o^2^5^1 o^2^6^1 o^2^7^1 T^42^51^a^0^0^FIRST PAGE HEADER T^43^45^c^0^0^IF T^44^44^c^0^0^THEN T^46^48^c^0^0^IF T^47^47^c^0^0^THEN T^49^51^c^0^0^IF T^50^50^c^0^0^THEN T^53^55^a^0^0^BEFORE GROUP OF 19 T^57^60^a^0^0^BEFORE GROUP OF 16 T^62^64^a^0^0^BEFORE GROUP OF 17 T^66^69^a^0^0^BEFORE GROUP OF 18 T^70^74^a^0^0^BEFORE GROUP OF 28 T^76^98^a^0^0^ON EVERY ROW x^94^0^ p^v^29 p^r^3 p^v^19 p^v^36 p^v^37 p^v^20 p^v^21 p^v^22 p^v^36 p^v^37 p^v^39 p^v^40 p^v^41 p^v^31 p^v^43 p^v^42 p^v^23 p^v^24 p^v^25 p^v^26 p^v^45 p^v^35 p^v^30 p^v^27 p^v^28 p^v^44 p^v^32 p^v^33 p^v^34