S^1^0^M^ipactualizareqtrx^MODULE^^ S^2^1^F^actualizareqtrx^^^public F^0^C:\Users\luis_\Documents\fuentes\decomarmol\PROYECTOS\ipdir\ipactualizareqtrx.4gl D^2^1^30^10^0^0 X^2^D^1^10^0^ S^3^2^P^pnumdoc^INTEGER^^ D^3^2^2^11^0^0 X^3^r^18^26^0^ X^3^r^10^26^0^ X^3^l^1^26^0^ X^3^D^2^11^0^ S^4^2^V^cantidad_trx^DECIMAL(12,5)^^ D^4^3^3^11^0^0 X^4^r^21^8^0^ X^4^r^20^23^0^ X^4^r^13^27^0^ X^4^l^13^12^0^ X^4^r^12^8^0^ X^4^l^9^45^0^ X^4^D^3^11^0^ S^5^2^V^cantidad_req_trx^DECIMAL(12,5)^^ D^5^3^3^24^0^0 X^5^r^21^24^0^ X^5^r^20^40^0^ X^5^l^17^45^0^ X^5^D^3^24^0^ S^6^2^V^cerrar^BOOLEAN^^ D^6^4^4^11^0^0 X^6^r^27^12^0^ X^6^l^24^12^0^ X^6^l^22^12^0^ X^6^D^4^11^0^ T^1^1^d^0^0^DEFINE T^1^30^f^0^0^FUNCTION T^2^4^d^0^0^DEFINE T^12^14^c^0^0^IF T^13^13^c^0^0^THEN T^21^25^c^0^0^IF T^22^22^c^0^0^THEN T^23^24^c^0^0^ELSE