S^1^0^M^geprrp013^MODULE^^ S^2^1^R^repor_13^^^public F^0^C:\Users\luis_\Documents\fuentes\decomarmol\PROYECTO\gedir\geprrp013.4gl D^2^256^280^10^0^0 X^2^c^251^20^0^finish X^2^c^248^26^0^output X^2^c^167^23^0^start X^2^D^256^10^0^ S^3^2^P^x^RECORD^^ D^3^258^258^12^0^0 X^3^r^278^16^0^ X^3^r^277^42^0^ X^3^r^277^27^0^ X^3^r^277^16^0^ X^3^r^276^30^0^ X^3^r^276^16^0^ X^3^r^275^27^0^ X^3^r^275^16^0^ X^3^r^274^24^0^ X^3^r^274^16^0^ X^3^r^273^31^0^ X^3^r^273^16^0^ X^3^l^256^19^0^ X^3^D^258^12^0^ S^4^3^P^rankingact^SMALLINT^decomarmol.ranking.rankingact^ D^4^0^0^0^0^0 X^4^D^36^9^0^ S^5^3^P^rankingant^SMALLINT^decomarmol.ranking.rankingant^ D^5^0^0^0^0^0 X^5^D^36^9^0^ S^6^3^P^cod_n^SMALLINT^decomarmol.ranking.cod_n^ D^6^0^0^0^0^0 X^6^D^36^9^0^ S^7^3^P^cod_grupo^SMALLINT^decomarmol.ranking.cod_grupo^ D^7^0^0^0^0^0 X^7^D^36^9^0^ S^8^3^P^cod_tipo^SMALLINT^decomarmol.ranking.cod_tipo^ D^8^0^0^0^0^0 X^8^D^36^9^0^ S^9^3^P^cod_sec^SMALLINT^decomarmol.ranking.cod_sec^ D^9^0^0^0^0^0 X^9^D^36^9^0^ S^10^3^P^descripcion^CHAR(100)^decomarmol.ranking.descripcion^ D^10^0^0^0^0^0 X^10^D^36^9^0^ S^11^3^P^unidad_med^CHAR(10)^decomarmol.ranking.unidad_med^ D^11^0^0^0^0^0 X^11^D^36^9^0^ S^12^3^P^cantidad^DECIMAL(15,4)^decomarmol.ranking.cantidad^ D^12^0^0^0^0^0 X^12^D^36^9^0^ S^13^3^P^valor^DECIMAL(15,2)^decomarmol.ranking.valor^ D^13^0^0^0^0^0 X^13^D^36^9^0^ S^14^3^P^cantidad_ant^DECIMAL(15,4)^decomarmol.ranking.cantidad_ant^ D^14^0^0^0^0^0 X^14^D^36^9^0^ S^15^3^P^valor_ant^DECIMAL(15,2)^decomarmol.ranking.valor_ant^ D^15^0^0^0^0^0 X^15^D^36^9^0^ S^16^2^V^hora^CHAR(16)^^ D^16^261^261^13^0^0 X^16^r^278^72^0^ X^16^l^268^11^0^ X^16^D^261^13^0^ S^17^2^V^reportDef^base.Report^^ D^17^0^0^0^0^0 S^18^1^F^geprrp013^^^public D^18^57^254^11^0^0 X^18^c^53^7^0^ X^18^D^57^11^0^ S^19^18^V^handler^om.SaxDocumentHandler^^ D^19^59^59^15^0^0 X^19^r^167^48^0^ X^19^l^164^10^0^ X^19^D^59^15^0^ S^20^18^V^r_filename^STRING^^ D^20^60^60^11^0^0 X^20^r^161^40^0^ X^20^l^158^11^0^ X^20^D^60^11^0^ S^21^18^V^r_output^STRING^^ D^21^61^61^11^0^0 X^21^r^162^35^0^ X^21^l^126^41^0^ X^21^D^61^11^0^ S^22^18^V^preview^INTEGER^^ D^22^62^62^11^0^0 X^22^r^163^36^0^ X^22^l^159^11^0^ X^22^D^62^11^0^ S^23^1^F^main^^^public D^23^44^55^1^0^0 X^23^D^44^1^0^ S^24^1^V^ger_comp131^RECORD^^private D^24^20^31^9^0^0 X^24^r^235^28^0^ X^24^r^234^29^0^ X^24^r^233^30^0^ X^24^r^232^26^0^ X^24^r^230^31^0^ X^24^r^229^34^0^ X^24^r^225^26^0^ X^24^r^224^27^0^ X^24^r^223^28^0^ X^24^r^222^24^0^ X^24^r^220^27^0^ X^24^r^183^61^0^ X^24^r^183^40^0^ X^24^r^182^64^0^ X^24^r^182^40^0^ X^24^r^181^61^0^ X^24^r^181^40^0^ X^24^r^180^66^0^ X^24^r^180^48^0^ X^24^r^177^26^0^ X^24^r^176^27^0^ X^24^r^175^28^0^ X^24^r^174^24^0^ X^24^r^172^27^0^ X^24^D^20^9^0^ S^25^24^V^cod_n^SMALLINT^^ D^25^21^21^9^0^0 X^25^D^21^9^0^ S^26^24^V^cod_grupo^SMALLINT^^ D^26^22^22^9^0^0 X^26^D^22^9^0^ S^27^24^V^cod_tipo^SMALLINT^^ D^27^23^23^9^0^0 X^27^D^23^9^0^ S^28^24^V^cod_sec^SMALLINT^^ D^28^24^24^9^0^0 X^28^D^24^9^0^ S^29^24^V^descrip_esp^CHAR(60)^decomarmol.intb00001.descrip_esp^ D^29^25^25^9^0^0 X^29^D^25^9^0^ S^30^24^V^unidad_med^CHAR(3)^decomarmol.intb00001.unidad_med^ D^30^26^26^9^0^0 X^30^D^26^9^0^ S^31^24^V^cantidad^DECIMAL(16,4)^^ D^31^27^27^9^0^0 X^31^D^27^9^0^ S^32^24^V^valor^DECIMAL(12,2)^^ D^32^28^28^9^0^0 X^32^D^28^9^0^ S^33^24^V^cantidad_ant^DECIMAL(14,2)^^ D^33^29^29^9^0^0 X^33^D^29^9^0^ S^34^24^V^codigo^CHAR(7)^^ D^34^30^30^9^0^0 X^34^D^30^9^0^ S^35^1^V^desc_mes^CHAR(12)^^private D^35^32^32^6^0^0 X^35^r^269^14^0^ X^35^D^32^6^0^ S^36^1^V^tipo_ranking^CHAR(30)^^private D^36^33^33^6^0^0 X^36^r^278^59^0^ X^36^r^189^9^0^ X^36^r^131^9^0^ X^36^l^76^51^0^ X^36^D^33^6^0^ S^37^1^V^cantidad_registros^SMALLINT^^private D^37^34^34^6^0^0 X^37^r^275^37^0^ X^37^r^247^17^0^ X^37^r^143^33^0^ X^37^r^133^23^0^ X^37^l^76^32^0^ X^37^D^34^6^0^ S^38^1^V^ger_comp132^RECORD^^private D^38^36^36^9^0^0 X^38^r^248^35^0^ X^38^r^246^33^0^ X^38^D^36^9^0^ S^39^38^V^rankingact^SMALLINT^decomarmol.ranking.rankingact^ D^39^0^0^0^0^0 S^40^38^V^rankingant^SMALLINT^decomarmol.ranking.rankingant^ D^40^0^0^0^0^0 S^41^38^V^cod_n^SMALLINT^decomarmol.ranking.cod_n^ D^41^0^0^0^0^0 S^42^38^V^cod_grupo^SMALLINT^decomarmol.ranking.cod_grupo^ D^42^0^0^0^0^0 S^43^38^V^cod_tipo^SMALLINT^decomarmol.ranking.cod_tipo^ D^43^0^0^0^0^0 S^44^38^V^cod_sec^SMALLINT^decomarmol.ranking.cod_sec^ D^44^0^0^0^0^0 S^45^38^V^descripcion^CHAR(100)^decomarmol.ranking.descripcion^ D^45^0^0^0^0^0 S^46^38^V^unidad_med^CHAR(10)^decomarmol.ranking.unidad_med^ D^46^0^0^0^0^0 S^47^38^V^cantidad^DECIMAL(15,4)^decomarmol.ranking.cantidad^ D^47^0^0^0^0^0 S^48^38^V^valor^DECIMAL(15,2)^decomarmol.ranking.valor^ D^48^0^0^0^0^0 S^49^38^V^cantidad_ant^DECIMAL(15,4)^decomarmol.ranking.cantidad_ant^ D^49^0^0^0^0^0 S^50^38^V^valor_ant^DECIMAL(15,2)^decomarmol.ranking.valor_ant^ D^50^0^0^0^0^0 S^51^1^V^p_mes^SMALLINT^^private D^51^39^39^9^0^0 X^51^r^111^23^0^ X^51^r^102^23^0^ X^51^l^84^29^0^ X^51^l^83^11^0^ X^51^l^76^26^0^ X^51^D^39^9^0^ S^52^1^V^p_ano^SMALLINT^^private D^52^39^39^15^0^0 X^52^r^278^43^0^ X^52^r^103^20^0^ X^52^r^98^23^0^ X^52^r^94^25^0^ X^52^l^84^23^0^ X^52^l^82^11^0^ X^52^l^76^20^0^ X^52^D^39^15^0^ S^53^1^V^p_ano_ant^SMALLINT^^private D^53^39^39^21^0^0 X^53^r^278^49^0^ X^53^r^112^23^0^ X^53^r^107^23^0^ X^53^l^94^13^0^ X^53^D^39^21^0^ S^54^1^V^idx2^INTEGER^^private D^54^40^40^9^0^0 X^54^r^238^20^0^ X^54^l^238^13^0^ X^54^r^228^44^0^ X^54^l^218^10^0^ X^54^D^40^9^0^ S^55^1^V^fecha1^DATE^^private D^55^43^43^9^0^0 X^55^r^206^88^0^ X^55^r^201^24^0^ X^55^r^194^88^0^ X^55^l^105^41^0^ X^55^D^43^9^0^ S^56^1^V^fecha2^DATE^^private D^56^43^43^16^0^0 X^56^r^206^124^0^ X^56^r^201^43^0^ X^56^r^194^124^0^ X^56^l^109^35^0^ X^56^D^43^16^0^ S^57^1^V^fecha_inicial^DATE^^private D^57^43^43^23^0^0 X^57^r^146^88^0^ X^57^r^136^88^0^ X^57^l^96^40^0^ X^57^D^43^23^0^ S^58^1^V^fecha_final^DATE^^private D^58^43^43^37^0^0 X^58^r^146^131^0^ X^58^r^136^131^0^ X^58^l^100^35^0^ X^58^D^43^37^0^ S^59^1^C^comando1^base.SqlHandle^^private D^59^154^154^14^0^0 X^59^u^155^34^0^ X^59^D^154^14^0^ S^60^1^C^buscar1^base.SqlHandle^^private D^60^155^155^14^0^0 X^60^u^172^14^0^ X^60^u^156^11^0^ X^60^D^155^14^0^ S^61^1^C^comando2^base.SqlHandle^^private D^61^214^214^14^0^0 X^61^u^215^34^0^ X^61^D^214^14^0^ S^62^1^C^buscar2^base.SqlHandle^^private D^62^215^215^14^0^0 X^62^u^220^14^0^ X^62^u^216^11^0^ X^62^D^215^14^0^ S^63^1^C^busca_ranking^base.SqlHandle^^private D^63^242^242^14^0^0 X^63^u^246^14^0^ X^63^D^242^14^0^ S^64^0^V^status^INTEGER^^builtin F^1^C:\Program Files\FourJs\Genero Studio\fgl\lib/fgl.4gl D^64^15^15^9^1^1 X^64^r^227^12^0^ X^64^r^179^12^0^ X^64^D^15^9^1^ S^65^0^V^int_flag^INTEGER^^builtin D^65^15^15^17^1^1 X^65^l^123^13^0^ X^65^r^120^9^0^ X^65^l^90^15^0^ X^65^r^87^11^0^ X^65^l^64^10^0^ X^65^D^15^17^1^ S^66^0^V^unidad^CHAR(3)^^global F^2^geprgb000.4gl D^66^4^4^10^2^2 X^66^D^4^10^2^ S^67^0^V^regi^SMALLINT^^global D^67^5^5^10^2^2 X^67^D^5^10^2^ S^68^0^V^p_param^CHAR(1)^^global D^68^6^6^10^2^2 X^68^D^6^10^2^ S^69^0^V^fecha_inicial_py^DATE^^global D^69^8^8^10^2^2 X^69^D^8^10^2^ S^70^0^V^fecha_final_py^DATE^^global D^70^8^8^27^2^2 X^70^D^8^27^2^ S^71^0^V^p_fechas^DATE^^global D^71^8^8^42^2^2 X^71^D^8^42^2^ S^72^0^V^p_companias^RECORD^^global D^72^9^9^10^2^2 X^72^r^278^24^0^ X^72^l^52^70^0^ X^72^l^52^54^0^ X^72^l^52^35^0^ X^72^D^9^10^2^ S^73^72^V^cod_comp^CHAR(5)^decomarmol.companias.cod_comp^ D^73^0^0^0^0^0 X^73^D^9^10^2^ S^74^72^V^nombre^CHAR(100)^decomarmol.companias.nombre^ D^74^0^0^0^0^0 X^74^D^9^10^2^ S^75^72^V^rnc^CHAR(30)^decomarmol.companias.rnc^ D^75^0^0^0^0^0 X^75^D^9^10^2^ S^76^72^V^direccion^CHAR(200)^decomarmol.companias.direccion^ D^76^0^0^0^0^0 X^76^D^9^10^2^ S^77^72^V^telefono^CHAR(25)^decomarmol.companias.telefono^ D^77^0^0^0^0^0 X^77^D^9^10^2^ S^78^72^V^fax^CHAR(25)^decomarmol.companias.fax^ D^78^0^0^0^0^0 X^78^D^9^10^2^ S^79^72^V^administrador^CHAR(100)^decomarmol.companias.administrador^ D^79^0^0^0^0^0 X^79^D^9^10^2^ S^80^72^V^status_t^CHAR(1)^decomarmol.companias.status_t^ D^80^0^0^0^0^0 X^80^D^9^10^2^ S^81^72^V^us_crea^CHAR(50)^decomarmol.companias.us_crea^ D^81^0^0^0^0^0 X^81^D^9^10^2^ S^82^72^V^fech_crea^DATE^decomarmol.companias.fech_crea^ D^82^0^0^0^0^0 X^82^D^9^10^2^ S^83^72^V^us_mod^CHAR(50)^decomarmol.companias.us_mod^ D^83^0^0^0^0^0 X^83^D^9^10^2^ S^84^72^V^fech_mod^DATE^decomarmol.companias.fech_mod^ D^84^0^0^0^0^0 X^84^D^9^10^2^ S^85^72^V^tipo_db^CHAR(30)^decomarmol.companias.tipo_db^ D^85^0^0^0^0^0 X^85^D^9^10^2^ S^86^72^V^usuario^CHAR(50)^decomarmol.companias.usuario^ D^86^0^0^0^0^0 X^86^D^9^10^2^ S^87^72^V^facturacontrolconduce^VARCHAR(10)^decomarmol.companias.facturacontrolconduce^ D^87^0^0^0^0^0 X^87^D^9^10^2^ S^88^72^V^control2factura^VARCHAR(10)^decomarmol.companias.control2factura^ D^88^0^0^0^0^0 X^88^D^9^10^2^ S^89^72^V^rutalogocia^VARCHAR(100)^decomarmol.companias.rutalogocia^ D^89^0^0^0^0^0 X^89^D^9^10^2^ S^90^72^V^controlordenpedidos^VARCHAR(10)^decomarmol.companias.controlordenpedidos^ D^90^0^0^0^0^0 X^90^D^9^10^2^ S^91^72^V^url^VARCHAR(255)^decomarmol.companias.url^ D^91^0^0^0^0^0 X^91^D^9^10^2^ S^92^0^V^normal^CHAR(3)^^global D^92^10^11^10^2^2 X^92^D^10^10^2^ S^93^0^V^negrilla_on^CHAR(3)^^global D^93^10^11^17^2^2 X^93^D^10^17^2^ S^94^0^V^negrillas_of^CHAR(3)^^global D^94^10^11^29^2^2 X^94^D^10^29^2^ S^95^0^V^comp_on^CHAR(3)^^global D^95^10^11^42^2^2 X^95^D^10^42^2^ S^96^0^V^comp_off^CHAR(3)^^global D^96^10^11^50^2^2 X^96^D^10^50^2^ S^97^0^V^doce^CHAR(3)^^global D^97^10^11^59^2^2 X^97^D^10^59^2^ S^98^0^V^doble_on^CHAR(3)^^global D^98^10^11^64^2^2 X^98^D^10^64^2^ S^99^0^V^doble_off^CHAR(3)^^global D^99^10^11^73^2^2 X^99^D^10^73^2^ S^100^0^V^cmd^CHAR(150)^^global D^100^12^12^9^2^2 X^100^D^12^9^2^ S^101^0^V^imprime^CHAR(150)^^global D^101^12^12^13^2^2 X^101^D^12^13^2^ S^102^0^V^copia^CHAR(150)^^global D^102^12^12^21^2^2 X^102^D^12^21^2^ S^103^0^V^archivo^CHAR(80)^^global D^103^12^12^37^2^2 X^103^D^12^37^2^ S^104^0^V^cantidad_total^DECIMAL(10,2)^^global D^104^14^14^10^2^2 X^104^D^14^10^2^ S^105^0^V^criterio^CHAR(1000)^^global D^105^15^15^10^2^2 X^105^r^209^34^0^ X^105^r^197^35^0^ X^105^r^149^34^0^ X^105^r^139^34^0^ X^105^l^117^16^0^ X^105^D^15^10^2^ S^106^0^V^selec4^CHAR(1500)^^global D^106^16^16^10^2^2 X^106^D^16^10^2^ S^107^0^V^selec^CHAR(1500)^^global D^107^16^16^17^2^2 X^107^D^16^17^2^ S^108^0^V^selec1^CHAR(1500)^^global D^108^16^16^23^2^2 X^108^r^214^28^0^ X^108^l^203^10^0^ X^108^l^190^10^0^ X^108^r^154^28^0^ X^108^l^143^10^0^ X^108^l^132^10^0^ X^108^D^16^23^2^ S^109^0^V^selec2^CHAR(1500)^^global D^109^16^16^30^2^2 X^109^D^16^30^2^ S^110^0^V^selec3^CHAR(1500)^^global D^110^16^16^37^2^2 X^110^D^16^37^2^ S^111^0^V^manual^CHAR(1)^^global D^111^17^18^10^2^2 X^111^D^17^10^2^ S^112^0^V^p_status^CHAR(1)^^global D^112^17^18^17^2^2 X^112^D^17^17^2^ S^113^0^V^decide^CHAR(1)^^global D^113^17^18^26^2^2 X^113^D^17^26^2^ S^114^0^V^identifica^CHAR(1)^^global D^114^17^18^33^2^2 X^114^D^17^33^2^ S^115^0^V^modifica^CHAR(1)^^global D^115^17^18^44^2^2 X^115^D^17^44^2^ S^116^0^V^opc^CHAR(1)^^global D^116^17^18^53^2^2 X^116^D^17^53^2^ S^117^0^V^bandera^CHAR(1)^^global D^117^17^18^57^2^2 X^117^D^17^57^2^ S^118^0^V^existe^CHAR(1)^^global D^118^17^18^65^2^2 X^118^D^17^65^2^ S^119^0^V^verdad^CHAR(1)^^global D^119^18^18^10^2^2 X^119^D^18^10^2^ S^120^0^V^clasifica^CHAR(1)^^global D^120^18^18^17^2^2 X^120^D^18^17^2^ S^121^0^V^opcion^CHAR(2)^^global D^121^20^20^10^2^2 X^121^D^20^10^2^ S^122^0^V^opt^CHAR(2)^^global D^122^20^20^17^2^2 X^122^D^20^17^2^ S^123^0^V^descrip1^CHAR(60)^^global D^123^21^21^10^2^2 X^123^D^21^10^2^ S^124^0^V^descrip2^CHAR(60)^^global D^124^21^21^19^2^2 X^124^D^21^19^2^ S^125^0^V^usuarios^CHAR(50)^^global D^125^22^22^10^2^2 X^125^r^51^30^0^ X^125^l^46^28^0^ X^125^D^22^10^2^ S^126^0^V^clave^CHAR(50)^^global D^126^22^22^19^2^2 X^126^r^51^45^0^ X^126^l^47^28^0^ X^126^D^22^19^2^ S^127^0^V^descrip3^CHAR(30)^^global D^127^23^23^10^2^2 X^127^D^23^10^2^ S^128^0^V^descrip4^CHAR(30)^^global D^128^23^23^19^2^2 X^128^D^23^19^2^ S^129^0^V^descrip_esp1^CHAR(30)^^global D^129^23^23^28^2^2 X^129^D^23^28^2^ S^130^0^V^nombre_p^CHAR(30)^^global D^130^23^23^41^2^2 X^130^D^23^41^2^ S^131^0^V^nom_p^CHAR(30)^^global D^131^23^23^50^2^2 X^131^D^23^50^2^ S^132^0^V^tipo_papel^SMALLINT^^global D^132^24^25^10^2^2 X^132^D^24^10^2^ S^133^0^V^cuenta^SMALLINT^^global D^133^24^25^21^2^2 X^133^D^24^21^2^ S^134^0^V^p_act^SMALLINT^^global D^134^24^25^28^2^2 X^134^D^24^28^2^ S^135^0^V^idx^SMALLINT^^global D^135^24^25^34^2^2 X^135^r^247^11^0^ X^135^l^245^10^0^ X^135^l^219^10^0^ X^135^r^186^19^0^ X^135^l^186^13^0^ X^135^r^180^40^0^ X^135^l^171^10^0^ X^135^D^24^34^2^ S^136^0^V^curr1^SMALLINT^^global D^136^24^25^38^2^2 X^136^D^24^38^2^ S^137^0^V^curr^SMALLINT^^global D^137^24^25^44^2^2 X^137^D^24^44^2^ S^138^0^V^fila^SMALLINT^^global D^138^24^25^49^2^2 X^138^D^24^49^2^ S^139^0^V^linea^SMALLINT^^global D^139^24^25^54^2^2 X^139^D^24^54^2^ S^140^0^V^scr_l^SMALLINT^^global D^140^24^25^60^2^2 X^140^D^24^60^2^ S^141^0^V^dia_aduana^SMALLINT^^global D^141^25^25^10^2^2 X^141^D^25^10^2^ S^142^0^V^num_req_a^SMALLINT^^global D^142^25^25^21^2^2 X^142^D^25^21^2^ S^143^0^V^numero_msg^SMALLINT^decomarmol.msgtable.cod_msg^global D^143^26^26^10^2^2 X^143^r^122^18^0^ X^143^l^121^13^0^ X^143^r^89^20^0^ X^143^l^88^15^0^ X^143^D^26^10^2^ S^144^0^V^impresor^SMALLINT^^global D^144^27^27^10^2^2 X^144^l^48^28^0^ X^144^D^27^10^2^ S^145^0^V^letras^RECORD^^global D^145^29^38^8^2^2 X^145^D^29^8^2^ S^146^145^V^negrillas_on^CHAR(6)^^ D^146^30^30^8^2^2 X^146^D^30^8^2^ S^147^145^V^negrillas_off^CHAR(6)^^ D^147^31^31^8^2^2 X^147^D^31^8^2^ S^148^145^V^doble_on^CHAR(6)^^ D^148^32^32^8^2^2 X^148^D^32^8^2^ S^149^145^V^doble_off^CHAR(6)^^ D^149^33^33^8^2^2 X^149^D^33^8^2^ S^150^145^V^comp_on^CHAR(6)^^ D^150^34^34^8^2^2 X^150^D^34^8^2^ S^151^145^V^comp_off^CHAR(6)^^ D^151^35^35^8^2^2 X^151^D^35^8^2^ S^152^145^V^doce^CHAR(6)^^ D^152^36^36^8^2^2 X^152^D^36^8^2^ S^153^145^V^normal^CHAR(6)^^ D^153^37^37^8^2^2 X^153^D^37^8^2^ S^154^0^F^fgl_report_commitCurrentSettings^^^extern X^154^c^164^20^0^ S^155^0^F^fgl_report_selectPreview^^^extern X^155^c^163^11^0^ S^156^0^F^fgl_report_selectDevice^^^extern X^156^c^162^11^0^ S^157^0^F^fgl_report_loadCurrentSettings^^^extern X^157^c^161^9^0^ S^158^0^F^seleccionarsalida^^^extern X^158^c^126^11^0^ S^159^0^F^msg^^^extern X^159^c^122^14^0^ X^159^c^89^16^0^ T^17^43^d^0^0^DEFINE T^20^31^d^0^0^RECORD T^44^55^f^0^0^MAIN T^57^254^f^0^0^FUNCTION T^59^62^d^0^0^DEFINE T^76^115^i^0^0^INPUT T^77^84^i^0^0^ T^86^114^i^0^0^ T^87^92^c^0^0^IF T^88^91^c^0^0^THEN T^114^114^g^0^0^EXIT INPUT T^120^125^c^0^0^IF T^121^124^c^0^0^THEN T^131^152^c^0^0^IF T^132^141^c^0^0^THEN T^142^151^c^0^0^ELSE T^161^252^c^0^0^IF T^162^251^c^0^0^THEN T^172^187^l^0^0^FOREACH T^179^184^c^0^0^IF T^180^183^c^0^0^THEN T^189^212^c^0^0^IF T^190^201^c^0^0^THEN T^202^211^c^0^0^ELSE T^220^239^l^0^0^FOREACH T^227^236^c^0^0^IF T^228^235^c^0^0^THEN T^246^250^l^0^0^FOREACH T^247^249^c^0^0^IF T^248^248^c^0^0^THEN T^256^280^f^0^0^REPORT T^258^261^d^0^0^DEFINE T^266^269^a^0^0^FIRST PAGE HEADER x^269^0^ p^v^35 T^271^278^a^0^0^ON EVERY ROW x^273^0^ p^v^4 p^v^5 p^v^6 p^v^7 p^v^8 p^v^9 p^v^37 p^v^10 p^v^11 p^v^12 p^v^14 p^v^15 p^v^13 p^v^74 p^v^52 p^v^53 p^v^36 p^v^16