S^1^0^M^verifica_cantidad^MODULE^^ S^2^1^F^verifica_cantidad^^^public F^0^D:\genero fuentes\DECOMARMOL320\decomarmol\PROYECTO\otrodir\verifica_cantidad.4gl D^2^1^72^10^0^0 X^2^D^1^10^0^ S^3^2^P^parea^SMALLINT^^ D^3^2^2^43^0^0 X^3^l^1^28^0^ X^3^D^2^43^0^ S^4^2^P^pcodn^SMALLINT^^ D^4^2^2^10^0^0 X^4^r^43^20^0^ X^4^r^29^19^0^ X^4^r^15^21^0^ X^4^l^1^34^0^ X^4^D^2^10^0^ S^5^2^P^pcodgrupo^SMALLINT^^ D^5^2^2^16^0^0 X^5^r^44^23^0^ X^5^r^30^23^0^ X^5^r^16^23^0^ X^5^l^1^40^0^ X^5^D^2^16^0^ S^6^2^P^pcodtipo^SMALLINT^^ D^6^2^2^26^0^0 X^6^r^45^22^0^ X^6^r^31^22^0^ X^6^r^17^22^0^ X^6^l^1^50^0^ X^6^D^2^26^0^ S^7^2^P^pcodsec^SMALLINT^^ D^7^2^2^35^0^0 X^7^r^46^21^0^ X^7^r^32^21^0^ X^7^r^18^21^0^ X^7^l^1^59^0^ X^7^D^2^35^0^ S^8^2^P^xcantidad^DECIMAL(12,5)^^ D^8^4^4^30^0^0 X^8^r^60^37^0^ X^8^l^57^16^0^ X^8^r^56^12^0^ X^8^l^1^67^0^ X^8^D^4^30^0^ S^9^2^P^kcotizacion^INTEGER^^ D^9^3^3^10^0^0 X^9^r^47^20^0^ X^9^r^27^21^0^ X^9^r^19^20^0^ X^9^r^8^21^0^ X^9^l^1^77^0^ X^9^D^3^10^0^ S^10^2^V^pcantidad^DECIMAL(12,5)^^ D^10^4^4^10^0^0 X^10^r^64^14^0^ X^10^r^63^11^0^ X^10^l^60^12^0^ X^10^D^4^10^0^ S^11^2^V^kcantidad^DECIMAL(12,5)^^ D^11^4^4^20^0^0 X^11^r^60^25^0^ X^11^l^54^16^0^ X^11^r^53^12^0^ X^11^l^39^31^0^ X^11^l^38^7^0^ X^11^D^4^20^0^ S^12^2^V^xcantidad_cotizacion^DECIMAL(12,5)^^ D^12^4^4^40^0^0 X^12^r^64^26^0^ X^12^l^36^10^0^ X^12^r^35^6^0^ X^12^l^25^31^0^ X^12^l^24^7^0^ X^12^D^4^40^0^ S^13^2^V^devolucion^DECIMAL(12,5)^^ D^13^4^4^61^0^0 X^13^r^60^48^0^ X^13^l^51^16^0^ X^13^r^50^12^0^ X^13^l^13^33^0^ X^13^l^12^7^0^ X^13^D^4^61^0^ S^14^0^V^status^INTEGER^^builtin F^1^C:\Program Files\FourJs\Genero Studio3.20.09\fgl\lib/fgl.4gl D^14^15^15^9^1^1 X^14^r^9^8^0^ X^14^D^15^9^1^ T^1^1^d^0^0^DEFINE T^1^72^f^0^0^FUNCTION T^2^4^d^0^0^DEFINE T^9^11^c^0^0^IF T^10^10^c^0^0^THEN T^35^37^c^0^0^IF T^36^36^c^0^0^THEN T^50^52^c^0^0^IF T^51^51^c^0^0^THEN T^53^55^c^0^0^IF T^54^54^c^0^0^THEN T^56^58^c^0^0^IF T^57^57^c^0^0^THEN T^63^71^c^0^0^IF T^64^68^c^0^0^THEN T^64^68^c^0^0^IF T^65^65^c^0^0^THEN T^66^67^c^0^0^ELSE T^69^70^c^0^0^ELSE