S^1^0^M^cumpleanos_1^MODULE^^ S^2^1^R^r_cumple_mes^^^public F^0^C:\Users\jsoto\Documents\PROYECTOS\BDL320\MARMOTECH\PROYECTO\nodir\cumpleanos_1.4gl D^2^91^108^8^0^0 X^2^c^78^21^0^finish X^2^c^74^23^0^output X^2^c^68^23^0^start X^2^D^91^8^0^ S^3^2^P^X^RECORD^^ D^3^92^96^10^0^0 X^3^r^107^12^0^ X^3^l^91^21^0^ X^3^D^92^10^0^ S^4^3^P^nombre^VARCHAR(100)^^ D^4^93^93^5^0^0 X^4^D^93^5^0^ S^5^3^P^departamento^VARCHAR(100)^^ D^5^94^94^5^0^0 X^5^D^94^5^0^ S^6^3^P^dia^SMALLINT^^ D^6^95^95^5^0^0 X^6^D^95^5^0^ S^7^2^V^chlable^VARCHAR(100)^^ D^7^98^98^3^0^0 X^7^r^107^20^0^ X^7^l^105^9^0^ X^7^D^98^3^0^ S^8^2^V^reportDef^base.Report^^ D^8^0^0^0^0^0 S^9^1^F^cumpleanos^^^public D^9^29^90^10^0^0 X^9^c^26^7^0^ X^9^D^29^10^0^ S^10^9^V^rcumple^RECORD^^ D^10^30^34^10^0^0 X^10^r^74^36^0^ X^10^r^56^30^0^ X^10^D^30^10^0^ S^11^10^V^nombre^VARCHAR(100)^^ D^11^31^31^5^0^0 X^11^D^31^5^0^ S^12^10^V^departamento^VARCHAR(100)^^ D^12^32^32^5^0^0 X^12^D^32^5^0^ S^13^10^V^dia^SMALLINT^^ D^13^33^33^5^0^0 X^13^D^33^5^0^ S^14^9^V^archivo^VARCHAR(20)^^ D^14^35^35^6^0^0 X^14^r^58^43^0^ X^14^l^53^8^0^ X^14^D^35^6^0^ S^15^9^V^HANDLER^om.SaxDocumentHandler^^ D^15^36^36^6^0^0 X^15^r^68^51^0^ X^15^l^67^14^0^ X^15^D^36^6^0^ S^16^1^F^main^^^public D^16^17^27^1^0^0 X^16^D^17^1^0^ S^17^1^C^busca_cumple^base.SqlHandle^^private D^17^44^44^11^0^0 X^17^u^56^12^0^ X^17^D^44^11^0^ S^18^0^V^status^INTEGER^^builtin F^1^C:\Program Files\FourJs\Genero Studio32072\fgl\lib/fgl.4gl D^18^15^15^9^1^1 X^18^D^15^9^1^ S^19^0^V^idx^SMALLINT^^global D^19^11^11^12^0^0 X^19^r^107^16^0^ X^19^r^77^7^0^ X^19^r^75^16^0^ X^19^l^75^10^0^ X^19^r^57^10^0^ X^19^l^52^8^0^ X^19^D^11^12^0^ S^20^0^V^mes^SMALLINT^^global D^20^11^11^16^0^0 X^20^r^49^29^0^ X^20^r^42^61^0^ X^20^l^40^24^0^ X^20^r^40^6^0^ X^20^l^38^7^0^ X^20^D^11^16^0^ S^21^0^V^usuario^STRING^^global D^21^12^12^12^0^0 X^21^r^24^32^0^ X^21^l^20^29^0^ X^21^D^12^12^0^ S^22^0^V^clave^STRING^^global D^22^12^12^20^0^0 X^22^r^24^46^0^ X^22^l^21^29^0^ X^22^D^12^20^0^ S^23^0^V^nombre_file^CHAR(30)^^global D^23^13^13^12^0^0 X^23^D^13^12^0^ S^24^0^V^fecha^CHAR(30)^^global D^24^13^13^24^0^0 X^24^r^105^42^0^ X^24^r^86^56^0^ X^24^l^42^25^0^ X^24^D^13^24^0^ S^25^0^V^xusername^STRING^^global D^25^14^14^12^0^0 X^25^r^88^70^0^ X^25^l^79^13^0^ X^25^D^14^12^0^ S^26^0^V^xsmtphost^STRING^^global D^26^14^14^22^0^0 X^26^r^88^80^0^ X^26^l^80^13^0^ X^26^D^14^22^0^ S^27^0^V^xsmtpport^STRING^^global D^27^14^14^32^0^0 X^27^r^88^90^0^ X^27^l^81^13^0^ X^27^D^14^32^0^ S^28^0^V^xpassword^STRING^^global D^28^14^14^42^0^0 X^28^r^88^100^0^ X^28^l^82^13^0^ X^28^D^14^42^0^ S^29^0^V^vendedorEmail^STRING^^global D^29^14^14^52^0^0 X^29^r^88^23^0^ X^29^l^85^12^0^ X^29^l^22^29^0^ X^29^D^14^52^0^ S^30^0^V^subject^STRING^^global D^30^14^14^66^0^0 X^30^r^88^37^0^ X^30^l^86^12^0^ X^30^D^14^66^0^ S^31^0^V^cuerpo_correo^STRING^^global D^31^14^14^74^0^0 X^31^r^88^45^0^ X^31^l^87^12^0^ X^31^D^14^74^0^ S^32^0^V^attachment^STRING^^global D^32^14^14^88^0^0 X^32^r^88^59^0^ X^32^r^65^44^0^ X^32^l^63^14^0^ X^32^l^54^8^0^ X^32^D^14^88^0^ S^33^0^V^rutafile^STRING^^global D^33^14^14^99^0^0 X^33^r^63^27^0^ X^33^l^55^8^0^ X^33^D^14^99^0^ S^34^0^F^enviaemail^^^extern X^34^c^88^12^0^ S^35^0^F^fgl_report_commitCurrentSettings^^^extern X^35^c^67^24^0^ S^36^0^F^fgl_report_setOutputFileName^^^extern X^36^c^65^15^0^ S^37^0^F^fgl_report_selectPreview^^^extern X^37^c^61^15^0^ S^38^0^F^fgl_report_selectDevice^^^extern X^38^c^60^15^0^ S^39^0^F^fgl_report_loadCurrentSettings^^^extern X^39^c^58^12^0^ T^10^16^d^0^0^DEFINE T^10^16^d^0^0^GLOBALS DEFINE T^11^14^d^0^0^DEFINE T^17^27^f^0^0^MAIN T^29^90^f^0^0^FUNCTION T^30^36^d^0^0^DEFINE T^30^34^d^0^0^RECORD T^40^40^c^0^0^IF T^40^40^c^0^0^THEN T^56^76^l^0^0^FOREACH T^57^73^c^0^0^IF T^58^72^c^0^0^THEN T^58^72^c^0^0^IF T^60^68^c^0^0^THEN T^70^71^c^0^0^ELSE T^77^89^c^0^0^IF T^78^88^c^0^0^THEN T^91^108^f^0^0^REPORT T^92^98^d^0^0^DEFINE T^92^96^d^0^0^RECORD T^102^107^a^0^0^ON EVERY ROW x^107^0^ p^r^3 p^v^19 p^v^7