S^1^0^M^cumpleanos^MODULE^^ S^2^1^R^r_cumple^^^public F^0^C:\Users\jsoto\Documents\GENERO\PROYECTOS\BDL240\MARMOTECH\PROYECTO\nodir\cumpleanos.4gl D^2^56^72^8^0^0 X^2^D^56^8^0^ X^2^c^53^21^0^finish X^2^c^49^23^0^output X^2^c^43^23^0^start S^3^2^P^X^RECORD^^ D^3^57^60^10^0^0 X^3^r^71^12^0^ X^3^l^56^17^0^ X^3^D^57^10^0^ S^4^3^P^nombre^VARCHAR(100)^^ D^4^58^58^5^0^0 X^4^D^58^5^0^ S^5^3^P^departamento^VARCHAR(100)^^ D^5^59^59^5^0^0 X^5^D^59^5^0^ S^6^2^V^fecha^VARCHAR(10)^^ D^6^61^61^3^0^0 X^6^r^69^40^0^ X^6^l^68^9^0^ X^6^D^61^3^0^ S^7^2^V^chlable^VARCHAR(100)^^ D^7^62^62^3^0^0 X^7^r^71^20^0^ X^7^l^69^9^0^ X^7^D^62^3^0^ S^8^2^V^reportDef^base.Report^^ D^8^0^0^0^0^0 S^9^1^F^cumpleanos^^^public D^9^14^55^10^0^0 X^9^D^14^10^0^ X^9^c^11^7^0^ S^10^9^V^rcumple^RECORD^^ D^10^15^18^10^0^0 X^10^r^49^32^0^ X^10^r^33^30^0^ X^10^D^15^10^0^ S^11^10^V^nombre^VARCHAR(100)^^ D^11^16^16^5^0^0 X^11^D^16^5^0^ S^12^10^V^departamento^VARCHAR(100)^^ D^12^17^17^5^0^0 X^12^D^17^5^0^ S^13^9^V^archivo^VARCHAR(20)^^ D^13^19^19^6^0^0 X^13^r^35^43^0^ X^13^l^32^8^0^ X^13^D^19^6^0^ S^14^9^V^HANDLER^om.SaxDocumentHandler^^ D^14^20^20^6^0^0 X^14^r^43^47^0^ X^14^l^42^14^0^ X^14^D^20^6^0^ S^15^1^F^main^^^public D^15^5^12^1^0^0 X^15^D^5^1^0^ S^16^1^C^busca_cumple^base.Cursor^^private D^16^23^23^11^0^0 X^16^u^33^12^0^ X^16^D^23^11^0^ S^17^0^V^status^INTEGER^^builtin F^1^C:\Program Files\FourJs\Genero Studio\fgl\lib/fgl.4gl D^17^14^14^1^1^1 X^17^D^14^1^1^ S^18^0^V^idx^SMALLINT^^global D^18^2^2^12^0^0 X^18^r^71^16^0^ X^18^r^52^7^0^ X^18^r^50^16^0^ X^18^l^50^10^0^ X^18^r^34^10^0^ X^18^l^31^8^0^ X^18^D^2^12^0^ S^19^0^F^fgl_report_commitCurrentSettings^^^extern X^19^c^42^24^0^ S^20^0^F^fgl_report_setOutputFileName^^^extern X^20^c^40^15^0^ S^21^0^F^fgl_report_selectPreview^^^extern X^21^c^38^15^0^ S^22^0^F^fgl_report_selectDevice^^^extern X^22^c^37^15^0^ S^23^0^F^fgl_report_loadCurrentSettings^^^extern X^23^c^35^12^0^ T^1^4^d^0^0^DEFINE T^1^4^d^0^0^GLOBALS DEFINE T^2^2^d^0^0^DEFINE T^5^12^f^0^0^MAIN T^5^5^d^0^0^DEFINE T^14^55^f^0^0^FUNCTION T^15^20^d^0^0^DEFINE T^15^18^d^0^0^RECORD T^33^51^l^0^0^FOREACH T^34^48^c^0^0^IF T^35^47^c^0^0^THEN T^35^47^c^0^0^IF T^37^43^c^0^0^THEN T^45^46^c^0^0^ELSE T^52^54^c^0^0^IF T^53^53^c^0^0^THEN T^56^72^f^0^0^REPORT T^57^62^d^0^0^DEFINE T^57^60^d^0^0^RECORD T^66^71^a^0^0^ON EVERY ROW x^71^0^ p^r^3 p^v^18 p^v^7