S^1^0^M^ncf^MODULE^^
S^2^1^F^btipo_fact^^^public
F^0^C:\Users\luis_\Documents\fuentes\decomarmol\PROYECTO\otrodir\ncf.4gl
D^2^1^45^10^0^0
X^2^D^1^10^0^
S^3^2^P^ptipo_doc^CHAR(2)^^
D^3^8^8^6^0^0
X^3^r^19^25^0^
X^3^l^1^21^0^
X^3^D^8^6^0^
S^4^2^V^arrtipofact^ARRAY[50] OF RECORD^^
D^4^3^7^9^0^0
X^4^r^39^27^0^
X^4^r^38^7^0^
X^4^r^37^22^0^
X^4^r^36^21^0^
X^4^r^33^18^0^
X^4^r^22^27^0^
X^4^D^3^9^0^
S^5^4^V^codigodgii^CHAR(16)^^
D^5^4^4^10^0^0
X^5^D^4^10^0^
S^6^4^V^descripcion^CHAR(80)^^
D^6^5^5^10^0^0
X^6^D^5^10^0^
S^7^4^V^fecha_vencimiento^DATE^^
D^7^6^6^10^0^0
X^7^D^6^10^0^
S^8^2^V^codigodgii^CHAR(16)^^
D^8^9^9^6^0^0
X^8^r^44^11^0^
X^8^l^36^8^0^
X^8^D^9^6^0^
S^9^2^V^descripcion^CHAR(30)^^
D^9^10^10^6^0^0
X^9^l^37^8^0^
X^9^D^10^6^0^
S^10^2^V^idx^SMALLINT^^
D^10^11^11^6^0^0
X^10^r^32^19^0^
X^10^r^23^14^0^
X^10^l^23^8^0^
X^10^r^22^39^0^
X^10^l^21^7^0^
X^10^D^11^6^0^
S^11^2^V^curr1^SMALLINT^^
D^11^11^11^10^0^0
X^11^r^39^39^0^
X^11^r^38^19^0^
X^11^r^37^34^0^
X^11^r^36^33^0^
X^11^l^35^8^0^
X^11^D^11^10^0^
S^12^2^V^numero_msg^SMALLINT^^
D^12^11^11^16^0^0
X^12^r^27^15^0^
X^12^l^26^10^0^
X^12^D^11^16^0^
S^13^2^V^fecha_vencimiento^DATE^^
D^13^12^12^6^0^0
X^13^r^44^22^0^
X^13^l^41^8^0^
X^13^l^39^8^0^
X^13^D^12^6^0^
S^14^1^C^busca_tipo^base.SqlHandle^^private
D^14^17^17^11^0^0
X^14^u^22^11^0^
X^14^D^17^11^0^
S^15^0^V^status^INTEGER^^builtin
F^1^C:\Program Files\FourJs\Genero Studio\fgl\lib/fgl.4gl
D^15^15^15^9^1^1
X^15^D^15^9^1^
S^16^0^V^int_flag^INTEGER^^builtin
D^16^15^15^17^1^1
X^16^l^28^10^0^
X^16^r^25^7^0^
X^16^D^15^17^1^
S^17^0^F^msg^^^extern
X^17^c^27^11^0^
T^1^1^d^0^0^DEFINE
T^1^45^f^0^0^FUNCTION
T^3^12^d^0^0^DEFINE
T^3^7^d^0^0^RECORD
T^22^24^l^0^0^FOREACH
T^25^30^c^0^0^IF
T^26^29^c^0^0^THEN
T^38^42^c^0^0^IF
T^39^39^c^0^0^THEN
T^40^41^c^0^0^ELSE