S^1^0^M^cpprrp011^MODULE^^ S^2^1^R^cuenta_ft^^^public F^0^D:\genero fuentes\DECOMARMOL320\decomarmol\PROYECTO\cpdir\cpprrp011.4gl D^2^423^562^9^0^0 X^2^c^198^20^0^finish X^2^c^196^24^0^output X^2^c^157^21^0^start X^2^D^423^9^0^ S^3^2^P^x^RECORD^^ D^3^424^439^12^0^0 X^3^r^529^38^0^ X^3^r^528^38^0^ X^3^r^524^35^0^ X^3^r^523^34^0^ X^3^l^521^26^0^ X^3^r^519^35^0^ X^3^r^506^55^0^ X^3^r^506^30^0^ X^3^r^505^14^0^ X^3^r^503^47^0^ X^3^r^502^47^0^ X^3^r^501^47^0^ X^3^r^500^47^0^ X^3^l^498^17^0^ X^3^r^497^13^0^ X^3^l^495^17^0^ X^3^r^494^13^0^ X^3^r^492^9^0^ X^3^l^483^23^0^ X^3^l^423^19^0^ X^3^D^424^12^0^ S^4^3^P^factura^CHAR(11)^^ D^4^425^425^6^0^0 X^4^D^425^6^0^ S^5^3^P^cod_sp^SMALLINT^^ D^5^426^426^6^0^0 X^5^D^426^6^0^ S^6^3^P^cod_sp_sec^SMALLINT^^ D^6^427^427^6^0^0 X^6^D^427^6^0^ S^7^3^P^fecha^DATE^^ D^7^428^428^6^0^0 X^7^D^428^6^0^ S^8^3^P^cuenta_no^CHAR(11)^^ D^8^429^429^6^0^0 X^8^D^429^6^0^ S^9^3^P^departamento^SMALLINT^^ D^9^430^430^6^0^0 X^9^D^430^6^0^ S^10^3^P^cod_aux^SMALLINT^^ D^10^431^431^6^0^0 X^10^D^431^6^0^ S^11^3^P^cod_sec^SMALLINT^^ D^11^432^432^6^0^0 X^11^D^432^6^0^ S^12^3^P^refer^CHAR(10)^^ D^12^433^433^6^0^0 X^12^D^433^6^0^ S^13^3^P^debito^DECIMAL(12,2)^^ D^13^434^434^6^0^0 X^13^D^434^6^0^ S^14^3^P^credito^DECIMAL(12,2)^^ D^14^435^435^6^0^0 X^14^D^435^6^0^ S^15^3^P^id^INTEGER^^ D^15^436^436^6^0^0 X^15^D^436^6^0^ S^16^3^P^nom_sp^CHAR(45)^^ D^16^437^437^6^0^0 X^16^D^437^6^0^ S^17^3^P^valor_fac^DECIMAL(12,2)^^ D^17^438^438^6^0^0 X^17^D^438^6^0^ S^18^2^P^fecha1^DATE^^ D^18^453^453^12^0^0 X^18^r^538^54^0^ X^18^r^492^27^0^ X^18^l^423^21^0^ X^18^D^453^12^0^ S^19^2^P^fecha2^DATE^^ D^19^453^453^19^0^0 X^19^r^538^65^0^ X^19^r^492^34^0^ X^19^l^423^28^0^ X^19^D^453^19^0^ S^20^2^P^codigo_sp^STRING^^ D^20^440^440^3^0^0 X^20^l^526^20^0^ X^20^r^492^41^0^ X^20^l^476^23^0^ X^20^l^423^35^0^ X^20^D^440^3^0^ S^21^2^V^reg_final^RECORD^^ D^21^442^450^12^0^0 X^21^r^555^16^0^ X^21^r^552^74^0^ X^21^r^552^57^0^ X^21^r^551^80^0^ X^21^r^551^62^0^ X^21^r^551^44^0^ X^21^r^550^87^0^ X^21^r^550^67^0^ X^21^r^548^39^0^ X^21^r^547^39^0^ X^21^l^545^107^0^ X^21^l^545^90^0^ X^21^l^545^72^0^ X^21^l^545^49^0^ X^21^l^545^29^0^ X^21^D^442^12^0^ S^22^21^V^cuenta_no^CHAR(8)^^ D^22^443^443^6^0^0 X^22^D^443^6^0^ S^23^21^V^departamento^INTEGER^^ D^23^444^444^6^0^0 X^23^D^444^6^0^ S^24^21^V^cod_aux^INTEGER^^ D^24^445^445^6^0^0 X^24^D^445^6^0^ S^25^21^V^cod_sec^INTEGER^^ D^25^446^446^6^0^0 X^25^D^446^6^0^ S^26^21^V^num_doc^CHAR(10)^^ D^26^447^447^6^0^0 X^26^D^447^6^0^ S^27^21^V^debito^DECIMAL(12,2)^^ D^27^448^448^6^0^0 X^27^D^448^6^0^ S^28^21^V^credito^DECIMAL(12,2)^^ D^28^449^449^6^0^0 X^28^D^449^6^0^ S^29^2^V^codigo_a^CHAR(7)^^ D^29^451^451^6^0^0 X^29^l^508^19^0^ X^29^l^506^19^0^ X^29^D^451^6^0^ S^30^2^V^nom_sup^CHAR(45)^^ D^30^454^454^12^0^0 X^30^D^454^12^0^ S^31^2^V^sale^CHAR(1)^^ D^31^455^455^12^0^0 X^31^D^455^12^0^ S^32^2^V^valor2^DECIMAL(12,2)^^ D^32^456^457^12^0^0 X^32^D^456^12^0^ S^33^2^V^valor1^DECIMAL(12,2)^^ D^33^456^457^19^0^0 X^33^D^456^19^0^ S^34^2^V^total_debito^DECIMAL(12,2)^^ D^34^456^457^26^0^0 X^34^r^500^31^0^ X^34^l^500^15^0^ X^34^D^456^26^0^ S^35^2^V^total_credito^DECIMAL(12,2)^^ D^35^456^457^39^0^0 X^35^r^501^31^0^ X^35^l^501^15^0^ X^35^D^456^39^0^ S^36^2^V^t_debito^DECIMAL(12,2)^^ D^36^456^457^53^0^0 X^36^r^559^9^0^ X^36^r^558^19^0^ X^36^r^547^27^0^ X^36^l^547^15^0^ X^36^l^543^13^0^ X^36^D^456^53^0^ S^37^2^V^t_credito^DECIMAL(12,2)^^ D^37^456^457^62^0^0 X^37^r^558^28^0^ X^37^r^548^27^0^ X^37^l^548^15^0^ X^37^l^544^13^0^ X^37^D^456^62^0^ S^38^2^V^total_supl1^DECIMAL(12,2)^^ D^38^457^457^12^0^0 X^38^r^502^31^0^ X^38^l^502^15^0^ X^38^l^477^12^0^ X^38^D^457^12^0^ S^39^2^V^total_supl2^DECIMAL(12,2)^^ D^39^457^457^24^0^0 X^39^r^503^31^0^ X^39^l^503^15^0^ X^39^l^478^12^0^ X^39^D^457^24^0^ S^40^2^V^total1^DECIMAL(12,2)^^ D^40^457^457^36^0^0 X^40^r^558^12^0^ X^40^r^519^25^0^ X^40^l^519^15^0^ X^40^l^516^17^0^ X^40^r^515^13^0^ X^40^D^457^36^0^ S^41^2^V^comp_on^CHAR(3)^^ D^41^458^458^12^0^0 X^41^D^458^12^0^ S^42^2^V^comp_off^CHAR(3)^^ D^42^459^459^12^0^0 X^42^D^459^12^0^ S^43^2^V^doce^CHAR(3)^^ D^43^460^460^12^0^0 X^43^D^460^12^0^ S^44^2^V^doble_on^CHAR(3)^^ D^44^461^461^12^0^0 X^44^D^461^12^0^ S^45^2^V^doble_off^CHAR(3)^^ D^45^462^462^12^0^0 X^45^D^462^12^0^ S^46^2^V^negrillas_on^CHAR(6)^^ D^46^463^463^12^0^0 X^46^D^463^12^0^ S^47^2^V^negrillas_off^CHAR(6)^^ D^47^464^464^12^0^0 X^47^D^464^12^0^ S^48^2^V^hora^CHAR(5)^^ D^48^465^465^12^0^0 X^48^l^473^27^0^ X^48^D^465^12^0^ S^49^2^V^total_sp_d^DECIMAL(12,2)^^ D^49^466^466^12^0^0 X^49^r^530^26^0^ X^49^l^528^17^0^ X^49^l^480^10^0^ X^49^D^466^12^0^ S^50^2^V^total_sp_c^DECIMAL(12,2)^^ D^50^466^466^23^0^0 X^50^r^530^15^0^ X^50^l^529^17^0^ X^50^r^493^23^0^ X^50^l^479^10^0^ X^50^D^466^23^0^ S^51^2^V^total_d^DECIMAL(12,2)^^ D^51^466^466^34^0^0 X^51^r^525^23^0^ X^51^l^523^16^0^ X^51^l^484^12^0^ X^51^D^466^34^0^ S^52^2^V^total_c^DECIMAL(12,2)^^ D^52^466^466^42^0^0 X^52^r^525^15^0^ X^52^l^524^17^0^ X^52^l^485^12^0^ X^52^D^466^42^0^ S^53^2^V^reportDef^base.Report^^ D^53^0^0^0^0^0 S^54^1^F^cpprrp011^^^public D^54^52^200^11^0^0 X^54^c^49^9^0^ X^54^D^52^11^0^ S^55^1^F^main^^^public D^55^40^50^1^0^0 X^55^D^40^1^0^ S^56^1^V^tiempo^CHAR(4)^^private D^56^12^12^10^0^0 X^56^r^116^63^0^ X^56^r^110^66^0^ X^56^l^107^20^0^ X^56^D^12^10^0^ S^57^1^V^p_ano^CHAR(4)^^private D^57^12^12^17^0^0 X^57^r^107^61^0^ X^57^l^99^20^0^ X^57^D^12^17^0^ S^58^1^V^ultimo^SMALLINT^^private D^58^12^12^31^0^0 X^58^r^116^40^0^ X^58^r^115^30^0^ X^58^l^115^21^0^ X^58^l^113^24^0^ X^58^r^112^20^0^ X^58^l^109^44^0^ X^58^D^12^31^0^ S^59^1^V^numero_ent^CHAR(2)^^private D^59^13^13^3^0^0 X^59^r^110^36^0^ X^59^l^98^11^0^ X^59^D^13^3^0^ S^60^1^V^mvto^RECORD^^private D^60^14^18^9^0^0 X^60^r^550^43^0^ X^60^r^196^61^0^ X^60^r^196^47^0^ X^60^r^167^44^0^ X^60^r^167^26^0^ X^60^r^164^22^0^ X^60^r^129^17^0^ X^60^r^121^10^0^ X^60^r^107^35^0^ X^60^r^99^33^0^ X^60^r^93^24^0^ X^60^r^93^8^0^ X^60^l^91^20^0^ X^60^l^89^12^0^ X^60^r^88^8^0^ X^60^r^81^8^0^ X^60^r^66^17^0^ X^60^D^14^9^0^ S^61^60^V^fecha_in^DATE^^ D^61^15^15^4^0^0 X^61^D^15^4^0^ S^62^60^V^fecha_fi^DATE^^ D^62^16^16^4^0^0 X^62^D^16^4^0^ S^63^60^V^cod_sp^SMALLINT^^ D^63^17^17^4^0^0 X^63^D^17^4^0^ S^64^1^V^codigo_sp^STRING^^private D^64^19^19^5^0^0 X^64^r^196^75^0^ X^64^l^194^9^0^ X^64^D^19^5^0^ S^65^1^V^decide^CHAR(1)^^private D^65^20^20^4^0^0 X^65^r^549^14^0^ X^65^r^127^8^0^ X^65^r^68^9^0^ X^65^l^66^24^0^ X^65^D^20^4^0^ S^66^1^V^entrada^CHAR(14)^^private D^66^21^21^4^0^0 X^66^r^550^59^0^ X^66^l^118^23^0^ X^66^l^116^21^0^ X^66^r^73^19^0^ X^66^l^66^31^0^ X^66^D^21^4^0^ S^67^1^V^detalle1^CHAR(30)^^private D^67^22^22^4^0^0 X^67^r^552^43^0^ X^67^l^66^39^0^ X^67^D^22^4^0^ S^68^1^V^prt_mvto11^RECORD^^private D^68^24^39^9^0^0 X^68^r^196^34^0^ X^68^r^194^53^0^ X^68^r^194^19^0^ X^68^r^192^28^0^ X^68^r^191^24^0^ X^68^l^189^35^0^ X^68^r^186^25^0^ X^68^r^185^28^0^ X^68^r^184^24^0^ X^68^l^182^34^0^ X^68^r^179^26^0^ X^68^D^24^9^0^ S^69^68^V^factura^CHAR(11)^^ D^69^25^25^6^0^0 X^69^D^25^6^0^ S^70^68^V^cod_sp^SMALLINT^^ D^70^26^26^6^0^0 X^70^D^26^6^0^ S^71^68^V^cod_sp_sec^SMALLINT^^ D^71^27^27^6^0^0 X^71^D^27^6^0^ S^72^68^V^fecha^DATE^^ D^72^28^28^6^0^0 X^72^D^28^6^0^ S^73^68^V^cuenta_no^CHAR(11)^^ D^73^29^29^6^0^0 X^73^D^29^6^0^ S^74^68^V^departamento^SMALLINT^^ D^74^30^30^6^0^0 X^74^D^30^6^0^ S^75^68^V^cod_aux^SMALLINT^^ D^75^31^31^6^0^0 X^75^D^31^6^0^ S^76^68^V^cod_sec^SMALLINT^^ D^76^32^32^6^0^0 X^76^D^32^6^0^ S^77^68^V^refer^CHAR(10)^^ D^77^33^33^6^0^0 X^77^D^33^6^0^ S^78^68^V^debito^DECIMAL(12,2)^^ D^78^34^34^6^0^0 X^78^D^34^6^0^ S^79^68^V^credito^DECIMAL(12,2)^^ D^79^35^35^6^0^0 X^79^D^35^6^0^ S^80^68^V^id^INTEGER^^ D^80^36^36^6^0^0 X^80^D^36^6^0^ S^81^68^V^nom_sp^CHAR(45)^^ D^81^37^37^6^0^0 X^81^D^37^6^0^ S^82^68^V^valor_fac^DECIMAL(12,2)^^ D^82^38^38^6^0^0 X^82^D^38^6^0^ S^83^1^C^movto^base.SqlHandle^^private D^83^159^159^11^0^0 X^83^u^179^15^0^ X^83^D^159^11^0^ S^84^1^C^busca1^base.SqlHandle^^private D^84^534^534^16^0^0 X^84^u^545^17^0^ X^84^D^534^16^0^ S^85^0^V^status^INTEGER^^builtin F^1^C:\Program Files\FourJs\Genero Studio3.20.09\fgl\lib/fgl.4gl D^85^15^15^9^1^1 X^85^r^75^8^0^ X^85^D^15^9^1^ S^86^0^V^int_flag^INTEGER^^builtin D^86^15^15^17^1^1 X^86^l^141^8^0^ X^86^r^138^6^0^ X^86^l^62^7^0^ X^86^D^15^17^1^ S^87^0^V^handler^om.SaxDocumentHandler^^global F^2^cpprgb000.4gl D^87^4^4^8^2^2 X^87^r^157^46^0^ X^87^l^153^14^0^ X^87^D^4^8^2^ S^88^0^V^r_filename^STRING^^global D^88^5^5^10^2^2 X^88^r^147^42^0^ X^88^l^145^12^0^ X^88^D^5^10^2^ S^89^0^V^r_output^STRING^^global D^89^6^6^11^2^2 X^89^r^151^39^0^ X^89^l^150^46^0^ X^89^D^6^11^2^ S^90^0^V^preview^INTEGER^^global D^90^7^7^11^2^2 X^90^r^152^40^0^ X^90^l^149^14^0^ X^90^D^7^11^2^ S^91^0^V^opt^CHAR(1)^^global D^91^8^8^10^2^2 X^91^D^8^10^2^ S^92^0^V^impresion^CHAR(1)^^global D^92^8^8^14^2^2 X^92^D^8^14^2^ S^93^0^V^verdad^CHAR(1)^^global D^93^8^8^24^2^2 X^93^D^8^24^2^ S^94^0^V^identifica^CHAR(1)^^global D^94^8^8^31^2^2 X^94^D^8^31^2^ S^95^0^V^existe^CHAR(1)^^global D^95^8^8^42^2^2 X^95^D^8^42^2^ S^96^0^V^status_reg^CHAR(1)^^global D^96^9^9^10^2^2 X^96^D^9^10^2^ S^97^0^V^criterio^CHAR(1000)^^global D^97^10^10^10^2^2 X^97^D^10^10^2^ S^98^0^V^selec^CHAR(1000)^^global D^98^11^11^10^2^2 X^98^D^11^10^2^ S^99^0^V^selec2^CHAR(500)^^global D^99^12^12^10^2^2 X^99^D^12^10^2^ S^100^0^V^selec3^CHAR(1000)^^global D^100^13^13^10^2^2 X^100^D^13^10^2^ S^101^0^V^selec4^CHAR(1000)^^global D^101^14^14^10^2^2 X^101^D^14^10^2^ S^102^0^V^opcion^CHAR(2)^^global D^102^15^15^10^2^2 X^102^D^15^10^2^ S^103^0^V^descrip1^CHAR(30)^^global D^103^16^16^10^2^2 X^103^D^16^10^2^ S^104^0^V^descrip2^CHAR(30)^^global D^104^17^17^10^2^2 X^104^D^17^10^2^ S^105^0^V^descrip3^CHAR(30)^^global D^105^18^18^10^2^2 X^105^D^18^10^2^ S^106^0^V^descrip4^CHAR(30)^^global D^106^19^19^10^2^2 X^106^D^19^10^2^ S^107^0^V^nom_sp_tipo^CHAR(60)^^global D^107^20^20^10^2^2 X^107^D^20^10^2^ S^108^0^V^nombre_emp^CHAR(60)^^global D^108^20^20^22^2^2 X^108^D^20^22^2^ S^109^0^V^nom_sup^CHAR(60)^^global D^109^20^20^33^2^2 X^109^D^20^33^2^ S^110^0^V^descrip5^CHAR(65)^^global D^110^21^21^10^2^2 X^110^D^21^10^2^ S^111^0^V^descrip6^CHAR(45)^^global D^111^22^22^10^2^2 X^111^D^22^10^2^ S^112^0^V^nom_cuenta^CHAR(15)^^global D^112^23^23^10^2^2 X^112^D^23^10^2^ S^113^0^V^desc_p^DECIMAL(12,2)^^global D^113^24^24^10^2^2 X^113^D^24^10^2^ S^114^0^V^valor_fac^DECIMAL(12,2)^^global D^114^24^24^17^2^2 X^114^D^24^17^2^ S^115^0^V^pagada^DECIMAL(12,2)^^global D^115^24^24^27^2^2 X^115^D^24^27^2^ S^116^0^V^monto^DECIMAL(12,2)^^global D^116^24^24^34^2^2 X^116^D^24^34^2^ S^117^0^V^pendiente^DECIMAL(12,2)^^global D^117^24^24^40^2^2 X^117^D^24^40^2^ S^118^0^V^valor1^DECIMAL(12,2)^^global D^118^24^24^50^2^2 X^118^D^24^50^2^ S^119^0^V^lj^INTEGER^^global D^119^25^25^10^2^2 X^119^D^25^10^2^ S^120^0^V^k^INTEGER^^global D^120^25^25^13^2^2 X^120^D^25^13^2^ S^121^0^V^tipo_papel^INTEGER^^global D^121^25^25^15^2^2 X^121^r^64^17^0^ X^121^l^63^7^0^ X^121^D^25^15^2^ S^122^0^V^idx^INTEGER^^global D^122^25^25^26^2^2 X^122^D^25^26^2^ S^123^0^V^curr^INTEGER^^global D^123^25^25^31^2^2 X^123^D^25^31^2^ S^124^0^V^curr1^INTEGER^^global D^124^25^25^37^2^2 X^124^D^25^37^2^ S^125^0^V^fila^INTEGER^^global D^125^25^25^44^2^2 X^125^D^25^44^2^ S^126^0^V^scr_l^INTEGER^^global D^126^25^25^50^2^2 X^126^D^25^50^2^ S^127^0^V^usuarios^CHAR(80)^^global D^127^26^26^10^2^2 X^127^r^129^31^0^ X^127^r^46^34^0^ X^127^l^42^30^0^ X^127^D^26^10^2^ S^128^0^V^clave^CHAR(80)^^global D^128^26^26^19^2^2 X^128^r^46^49^0^ X^128^l^43^30^0^ X^128^D^26^19^2^ S^129^0^V^impresor^SMALLINT^^global D^129^27^27^10^2^2 X^129^l^44^30^0^ X^129^D^27^10^2^ S^130^0^V^HANDLER^om.SaxDocumentHandler^^global D^130^28^28^10^2^2 X^130^D^28^10^2^ S^131^0^V^tipo_ncf^SMALLINT^^global D^131^29^29^10^2^2 X^131^D^29^10^2^ S^132^0^V^conteo^SMALLINT^^global D^132^29^29^19^2^2 X^132^D^29^19^2^ S^133^0^V^ncf^CHAR(19)^^global D^133^30^30^10^2^2 X^133^D^30^10^2^ S^134^0^V^descripcion_ncf^CHAR(50)^^global D^134^31^31^10^2^2 X^134^D^31^10^2^ S^135^0^V^normal^CHAR(3)^^global D^135^33^34^10^2^2 X^135^D^33^10^2^ S^136^0^V^negrilla_on^CHAR(3)^^global D^136^33^34^17^2^2 X^136^D^33^17^2^ S^137^0^V^negrillas_of^CHAR(3)^^global D^137^33^34^29^2^2 X^137^D^33^29^2^ S^138^0^V^comp_on^CHAR(3)^^global D^138^33^34^42^2^2 X^138^D^33^42^2^ S^139^0^V^comp_off^CHAR(3)^^global D^139^33^34^50^2^2 X^139^D^33^50^2^ S^140^0^V^doce^CHAR(3)^^global D^140^33^34^59^2^2 X^140^D^33^59^2^ S^141^0^V^doble_on^CHAR(3)^^global D^141^33^34^64^2^2 X^141^D^33^64^2^ S^142^0^V^doble_off^CHAR(3)^^global D^142^33^34^73^2^2 X^142^D^33^73^2^ S^143^0^V^cmd^CHAR(150)^^global D^143^35^35^10^2^2 X^143^D^35^10^2^ S^144^0^V^imprime^CHAR(150)^^global D^144^35^35^14^2^2 X^144^D^35^14^2^ S^145^0^V^copia^CHAR(150)^^global D^145^35^35^22^2^2 X^145^D^35^22^2^ S^146^0^V^archivo^CHAR(80)^^global D^146^35^35^38^2^2 X^146^D^35^38^2^ S^147^0^V^rango^RECORD^^global D^147^37^40^10^2^2 X^147^D^37^10^2^ S^148^147^V^fecha_ini^DATE^^ D^148^38^38^10^2^2 X^148^D^38^10^2^ S^149^147^V^fecha_fin^DATE^^ D^149^39^39^10^2^2 X^149^D^39^10^2^ S^150^0^V^numero_msg^SMALLINT^decomarmol.msgtable.cod_msg^global D^150^42^42^10^2^2 X^150^r^140^13^0^ X^150^l^139^8^0^ X^150^r^123^17^0^ X^150^l^122^12^0^ X^150^r^95^17^0^ X^150^l^94^12^0^ X^150^r^83^17^0^ X^150^l^82^12^0^ X^150^r^77^17^0^ X^150^l^76^12^0^ X^150^D^42^10^2^ S^151^0^V^factura^RECORD^^global D^151^44^54^10^2^2 X^151^D^44^10^2^ S^152^151^V^cod_sp^SMALLINT^^ D^152^45^45^5^2^2 X^152^D^45^5^2^ S^153^151^V^cod_sp_sec^SMALLINT^^ D^153^46^46^5^2^2 X^153^D^46^5^2^ S^154^151^V^num_doc^CHAR(13)^^ D^154^47^47^5^2^2 X^154^D^47^5^2^ S^155^151^V^fecha_orig^DATE^^ D^155^48^48^5^2^2 X^155^D^48^5^2^ S^156^151^V^fecha_proc^DATE^^ D^156^49^49^5^2^2 X^156^D^49^5^2^ S^157^151^V^valor_fac^DECIMAL(12,2)^^ D^157^50^50^5^2^2 X^157^D^50^5^2^ S^158^151^V^tipo_oc^CHAR(2)^^ D^158^51^51^5^2^2 X^158^D^51^5^2^ S^159^151^V^orden_no^INTEGER^^ D^159^52^52^5^2^2 X^159^D^52^5^2^ S^160^151^V^detalle^CHAR(30)^^ D^160^53^53^5^2^2 X^160^D^53^5^2^ S^161^0^V^recibo^RECORD^^global D^161^55^64^10^2^2 X^161^D^55^10^2^ S^162^161^V^tipo_doc^VARCHAR(2)^decomarmol.cptb00001.tipo_doc^ D^162^56^56^6^2^2 X^162^D^56^6^2^ S^163^161^V^num_doc^VARCHAR(11)^decomarmol.cptb00001.num_doc^ D^163^57^57^6^2^2 X^163^D^57^6^2^ S^164^161^V^cta_ctble^VARCHAR(10)^decomarmol.cptb00001.cta_ctble^ D^164^58^58^6^2^2 X^164^D^58^6^2^ S^165^161^V^cod_sp^SMALLINT^decomarmol.cptb00001.cod_sp^ D^165^59^59^6^2^2 X^165^D^59^6^2^ S^166^161^V^cod_sp_sec^SMALLINT^decomarmol.cptb00001.cod_sp_sec^ D^166^60^60^6^2^2 X^166^D^60^6^2^ S^167^161^V^fecha_orig^DATE^^ D^167^61^61^6^2^2 X^167^D^61^6^2^ S^168^161^V^detalle^VARCHAR(60)^decomarmol.cptb00001.detalle^ D^168^62^62^6^2^2 X^168^D^62^6^2^ S^169^161^V^monto^DECIMAL(12,2)^^ D^169^63^63^6^2^2 X^169^D^63^6^2^ S^170^0^V^arr_recibo^DYNAMIC ARRAY OF RECORD^^global D^170^66^70^10^2^2 X^170^D^66^10^2^ S^171^170^V^aplica_a^VARCHAR(11)^^ D^171^67^67^8^2^2 X^171^D^67^8^2^ S^172^170^V^valor_pen^DECIMAL(12,2)^^ D^172^68^68^8^2^2 X^172^D^68^8^2^ S^173^170^V^valor_pag^DECIMAL(12,2)^^ D^173^69^69^8^2^2 X^173^D^69^8^2^ S^174^0^V^pagar^ARRAY[200] OF RECORD^^global D^174^72^75^10^2^2 X^174^D^72^10^2^ S^175^174^V^aplica_a^VARCHAR(10)^decomarmol.cptb00001.aplica_a^ D^175^73^73^6^2^2 X^175^D^73^6^2^ S^176^174^V^valor^DECIMAL(12,2)^decomarmol.cptb00001.valor^ D^176^74^74^6^2^2 X^176^D^74^6^2^ S^177^0^V^aplica_wd^ARRAY[100] OF RECORD^^global D^177^77^80^10^2^2 X^177^D^77^10^2^ S^178^177^V^aplica_a^VARCHAR(11)^^ D^178^78^78^8^2^2 X^178^D^78^8^2^ S^179^177^V^pendiente^DECIMAL(12,2)^^ D^179^79^79^8^2^2 X^179^D^79^8^2^ S^180^0^V^arr_suplid^ARRAY[200] OF RECORD^^global D^180^82^86^10^2^2 X^180^D^82^10^2^ S^181^180^V^cod_sp^SMALLINT^decomarmol.cotb00001.cod_sp^ D^181^83^83^10^2^2 X^181^D^83^10^2^ S^182^180^V^cod_sp_sec^SMALLINT^decomarmol.cotb00001.cod_sp_sec^ D^182^84^84^10^2^2 X^182^D^84^10^2^ S^183^180^V^nom_sp^VARCHAR(41)^decomarmol.cotb00001.nom_sp^ D^183^85^85^10^2^2 X^183^D^85^10^2^ S^184^0^V^relacion^RECORD^^global D^184^88^88^10^2^2 X^184^D^88^10^2^ S^185^184^V^cod_sp^SMALLINT^decomarmol.cptb00002.cod_sp^ D^185^0^0^0^0^0 S^186^184^V^cod_sp_sec^SMALLINT^decomarmol.cptb00002.cod_sp_sec^ D^186^0^0^0^0^0 S^187^184^V^cuenta_no^CHAR(8)^decomarmol.cptb00002.cuenta_no^ D^187^0^0^0^0^0 S^188^184^V^num_doc^CHAR(10)^decomarmol.cptb00002.num_doc^ D^188^0^0^0^0^0 S^189^184^V^fecha^DATE^decomarmol.cptb00002.fecha^ D^189^0^0^0^0^0 S^190^184^V^valor^DECIMAL(12,2)^decomarmol.cptb00002.valor^ D^190^0^0^0^0^0 S^191^184^V^status_t^CHAR(1)^decomarmol.cptb00002.status_t^ D^191^0^0^0^0^0 S^192^184^V^us_crea^CHAR(9)^decomarmol.cptb00002.us_crea^ D^192^0^0^0^0^0 S^193^184^V^fech_crea^DATE^decomarmol.cptb00002.fech_crea^ D^193^0^0^0^0^0 S^194^184^V^us_mod^CHAR(9)^decomarmol.cptb00002.us_mod^ D^194^0^0^0^0^0 S^195^184^V^fech_mod^DATE^decomarmol.cptb00002.fech_mod^ D^195^0^0^0^0^0 S^196^0^V^rec_pago^RECORD^^global D^196^89^89^10^2^2 X^196^D^89^10^2^ S^197^196^V^tipo_doc^VARCHAR(2)^decomarmol.cptb00001.tipo_doc^ D^197^0^0^0^0^0 S^198^196^V^num_doc^VARCHAR(11)^decomarmol.cptb00001.num_doc^ D^198^0^0^0^0^0 S^199^196^V^cod_sp^SMALLINT^decomarmol.cptb00001.cod_sp^ D^199^0^0^0^0^0 S^200^196^V^cod_sp_sec^SMALLINT^decomarmol.cptb00001.cod_sp_sec^ D^200^0^0^0^0^0 S^201^196^V^fecha_orig^DATE^decomarmol.cptb00001.fecha_orig^ D^201^0^0^0^0^0 S^202^196^V^fecha_proc^DATE^decomarmol.cptb00001.fecha_proc^ D^202^0^0^0^0^0 S^203^196^V^orden_no^INTEGER^decomarmol.cptb00001.orden_no^ D^203^0^0^0^0^0 S^204^196^V^tipo^VARCHAR(2)^decomarmol.cptb00001.tipo^ D^204^0^0^0^0^0 S^205^196^V^aplica_a^VARCHAR(10)^decomarmol.cptb00001.aplica_a^ D^205^0^0^0^0^0 S^206^196^V^cta_ctble^VARCHAR(10)^decomarmol.cptb00001.cta_ctble^ D^206^0^0^0^0^0 S^207^196^V^valor^DECIMAL(12,2)^decomarmol.cptb00001.valor^ D^207^0^0^0^0^0 S^208^196^V^detalle^VARCHAR(60)^decomarmol.cptb00001.detalle^ D^208^0^0^0^0^0 S^209^196^V^status_t^VARCHAR(1)^decomarmol.cptb00001.status_t^ D^209^0^0^0^0^0 S^210^196^V^us_crea^CHAR(50)^decomarmol.cptb00001.us_crea^ D^210^0^0^0^0^0 S^211^196^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.cptb00001.fech_crea^ D^211^0^0^0^0^0 S^212^196^V^us_mod^CHAR(50)^decomarmol.cptb00001.us_mod^ D^212^0^0^0^0^0 S^213^196^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.cptb00001.fech_mod^ D^213^0^0^0^0^0 S^214^196^V^codigo_isr^SMALLINT^decomarmol.cptb00001.codigo_isr^ D^214^0^0^0^0^0 S^215^0^V^suplid_bas^RECORD^^global D^215^90^90^10^2^2 X^215^D^90^10^2^ S^216^215^V^cod_sp^SMALLINT^decomarmol.cotb00001.cod_sp^ D^216^0^0^0^0^0 S^217^215^V^cod_sp_sec^SMALLINT^decomarmol.cotb00001.cod_sp_sec^ D^217^0^0^0^0^0 S^218^215^V^nom_sp^VARCHAR(41)^decomarmol.cotb00001.nom_sp^ D^218^0^0^0^0^0 S^219^215^V^dir_sp^VARCHAR(60)^decomarmol.cotb00001.dir_sp^ D^219^0^0^0^0^0 S^220^215^V^ciu_sp^VARCHAR(30)^decomarmol.cotb00001.ciu_sp^ D^220^0^0^0^0^0 S^221^215^V^cod_pais^VARCHAR(3)^decomarmol.cotb00001.cod_pais^ D^221^0^0^0^0^0 S^222^215^V^tel_sp^VARCHAR(25)^decomarmol.cotb00001.tel_sp^ D^222^0^0^0^0^0 S^223^215^V^area_sp^VARCHAR(10)^decomarmol.cotb00001.area_sp^ D^223^0^0^0^0^0 S^224^215^V^fax_sp^VARCHAR(25)^decomarmol.cotb00001.fax_sp^ D^224^0^0^0^0^0 S^225^215^V^cont_sp^VARCHAR(30)^decomarmol.cotb00001.cont_sp^ D^225^0^0^0^0^0 S^226^215^V^term_sp^SMALLINT^decomarmol.cotb00001.term_sp^ D^226^0^0^0^0^0 S^227^215^V^status_t^VARCHAR(1)^decomarmol.cotb00001.status_t^ D^227^0^0^0^0^0 S^228^215^V^us_crea^VARCHAR(50)^decomarmol.cotb00001.us_crea^ D^228^0^0^0^0^0 S^229^215^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.cotb00001.fech_crea^ D^229^0^0^0^0^0 S^230^215^V^us_mod^VARCHAR(50)^decomarmol.cotb00001.us_mod^ D^230^0^0^0^0^0 S^231^215^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.cotb00001.fech_mod^ D^231^0^0^0^0^0 S^232^215^V^tipo_doc^VARCHAR(8)^decomarmol.cotb00001.tipo_doc^ D^232^0^0^0^0^0 S^233^215^V^rnc^VARCHAR(15)^decomarmol.cotb00001.rnc^ D^233^0^0^0^0^0 S^234^215^V^cuenta_no^VARCHAR(8)^decomarmol.cotb00001.cuenta_no^ D^234^0^0^0^0^0 S^235^0^V^suplid_dir^RECORD^^global D^235^91^91^10^2^2 X^235^D^91^10^2^ S^236^235^V^cod_sp^SMALLINT^decomarmol.cotb00001.cod_sp^ D^236^0^0^0^0^0 S^237^235^V^cod_sp_sec^SMALLINT^decomarmol.cotb00001.cod_sp_sec^ D^237^0^0^0^0^0 S^238^235^V^nom_sp^VARCHAR(41)^decomarmol.cotb00001.nom_sp^ D^238^0^0^0^0^0 S^239^235^V^dir_sp^VARCHAR(60)^decomarmol.cotb00001.dir_sp^ D^239^0^0^0^0^0 S^240^235^V^ciu_sp^VARCHAR(30)^decomarmol.cotb00001.ciu_sp^ D^240^0^0^0^0^0 S^241^235^V^cod_pais^VARCHAR(3)^decomarmol.cotb00001.cod_pais^ D^241^0^0^0^0^0 S^242^235^V^tel_sp^VARCHAR(25)^decomarmol.cotb00001.tel_sp^ D^242^0^0^0^0^0 S^243^235^V^area_sp^VARCHAR(10)^decomarmol.cotb00001.area_sp^ D^243^0^0^0^0^0 S^244^235^V^fax_sp^VARCHAR(25)^decomarmol.cotb00001.fax_sp^ D^244^0^0^0^0^0 S^245^235^V^cont_sp^VARCHAR(30)^decomarmol.cotb00001.cont_sp^ D^245^0^0^0^0^0 S^246^235^V^term_sp^SMALLINT^decomarmol.cotb00001.term_sp^ D^246^0^0^0^0^0 S^247^235^V^status_t^VARCHAR(1)^decomarmol.cotb00001.status_t^ D^247^0^0^0^0^0 S^248^235^V^us_crea^VARCHAR(50)^decomarmol.cotb00001.us_crea^ D^248^0^0^0^0^0 S^249^235^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.cotb00001.fech_crea^ D^249^0^0^0^0^0 S^250^235^V^us_mod^VARCHAR(50)^decomarmol.cotb00001.us_mod^ D^250^0^0^0^0^0 S^251^235^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.cotb00001.fech_mod^ D^251^0^0^0^0^0 S^252^235^V^tipo_doc^VARCHAR(8)^decomarmol.cotb00001.tipo_doc^ D^252^0^0^0^0^0 S^253^235^V^rnc^VARCHAR(15)^decomarmol.cotb00001.rnc^ D^253^0^0^0^0^0 S^254^235^V^cuenta_no^VARCHAR(8)^decomarmol.cotb00001.cuenta_no^ D^254^0^0^0^0^0 S^255^0^V^p_companias^RECORD^^global D^255^92^92^10^2^2 X^255^r^492^13^0^ X^255^r^47^19^0^ X^255^D^92^10^2^ S^256^255^V^cod_comp^CHAR(5)^decomarmol.companias.cod_comp^ D^256^0^0^0^0^0 S^257^255^V^nombre^CHAR(40)^decomarmol.companias.nombre^ D^257^0^0^0^0^0 S^258^255^V^rnc^CHAR(30)^decomarmol.companias.rnc^ D^258^0^0^0^0^0 S^259^255^V^direccion^CHAR(40)^decomarmol.companias.direccion^ D^259^0^0^0^0^0 S^260^255^V^telefono^CHAR(15)^decomarmol.companias.telefono^ D^260^0^0^0^0^0 S^261^255^V^fax^CHAR(15)^decomarmol.companias.fax^ D^261^0^0^0^0^0 S^262^255^V^administrador^CHAR(40)^decomarmol.companias.administrador^ D^262^0^0^0^0^0 S^263^255^V^email^CHAR(100)^decomarmol.companias.email^ D^263^0^0^0^0^0 S^264^255^V^paginaweb^CHAR(100)^decomarmol.companias.paginaweb^ D^264^0^0^0^0^0 S^265^255^V^direccion1^CHAR(100)^decomarmol.companias.direccion1^ D^265^0^0^0^0^0 S^266^255^V^telefono1^CHAR(15)^decomarmol.companias.telefono1^ D^266^0^0^0^0^0 S^267^255^V^fax1^CHAR(15)^decomarmol.companias.fax1^ D^267^0^0^0^0^0 S^268^255^V^status_t^CHAR(1)^decomarmol.companias.status_t^ D^268^0^0^0^0^0 S^269^255^V^us_crea^CHAR(9)^decomarmol.companias.us_crea^ D^269^0^0^0^0^0 S^270^255^V^fech_crea^DATE^decomarmol.companias.fech_crea^ D^270^0^0^0^0^0 S^271^255^V^us_mod^CHAR(9)^decomarmol.companias.us_mod^ D^271^0^0^0^0^0 S^272^255^V^fech_mod^DATE^decomarmol.companias.fech_mod^ D^272^0^0^0^0^0 S^273^255^V^codnomina^CHAR(30)^decomarmol.companias.codnomina^ D^273^0^0^0^0^0 S^274^255^V^cuenta_no_inv^CHAR(10)^decomarmol.companias.cuenta_no_inv^ D^274^0^0^0^0^0 S^275^255^V^dias_vence_reservas^SMALLINT^decomarmol.companias.dias_vence_reservas^ D^275^0^0^0^0^0 S^276^0^V^bandera^SMALLINT^^global D^276^94^94^8^2^2 X^276^r^130^12^0^ X^276^l^129^51^0^ X^276^l^128^12^0^ X^276^D^94^8^2^ S^277^0^V^otrab^SMALLINT^^global D^277^95^95^8^2^2 X^277^D^95^8^2^ S^278^0^V^p_fechas^DATE^^global D^278^96^96^8^2^2 X^278^D^96^8^2^ S^279^0^V^comp_fech^DATE^^global D^279^97^97^8^2^2 X^279^D^97^8^2^ S^280^0^V^comp_fech1^DATE^^global D^280^97^97^18^2^2 X^280^D^97^18^2^ S^281^0^V^mes_control^CHAR(2)^^global D^281^98^98^8^2^2 X^281^D^98^8^2^ S^282^0^V^mes_calc^SMALLINT^^global D^282^99^99^8^2^2 X^282^D^99^8^2^ S^283^0^V^dia^SMALLINT^^global D^283^99^99^17^2^2 X^283^D^99^17^2^ S^284^0^V^fecha_c^DATE^^global D^284^100^100^8^2^2 X^284^D^100^8^2^ S^285^0^V^c_ano^CHAR(4)^^global D^285^101^101^8^2^2 X^285^D^101^8^2^ S^286^0^V^a_ano^CHAR(4)^^global D^286^101^101^14^2^2 X^286^D^101^14^2^ S^287^0^V^cuentas1^ARRAY[300] OF RECORD^^global D^287^103^107^8^2^2 X^287^D^103^8^2^ S^288^287^V^cuenta_no^VARCHAR(8)^decomarmol.cgtb00001.cuenta_no^ D^288^104^104^4^2^2 X^288^D^104^4^2^ S^289^287^V^descripcion^VARCHAR(50)^decomarmol.cgtb00001.descripcion^ D^289^105^105^4^2^2 X^289^D^105^4^2^ S^290^287^V^nivel^SMALLINT^decomarmol.cgtb00001.nivel^ D^290^106^106^4^2^2 X^290^D^106^4^2^ S^291^0^F^fgl_report_commitCurrentSettings^^^extern X^291^c^153^24^0^ S^292^0^F^fgl_report_selectPreview^^^extern X^292^c^152^15^0^ S^293^0^F^fgl_report_selectDevice^^^extern X^293^c^151^15^0^ S^294^0^F^seleccionarsalida^^^extern X^294^c^150^16^0^ S^295^0^F^fgl_report_loadCurrentSettings^^^extern X^295^c^147^11^0^ S^296^0^F^prd^^^extern X^296^c^129^13^0^ S^297^0^F^msg^^^extern X^297^c^140^9^0^ X^297^c^131^17^0^ X^297^c^123^13^0^ X^297^c^95^13^0^ X^297^c^83^13^0^ X^297^c^77^13^0^ S^298^0^F^msgrp000^^^extern X^298^c^64^8^0^ T^10^39^d^0^0^DEFINE T^14^18^d^0^0^RECORD T^24^39^d^0^0^RECORD T^40^50^f^0^0^MAIN T^52^200^f^0^0^FUNCTION T^66^136^i^0^0^INPUT T^67^70^i^0^0^ T^68^70^c^0^0^IF T^69^69^c^0^0^THEN T^69^69^g^0^0^EXIT INPUT T^71^79^i^0^0^ T^75^79^c^0^0^IF T^76^78^c^0^0^THEN T^80^85^i^0^0^ T^81^85^c^0^0^IF T^82^84^c^0^0^THEN T^87^118^i^0^0^ T^88^90^c^0^0^IF T^89^89^c^0^0^THEN T^93^97^c^0^0^IF T^94^96^c^0^0^THEN T^112^114^c^0^0^IF T^113^113^c^0^0^THEN T^120^125^i^0^0^ T^121^125^c^0^0^IF T^122^124^c^0^0^THEN T^126^135^i^0^0^ T^127^135^c^0^0^IF T^128^133^c^0^0^THEN T^130^133^c^0^0^IF T^131^132^c^0^0^THEN T^138^143^c^0^0^IF T^139^142^c^0^0^THEN T^147^156^c^0^0^IF T^149^153^c^0^0^THEN T^179^197^l^0^0^FOREACH T^423^562^f^0^0^REPORT T^424^466^d^0^0^DEFINE T^424^439^d^0^0^RECORD T^442^450^d^0^0^RECORD T^472^473^a^0^0^FIRST PAGE HEADER T^476^480^a^0^0^BEFORE GROUP OF 20 T^483^485^a^0^0^BEFORE GROUP OF 4 T^490^519^a^0^0^ON EVERY ROW x^492^0^ p^r^3 p^r^255 p^v^18 p^v^19 p^v^20 T^494^496^c^0^0^IF T^495^495^c^0^0^THEN T^497^499^c^0^0^IF T^498^498^c^0^0^THEN T^505^509^c^0^0^IF T^506^506^c^0^0^THEN T^507^508^c^0^0^ELSE T^515^517^c^0^0^IF T^516^516^c^0^0^THEN T^521^525^a^0^0^AFTER GROUP OF 4 x^525^0^ p^v^52 p^v^51 T^526^530^a^0^0^AFTER GROUP OF 20 x^530^0^ p^v^50 p^v^49 T^531^559^a^0^0^ON LAST ROW T^545^556^l^0^0^FOREACH T^549^554^c^0^0^IF T^550^552^c^0^0^THEN x^555^0^ p^r^21 x^558^0^ p^v^40 p^v^36 p^v^37