Files
DECOMARMOL/PROYECTOS/ipdir/piking.rdd
T
2026-09-22 20:38:51 -04:00

706 lines
15 KiB
Plaintext

S^1^0^M^piking^MODULE^^
S^2^1^F^pendienteRecibir^^^public
F^0^C:\Users\luis_\Documents\fuentes\decomarmol\PROYECTOS\ipdir\piking.4gl
D^2^359^378^10^0^0
X^2^D^359^10^0^
S^3^2^P^xbodega^INTEGER^^
D^3^360^360^10^0^0
X^3^r^366^45^0^
X^3^l^359^27^0^
X^3^D^360^10^0^
S^4^2^V^j^INTEGER^^
D^4^360^360^18^0^0
X^4^r^377^14^0^
X^4^r^375^18^0^
X^4^l^375^14^0^
X^4^l^373^11^0^
X^4^D^360^18^0^
S^5^1^F^buscadata^^^public
D^5^329^358^10^0^0
X^5^c^171^30^0^
X^5^c^152^24^0^
X^5^D^329^10^0^
S^6^5^P^i^INTEGER^^
D^6^330^330^15^0^0
X^6^r^356^55^0^
X^6^r^354^55^0^
X^6^r^352^55^0^
X^6^r^351^55^0^
X^6^r^350^55^0^
X^6^r^347^55^0^
X^6^r^340^59^0^
X^6^r^339^34^0^
X^6^r^338^33^0^
X^6^l^329^20^0^
X^6^D^330^15^0^
S^7^1^F^adicionaTransf^^^public
D^7^242^328^10^0^0
X^7^c^175^30^0^
X^7^D^242^10^0^
S^8^7^V^selec^STRING^^
D^8^243^243^11^0^0
X^8^r^281^26^0^
X^8^r^280^13^0^
X^8^l^262^10^0^
X^8^D^243^11^0^
S^9^1^F^itemsTransferencia^^^public
D^9^185^241^10^0^0
X^9^c^153^24^0^
X^9^D^185^10^0^
S^10^9^V^xcodmov^STRING^^
D^10^186^186^11^0^0
X^10^l^209^29^0^
X^10^l^205^17^0^
X^10^D^186^11^0^
S^11^9^V^xbodega^STRING^^
D^11^186^186^19^0^0
X^11^l^209^45^0^
X^11^l^208^17^0^
X^11^D^186^19^0^
S^12^9^V^xnumdoc^INTEGER^^
D^12^187^187^11^0^0
X^12^l^209^37^0^
X^12^l^207^17^0^
X^12^D^187^11^0^
S^13^1^F^piking^^^public
D^13^98^184^10^0^0
X^13^D^98^10^0^
S^14^13^P^usuario^CHAR(50)^^
D^14^110^110^2^0^0
X^14^r^124^44^0^
X^14^r^113^17^0^
X^14^l^98^17^0^
X^14^D^110^2^0^
S^15^13^P^clave^CHAR(50)^^
D^15^110^110^10^0^0
X^15^r^114^17^0^
X^15^l^98^25^0^
X^15^D^110^10^0^
S^16^13^P^impresor^SMALLINT^^
D^16^111^111^2^0^0
X^16^r^115^18^0^
X^16^l^98^31^0^
X^16^D^111^2^0^
S^17^13^P^xbodega^SMALLINT^^
D^17^111^111^11^0^0
X^17^l^98^40^0^
X^17^D^111^11^0^
S^18^13^P^sucursal^SMALLINT^^
D^18^111^111^19^0^0
X^18^l^98^48^0^
X^18^D^111^19^0^
S^19^13^V^letras^RECORD^^
D^19^100^109^8^0^0
X^19^D^100^8^0^
S^20^19^V^negrillas_on^CHAR(6)^^
D^20^101^101^8^0^0
X^20^D^101^8^0^
S^21^19^V^negrillas_off^CHAR(6)^^
D^21^102^102^8^0^0
X^21^D^102^8^0^
S^22^19^V^doble_on^CHAR(6)^^
D^22^103^103^8^0^0
X^22^D^103^8^0^
S^23^19^V^doble_off^CHAR(6)^^
D^23^104^104^8^0^0
X^23^D^104^8^0^
S^24^19^V^comp_on^CHAR(6)^^
D^24^105^105^8^0^0
X^24^D^105^8^0^
S^25^19^V^comp_off^CHAR(6)^^
D^25^106^106^8^0^0
X^25^D^106^8^0^
S^26^19^V^doce^CHAR(6)^^
D^26^107^107^8^0^0
X^26^D^107^8^0^
S^27^19^V^normal^CHAR(6)^^
D^27^108^108^8^0^0
X^27^D^108^8^0^
S^28^1^V^piking^DYNAMIC ARRAY OF RECORD^^private
D^28^3^21^10^0^0
X^28^r^356^48^0^
X^28^r^354^48^0^
X^28^r^352^48^0^
X^28^r^351^48^0^
X^28^r^350^48^0^
X^28^r^347^48^0^
X^28^r^340^52^0^
X^28^r^339^27^0^
X^28^r^338^26^0^
X^28^r^172^28^0^
X^28^r^170^23^0^
X^28^r^168^32^0^
X^28^r^148^20^0^
X^28^r^139^47^0^
X^28^r^138^29^0^
X^28^l^136^34^0^
X^28^r^134^29^0^
X^28^l^132^34^0^
X^28^r^131^31^0^
X^28^D^3^10^0^
S^29^28^V^transportista^STRING^^
D^29^4^4^13^0^0
X^29^D^4^13^0^
S^30^28^V^bodega^SMALLINT^^
D^30^5^5^14^0^0
X^30^D^5^14^0^
S^31^28^V^nombre_b^CHAR(25)^^
D^31^6^6^14^0^0
X^31^D^6^14^0^
S^32^28^V^bodega2^SMALLINT^^
D^32^7^7^14^0^0
X^32^D^7^14^0^
S^33^28^V^nombre_b2^CHAR(25)^^
D^33^8^8^14^0^0
X^33^D^8^14^0^
S^34^28^V^num_doc^INTEGER^^
D^34^9^9^14^0^0
X^34^D^9^14^0^
S^35^28^V^fecha^DATE^^
D^35^10^10^14^0^0
X^35^D^10^14^0^
S^36^28^V^cod_mov^SMALLINT^^
D^36^11^11^14^0^0
X^36^D^11^14^0^
S^37^28^V^nombre^VARCHAR(100)^^
D^37^12^12^14^0^0
X^37^D^12^14^0^
S^38^28^V^usuario^CHAR(60)^^
D^38^13^13^14^0^0
X^38^D^13^14^0^
S^39^28^V^recibo^CHAR(1)^^
D^39^14^14^14^0^0
X^39^D^14^14^0^
S^40^28^V^impresion^CHAR(1)^^
D^40^15^15^14^0^0
X^40^D^15^14^0^
S^41^28^V^cod_mov_transferencia^SMALLINT^^
D^41^16^16^14^0^0
X^41^D^16^14^0^
S^42^28^V^cod_transp^SMALLINT^^
D^42^17^17^14^0^0
X^42^D^17^14^0^
S^43^28^V^sec_transp^SMALLINT^^
D^43^18^18^14^0^0
X^43^D^18^14^0^
S^44^28^V^placa^VARCHAR(50)^^
D^44^19^19^14^0^0
X^44^D^19^14^0^
S^45^28^V^numero_doc^INTEGER^^
D^45^20^20^14^0^0
X^45^D^20^14^0^
S^46^1^V^ximpresion^CHAR(1)^^private
D^46^22^22^6^0^0
X^46^r^295^8^0^
X^46^l^173^32^0^
X^46^l^169^24^0^
X^46^D^22^6^0^
S^47^1^V^movi2^DYNAMIC ARRAY OF RECORD^^private
D^47^24^41^8^0^0
X^47^r^321^54^0^
X^47^l^317^58^0^
X^47^l^317^35^0^
X^47^l^316^76^0^
X^47^l^316^54^0^
X^47^l^316^35^0^
X^47^l^315^73^0^
X^47^l^315^52^0^
X^47^l^315^35^0^
X^47^r^231^57^0^
X^47^r^229^32^0^
X^47^r^223^27^0^
X^47^l^218^39^0^
X^47^l^217^39^0^
X^47^l^216^39^0^
X^47^l^215^39^0^
X^47^l^214^39^0^
X^47^l^213^39^0^
X^47^l^212^39^0^
X^47^l^211^38^0^
X^47^D^24^8^0^
S^48^47^V^area^SMALLINT^^
D^48^25^25^5^0^0
X^48^D^25^5^0^
S^49^47^V^descripcion_area^VARCHAR(30)^^
D^49^26^26^5^0^0
X^49^D^26^5^0^
S^50^47^V^cod_n^SMALLINT^decomarmol.intb00003.cod_n^
D^50^27^27^5^0^0
X^50^D^27^5^0^
S^51^47^V^cod_grupo^SMALLINT^decomarmol.intb00003.cod_grupo^
D^51^28^28^5^0^0
X^51^D^28^5^0^
S^52^47^V^cod_tipo^SMALLINT^decomarmol.intb00003.cod_tipo^
D^52^29^29^5^0^0
X^52^D^29^5^0^
S^53^47^V^cod_sec^SMALLINT^decomarmol.intb00003.cod_sec^
D^53^30^30^5^0^0
X^53^D^30^5^0^
S^54^47^V^cantidad_1^DECIMAL(12,5)^^
D^54^31^31^5^0^0
X^54^D^31^5^0^
S^55^47^V^cantidad_2^DECIMAL(12,5)^^
D^55^32^32^5^0^0
X^55^D^32^5^0^
S^56^47^V^cantidad_p^DECIMAL(12,5)^^
D^56^33^33^5^0^0
X^56^D^33^5^0^
S^57^47^V^unidad_med^CHAR(4)^decomarmol.iptb00002.unidad_med^
D^57^34^34^5^0^0
X^57^D^34^5^0^
S^58^47^V^descrip_esp^CHAR(80)^^
D^58^35^35^5^0^0
X^58^D^35^5^0^
S^59^47^V^existencia^DECIMAL(12,5)^^
D^59^36^36^5^0^0
X^59^D^36^5^0^
S^60^47^V^disponible^DECIMAL(12,5)^^
D^60^37^37^5^0^0
X^60^D^37^5^0^
S^61^47^V^codigo_bloque^CHAR(15)^^
D^61^38^38^5^0^0
X^61^D^38^5^0^
S^62^47^V^id_kit^INTEGER^^
D^62^39^39^5^0^0
X^62^D^39^5^0^
S^63^1^V^negrilla_on^CHAR(3)^^private
D^63^42^43^10^0^0
X^63^l^309^69^0^
X^63^l^225^77^0^
X^63^D^42^10^0^
S^64^1^V^negrillas_of^CHAR(3)^^private
D^64^42^43^22^0^0
X^64^l^309^81^0^
X^64^l^225^89^0^
X^64^D^42^22^0^
S^65^1^V^doble_on^CHAR(3)^^private
D^65^42^43^35^0^0
X^65^l^310^60^0^
X^65^l^226^60^0^
X^65^D^42^35^0^
S^66^1^V^doble_off^CHAR(3)^^private
D^66^42^43^44^0^0
X^66^l^310^69^0^
X^66^l^226^69^0^
X^66^D^42^44^0^
S^67^1^V^comp_on^CHAR(3)^^private
D^67^42^43^54^0^0
X^67^l^310^79^0^
X^67^l^226^79^0^
X^67^D^42^54^0^
S^68^1^V^comp_off^CHAR(3)^^private
D^68^42^43^62^0^0
X^68^l^310^87^0^
X^68^l^226^87^0^
X^68^D^42^62^0^
S^69^1^V^doce^CHAR(3)^^private
D^69^43^43^10^0^0
X^69^l^311^60^0^
X^69^l^227^60^0^
X^69^D^43^10^0^
S^70^1^V^NORMAL^CHAR(3)^^private
D^70^43^43^15^0^0
X^70^l^311^65^0^
X^70^l^227^65^0^
X^70^D^43^15^0^
S^71^1^V^imprime^CHAR(100)^^private
D^71^44^44^7^0^0
X^71^r^324^15^0^
X^71^l^309^61^0^
X^71^r^235^21^0^
X^71^l^225^69^0^
X^71^D^44^7^0^
S^72^1^V^gclave^CHAR(100)^^private
D^72^44^44^15^0^0
X^72^r^309^33^0^
X^72^r^225^41^0^
X^72^l^114^6^0^
X^72^D^44^15^0^
S^73^1^V^gusuario^CHAR(100)^^private
D^73^44^44^22^0^0
X^73^r^309^24^0^
X^73^r^290^54^0^
X^73^r^274^81^0^
X^73^r^225^32^0^
X^73^l^113^6^0^
X^73^D^44^22^0^
S^74^1^V^archivo^CHAR(100)^^private
D^74^44^44^31^0^0
X^74^r^313^34^0^
X^74^l^311^72^0^
X^74^r^228^40^0^
X^74^l^227^72^0^
X^74^D^44^31^0^
S^75^1^V^DESCRIP_TRANSP^CHAR(100)^^private
D^75^44^44^40^0^0
X^75^l^335^61^0^
X^75^D^44^40^0^
S^76^1^V^copia^CHAR(100)^^private
D^76^44^44^55^0^0
X^76^l^311^80^0^
X^76^l^227^80^0^
X^76^D^44^55^0^
S^77^1^V^gimpresor^SMALLINT^^private
D^77^45^45^7^0^0
X^77^r^309^40^0^
X^77^r^225^48^0^
X^77^l^115^6^0^
X^77^D^45^7^0^
S^78^1^V^idx1^SMALLINT^^private
D^78^45^45^17^0^0
X^78^r^172^35^0^
X^78^r^171^40^0^
X^78^r^170^30^0^
X^78^l^168^20^0^
X^78^D^45^17^0^
S^79^1^V^idx^SMALLINT^^private
D^79^45^45^22^0^0
X^79^r^321^60^0^
X^79^l^317^64^0^
X^79^l^317^41^0^
X^79^l^316^82^0^
X^79^l^316^60^0^
X^79^l^316^41^0^
X^79^l^315^79^0^
X^79^l^315^58^0^
X^79^l^315^41^0^
X^79^l^308^15^0^
X^79^r^231^63^0^
X^79^l^229^21^0^
X^79^r^220^24^0^
X^79^l^220^18^0^
X^79^l^218^45^0^
X^79^l^217^45^0^
X^79^l^216^45^0^
X^79^l^215^45^0^
X^79^l^214^45^0^
X^79^l^213^45^0^
X^79^l^212^45^0^
X^79^l^211^44^0^
X^79^l^204^17^0^
X^79^r^143^8^0^
X^79^r^140^23^0^
X^79^l^140^17^0^
X^79^r^139^54^0^
X^79^r^138^36^0^
X^79^l^136^41^0^
X^79^r^134^36^0^
X^79^l^132^41^0^
X^79^r^131^38^0^
X^79^l^130^9^0^
X^79^D^45^22^0^
S^80^1^V^p_act^SMALLINT^^private
D^80^45^45^26^0^0
X^80^r^152^34^0^
X^80^l^151^23^0^
X^80^D^45^26^0^
S^81^1^V^numero_msg^SMALLINT^^private
D^81^45^45^32^0^0
X^81^r^159^28^0^
X^81^l^158^23^0^
X^81^D^45^32^0^
S^82^1^V^tituloBodega^STRING^^private
D^82^46^46^7^0^0
X^82^l^356^13^0^
X^82^D^46^7^0^
S^83^1^V^otros_mov1^RECORD^^private
D^83^48^69^8^0^0
X^83^l^347^13^0^
X^83^r^346^48^0^
X^83^r^345^48^0^
X^83^l^336^40^0^
X^83^r^303^63^0^
X^83^r^291^53^0^
X^83^r^277^50^0^
X^83^r^275^43^0^
X^83^r^273^19^0^
X^83^r^260^22^0^
X^83^r^253^64^0^
X^83^r^248^22^0^
X^83^r^244^22^0^
X^83^l^219^39^0^
X^83^r^207^27^0^
X^83^r^194^43^0^
X^83^r^188^33^0^
X^83^l^139^12^0^
X^83^D^48^8^0^
S^84^83^V^num_doc^INTEGER^^
D^84^49^49^16^0^0
X^84^D^49^16^0^
S^85^83^V^cod_cia^SMALLINT^^
D^85^50^50^10^0^0
X^85^D^50^10^0^
S^86^83^V^cod_mov^SMALLINT^^
D^86^51^51^13^0^0
X^86^D^51^13^0^
S^87^83^V^fact_no^CHAR(25)^^
D^87^52^52^16^0^0
X^87^D^52^16^0^
S^88^83^V^cod_transp^SMALLINT^^
D^88^53^53^16^0^0
X^88^D^53^16^0^
S^89^83^V^sec_transp^SMALLINT^^
D^89^54^54^16^0^0
X^89^D^54^16^0^
S^90^83^V^cod_tarifa^SMALLINT^^
D^90^55^55^16^0^0
X^90^D^55^16^0^
S^91^83^V^placa^CHAR(25)^^
D^91^56^56^16^0^0
X^91^D^56^16^0^
S^92^83^V^conduce_no^CHAR(25)^^
D^92^57^57^16^0^0
X^92^D^57^16^0^
S^93^83^V^fecha^DATE^^
D^93^58^58^16^0^0
X^93^D^58^16^0^
S^94^83^V^descrip_mov^CHAR(30)^^
D^94^59^59^16^0^0
X^94^D^59^16^0^
S^95^83^V^bodega^SMALLINT^^
D^95^60^60^16^0^0
X^95^D^60^16^0^
S^96^83^V^bodega2^SMALLINT^^
D^96^61^61^16^0^0
X^96^D^61^16^0^
S^97^83^V^bodega_d^CHAR(30)^^
D^97^62^62^16^0^0
X^97^D^62^16^0^
S^98^83^V^num_bultos^SMALLINT^^
D^98^63^63^16^0^0
X^98^D^63^16^0^
S^99^83^V^detalle^CHAR(30)^^
D^99^64^64^16^0^0
X^99^D^64^16^0^
S^100^83^V^cod_sp^SMALLINT^^
D^100^65^65^16^0^0
X^100^D^65^16^0^
S^101^83^V^cod_sp_sec^INTEGER^^
D^101^66^66^16^0^0
X^101^D^66^16^0^
S^102^83^V^descrip4^CHAR(30)^^
D^102^67^67^16^0^0
X^102^D^67^16^0^
S^103^83^V^cod_mov_transferencia^INTEGER^^
D^103^68^68^16^0^0
X^103^D^68^16^0^
S^104^1^V^otros_mov^RECORD^^private
D^104^71^96^8^0^0
X^104^l^354^13^0^
X^104^l^352^13^0^
X^104^l^351^13^0^
X^104^l^350^13^0^
X^104^l^346^13^0^
X^104^l^345^13^0^
X^104^l^336^73^0^
X^104^l^336^19^0^
X^104^l^335^76^0^
X^104^l^335^36^0^
X^104^l^335^19^0^
X^104^l^334^56^0^
X^104^l^334^34^0^
X^104^l^334^16^0^
X^104^r^321^42^0^
X^104^l^319^89^0^
X^104^l^319^68^0^
X^104^l^319^52^0^
X^104^l^319^35^0^
X^104^l^318^87^0^
X^104^l^318^69^0^
X^104^l^318^53^0^
X^104^l^318^35^0^
X^104^r^304^28^0^
X^104^r^303^29^0^
X^104^r^292^23^0^
X^104^r^291^22^0^
X^104^r^278^71^0^
X^104^r^278^32^0^
X^104^r^277^88^0^
X^104^r^275^66^0^
X^104^r^275^20^0^
X^104^r^274^51^0^
X^104^r^271^38^0^
X^104^r^260^68^0^
X^104^r^259^37^0^
X^104^r^255^28^0^
X^104^l^255^8^0^
X^104^r^253^97^0^
X^104^l^252^11^0^
X^104^r^251^7^0^
X^104^r^247^21^0^
X^104^l^245^26^0^
X^104^r^231^45^0^
X^104^r^208^64^0^
X^104^r^208^31^0^
X^104^r^205^66^0^
X^104^r^205^31^0^
X^104^r^201^38^0^
X^104^r^200^44^0^
X^104^r^195^40^0^
X^104^r^188^78^0^
X^104^r^188^56^0^
X^104^D^71^8^0^
S^105^104^V^num_doc^INTEGER^decomarmol.iptb00006.num_doc^
D^105^72^72^5^0^0
X^105^D^72^5^0^
S^106^104^V^cod_cia^SMALLINT^decomarmol.iptb00006.cod_cia^
D^106^73^73^5^0^0
X^106^D^73^5^0^
S^107^104^V^cod_mov^SMALLINT^decomarmol.iptb00006.cod_mov^
D^107^74^74^5^0^0
X^107^D^74^5^0^
S^108^104^V^fact_no^CHAR(10)^decomarmol.iptb00006.fact_no^
D^108^75^75^5^0^0
X^108^D^75^5^0^
S^109^104^V^cod_transp^SMALLINT^decomarmol.iptb00006.cod_transp^
D^109^76^76^5^0^0
X^109^D^76^5^0^
S^110^104^V^sec_transp^SMALLINT^decomarmol.iptb00006.sec_transp^
D^110^77^77^5^0^0
X^110^D^77^5^0^
S^111^104^V^cod_tarifa^SMALLINT^decomarmol.iptb00006.cod_tarifa^
D^111^78^78^5^0^0
X^111^D^78^5^0^
S^112^104^V^placa^CHAR(10)^decomarmol.iptb00006.placa^
D^112^79^79^5^0^0
X^112^D^79^5^0^
S^113^104^V^fecha^DATE^decomarmol.iptb00006.fecha^
D^113^80^80^5^0^0
X^113^D^80^5^0^
S^114^104^V^conduce_no^CHAR(10)^decomarmol.iptb00006.conduce_no^
D^114^81^81^5^0^0
X^114^D^81^5^0^
S^115^104^V^descrip_mov^CHAR(80)^^
D^115^82^82^5^0^0
X^115^D^82^5^0^
S^116^104^V^bodega^SMALLINT^decomarmol.iptb00006.bodega^
D^116^83^83^5^0^0
X^116^D^83^5^0^
S^117^104^V^bodega_destino^SMALLINT^^
D^117^84^84^5^0^0
X^117^D^84^5^0^
S^118^104^V^detalle^VARCHAR(100)^decomarmol.iptb00006.detalle^
D^118^85^85^5^0^0
X^118^D^85^5^0^
S^119^104^V^cod_sp^SMALLINT^decomarmol.iptb00006.cod_sp^
D^119^86^86^5^0^0
X^119^D^86^5^0^
S^120^104^V^cod_sp_sec^SMALLINT^decomarmol.iptb00006.cod_sp_sec^
D^120^87^87^5^0^0
X^120^D^87^5^0^
S^121^104^V^departamento^SMALLINT^^
D^121^88^88^5^0^0
X^121^D^88^5^0^
S^122^104^V^nombre_depto^CHAR(30)^^
D^122^89^89^5^0^0
X^122^D^89^5^0^
S^123^104^V^cod_mov1^SMALLINT^^
D^123^90^90^5^0^0
X^123^D^90^5^0^
S^124^104^V^entrada^INTEGER^^
D^124^91^91^5^0^0
X^124^D^91^5^0^
S^125^104^V^descrip_mov1^CHAR(40)^^
D^125^92^92^5^0^0
X^125^D^92^5^0^
S^126^104^V^descrip4^CHAR(30)^^
D^126^93^93^5^0^0
X^126^D^93^5^0^
S^127^104^V^factura^INTEGER^^
D^127^94^94^5^0^0
X^127^D^94^5^0^
S^128^1^C^busca_piking^base.SqlHandle^^private
D^128^116^116^10^0^0
X^128^u^131^13^0^
X^128^D^116^10^0^
S^129^1^C^busca_items^base.SqlHandle^^private
D^129^190^190^21^0^0
X^129^u^211^21^0^
X^129^D^190^21^0^
S^130^1^C^comando^base.SqlHandle^^private
D^130^281^281^13^0^0
X^130^u^282^13^0^
X^130^D^281^13^0^
S^131^1^C^busca_data^base.SqlHandle^^private
D^131^298^298^17^0^0
X^131^u^315^19^0^
X^131^D^298^17^0^
S^132^1^C^cuenta^base.SqlHandle^^private
D^132^361^361^13^0^0
X^132^u^374^15^0^
X^132^D^361^13^0^
S^133^0^V^status^INTEGER^^builtin
F^1^C:\Program Files\FourJs\Genero Studio\fgl\lib/fgl.4gl
D^133^15^15^9^1^1
X^133^r^284^8^0^
X^133^D^15^9^1^
S^134^0^V^int_flag^INTEGER^^builtin
D^134^15^15^17^1^1
X^134^l^182^6^0^
X^134^l^164^19^0^
X^134^r^163^15^0^
X^134^r^157^19^0^
X^134^l^147^12^0^
X^134^D^15^17^1^
S^135^0^F^fgl_winmessage^^^extern
X^135^c^327^12^0^
X^135^c^286^13^0^
X^135^c^236^22^0^
S^136^0^R^formu4^^^extern
X^136^c^323^25^0^finish
X^136^c^321^35^0^output
X^136^c^313^24^0^start
X^136^c^234^31^0^finish
X^136^c^231^38^0^output
X^136^c^228^30^0^start
S^137^0^F^defecto^^^extern
X^137^c^309^16^0^
X^137^c^225^24^0^
S^138^0^F^msg^^^extern
X^138^c^159^24^0^
T^1^96^d^0^0^DEFINE
T^3^21^d^0^0^RECORD
T^24^41^d^0^0^RECORD
T^48^69^d^0^0^RECORD
T^71^96^d^0^0^RECORD
T^98^184^f^0^0^FUNCTION
T^100^111^d^0^0^DEFINE
T^100^109^d^0^0^RECORD
T^131^141^l^0^0^FOREACH
T^143^181^c^0^0^IF
T^145^179^c^0^0^THEN
T^148^162^i^0^0^INPUT ARRAY
T^150^153^i^0^0^
T^155^161^i^0^0^
T^157^161^c^0^0^IF
T^158^160^c^0^0^THEN
T^160^160^g^0^0^EXIT INPUT
T^163^167^c^0^0^IF
T^164^166^c^0^0^THEN
T^168^177^l^0^0^FOR
T^170^176^c^0^0^IF
T^171^175^c^0^0^THEN
T^172^174^c^0^0^IF
T^173^173^c^0^0^THEN
T^185^241^f^0^0^FUNCTION
T^186^187^d^0^0^DEFINE
T^211^221^l^0^0^FOREACH
T^224^236^i^0^0^
T^229^233^l^0^0^FOR
T^237^238^i^0^0^
T^238^238^g^0^0^EXIT DISPLAY
T^242^328^f^0^0^FUNCTION
T^243^243^d^0^0^DEFINE
T^251^254^c^0^0^IF
T^252^253^c^0^0^THEN
T^284^288^c^0^0^IF
T^285^287^c^0^0^THEN
T^295^326^c^0^0^IF
T^298^324^c^0^0^THEN
T^315^322^l^0^0^FOREACH
T^329^358^f^0^0^FUNCTION
T^330^330^d^0^0^DEFINE
T^359^378^f^0^0^FUNCTION
T^360^360^d^0^0^DEFINE
T^374^376^l^0^0^FOREACH