S^1^0^M^edprrp004bk^MODULE^^ S^2^1^F^pantalla^^^public F^0^C:\Users\luism\OneDrive\Documentos\genero fuentes\Nueva carpeta\decomarmol\MARMOTECH\PROYECTO\cgdir\edprrp004bk.4gl D^2^446^463^10^0^0 X^2^D^446^10^0^ S^3^2^V^fecha^CHAR(8)^^ D^3^447^447^12^0^0 X^3^r^457^13^0^ X^3^l^453^9^0^ X^3^D^447^12^0^ S^4^2^V^hora^CHAR(5)^^ D^4^448^448^12^0^0 X^4^r^459^13^0^ X^4^l^454^9^0^ X^4^D^448^12^0^ S^5^1^R^entrada04^^^public D^5^465^686^8^0^0 X^5^D^465^8^0^ X^5^c^254^19^0^finish X^5^c^251^27^0^output X^5^c^202^20^0^start S^6^5^P^x^RECORD^^ D^6^466^466^12^0^0 X^6^r^653^29^0^ X^6^r^624^29^0^ X^6^r^593^36^0^ X^6^r^569^35^0^ X^6^l^465^18^0^ X^6^D^466^12^0^ S^7^6^P^cod_cia^SMALLINT^decomarmol.vetb00002.cod_cia^ D^7^0^0^0^0^0 X^7^D^466^12^0^ S^8^6^P^factura^INTEGER^decomarmol.vetb00002.factura^ D^8^0^0^0^0^0 X^8^D^466^12^0^ S^9^6^P^fecha_factura^DATE^decomarmol.vetb00002.fecha_factura^ D^9^0^0^0^0^0 X^9^D^466^12^0^ S^10^6^P^ventas^VARCHAR(1)^decomarmol.vetb00002.ventas^ D^10^0^0^0^0^0 X^10^D^466^12^0^ S^11^6^P^zona^VARCHAR(3)^decomarmol.vetb00002.zona^ D^11^0^0^0^0^0 X^11^D^466^12^0^ S^12^6^P^orden^INTEGER^decomarmol.vetb00002.orden^ D^12^0^0^0^0^0 X^12^D^466^12^0^ S^13^6^P^fecha_orden^DATE^decomarmol.vetb00002.fecha_orden^ D^13^0^0^0^0^0 X^13^D^466^12^0^ S^14^6^P^conduce^INTEGER^decomarmol.vetb00002.conduce^ D^14^0^0^0^0^0 X^14^D^466^12^0^ S^15^6^P^fecha_conduce^DATE^decomarmol.vetb00002.fecha_conduce^ D^15^0^0^0^0^0 X^15^D^466^12^0^ S^16^6^P^tipo_cliente^SMALLINT^decomarmol.vetb00002.tipo_cliente^ D^16^0^0^0^0^0 X^16^D^466^12^0^ S^17^6^P^sec_cliente^INTEGER^decomarmol.vetb00002.sec_cliente^ D^17^0^0^0^0^0 X^17^D^466^12^0^ S^18^6^P^cod_vend^INTEGER^decomarmol.vetb00002.cod_vend^ D^18^0^0^0^0^0 X^18^D^466^12^0^ S^19^6^P^sec_vend^SMALLINT^decomarmol.vetb00002.sec_vend^ D^19^0^0^0^0^0 X^19^D^466^12^0^ S^20^6^P^cond_pago^SMALLINT^decomarmol.vetb00002.cond_pago^ D^20^0^0^0^0^0 X^20^D^466^12^0^ S^21^6^P^porc_itbi^DECIMAL(5,2)^decomarmol.vetb00002.porc_itbi^ D^21^0^0^0^0^0 X^21^D^466^12^0^ S^22^6^P^porc_desc^DECIMAL(8,2)^decomarmol.vetb00002.porc_desc^ D^22^0^0^0^0^0 X^22^D^466^12^0^ S^23^6^P^prima_us^DECIMAL(6,2)^decomarmol.vetb00002.prima_us^ D^23^0^0^0^0^0 X^23^D^466^12^0^ S^24^6^P^sub_total^DECIMAL(10,2)^decomarmol.vetb00002.sub_total^ D^24^0^0^0^0^0 X^24^r^593^38^0^ X^24^D^466^12^0^ S^25^6^P^monto_desc^DECIMAL(10,2)^decomarmol.vetb00002.monto_desc^ D^25^0^0^0^0^0 X^25^r^569^37^0^ X^25^D^466^12^0^ S^26^6^P^monto_itbi^DECIMAL(10,2)^decomarmol.vetb00002.monto_itbi^ D^26^0^0^0^0^0 X^26^r^653^31^0^ X^26^D^466^12^0^ S^27^6^P^neto^DECIMAL(10,2)^decomarmol.vetb00002.neto^ D^27^0^0^0^0^0 X^27^r^624^31^0^ X^27^D^466^12^0^ S^28^6^P^fecha_embarque^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fecha_embarque^ D^28^0^0^0^0^0 X^28^D^466^12^0^ S^29^6^P^status_impresion^VARCHAR(1)^decomarmol.vetb00002.status_impresion^ D^29^0^0^0^0^0 X^29^D^466^12^0^ S^30^6^P^status_t^VARCHAR(1)^decomarmol.vetb00002.status_t^ D^30^0^0^0^0^0 X^30^D^466^12^0^ S^31^6^P^us_crea^VARCHAR(50)^decomarmol.vetb00002.us_crea^ D^31^0^0^0^0^0 X^31^D^466^12^0^ S^32^6^P^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fech_crea^ D^32^0^0^0^0^0 X^32^D^466^12^0^ S^33^6^P^us_mod^VARCHAR(50)^decomarmol.vetb00002.us_mod^ D^33^0^0^0^0^0 X^33^D^466^12^0^ S^34^6^P^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fech_mod^ D^34^0^0^0^0^0 X^34^D^466^12^0^ S^35^6^P^documento^CHAR(15)^decomarmol.vetb00002.documento^ D^35^0^0^0^0^0 X^35^D^466^12^0^ S^36^6^P^placa_transporte^CHAR(25)^decomarmol.vetb00002.placa_transporte^ D^36^0^0^0^0^0 X^36^D^466^12^0^ S^37^6^P^bodega^SMALLINT^decomarmol.vetb00002.bodega^ D^37^0^0^0^0^0 X^37^D^466^12^0^ S^38^6^P^cotizacion_no^INTEGER^decomarmol.vetb00002.cotizacion_no^ D^38^0^0^0^0^0 X^38^D^466^12^0^ S^39^6^P^tipo_factura^CHAR(20)^decomarmol.vetb00002.tipo_factura^ D^39^0^0^0^0^0 X^39^D^466^12^0^ S^40^6^P^documento_ref^CHAR(25)^decomarmol.vetb00002.documento_ref^ D^40^0^0^0^0^0 X^40^D^466^12^0^ S^41^6^P^descripcion_documento^VARCHAR(100)^decomarmol.vetb00002.descripcion_documento^ D^41^0^0^0^0^0 X^41^D^466^12^0^ S^42^5^P^v^RECORD^^ D^42^467^467^12^0^0 X^42^l^465^20^0^ X^42^D^467^12^0^ S^43^42^P^cod_cia^SMALLINT^decomarmol.vetb00003.cod_cia^ D^43^0^0^0^0^0 X^43^D^467^12^0^ S^44^42^P^factura^INTEGER^decomarmol.vetb00003.factura^ D^44^0^0^0^0^0 X^44^D^467^12^0^ S^45^42^P^area^SMALLINT^decomarmol.vetb00003.area^ D^45^0^0^0^0^0 X^45^D^467^12^0^ S^46^42^P^cod_n^SMALLINT^decomarmol.vetb00003.cod_n^ D^46^0^0^0^0^0 X^46^D^467^12^0^ S^47^42^P^cod_grupo^SMALLINT^decomarmol.vetb00003.cod_grupo^ D^47^0^0^0^0^0 X^47^D^467^12^0^ S^48^42^P^cod_tipo^SMALLINT^decomarmol.vetb00003.cod_tipo^ D^48^0^0^0^0^0 X^48^D^467^12^0^ S^49^42^P^cod_sec^SMALLINT^decomarmol.vetb00003.cod_sec^ D^49^0^0^0^0^0 X^49^D^467^12^0^ S^50^42^P^cantidad^DECIMAL(12,5)^decomarmol.vetb00003.cantidad^ D^50^0^0^0^0^0 X^50^D^467^12^0^ S^51^42^P^cantidad_2^DECIMAL(14,2)^decomarmol.vetb00003.cantidad_2^ D^51^0^0^0^0^0 X^51^D^467^12^0^ S^52^42^P^bonificacion^DECIMAL(12,2)^decomarmol.vetb00003.bonificacion^ D^52^0^0^0^0^0 X^52^D^467^12^0^ S^53^42^P^precio^DECIMAL(12,2)^decomarmol.vetb00003.precio^ D^53^0^0^0^0^0 X^53^D^467^12^0^ S^54^42^P^status_t^CHAR(1)^decomarmol.vetb00003.status_t^ D^54^0^0^0^0^0 X^54^D^467^12^0^ S^55^42^P^us_crea^CHAR(50)^decomarmol.vetb00003.us_crea^ D^55^0^0^0^0^0 X^55^D^467^12^0^ S^56^42^P^fech_crea^DATE^decomarmol.vetb00003.fech_crea^ D^56^0^0^0^0^0 X^56^D^467^12^0^ S^57^42^P^us_mod^CHAR(50)^decomarmol.vetb00003.us_mod^ D^57^0^0^0^0^0 X^57^D^467^12^0^ S^58^42^P^fech_mod^DATE^decomarmol.vetb00003.fech_mod^ D^58^0^0^0^0^0 X^58^D^467^12^0^ S^59^42^P^bodega^SMALLINT^decomarmol.vetb00003.bodega^ D^59^0^0^0^0^0 X^59^D^467^12^0^ S^60^42^P^id_kit^INTEGER^decomarmol.vetb00003.id_kit^ D^60^0^0^0^0^0 X^60^D^467^12^0^ S^61^5^P^b^RECORD^^ D^61^468^486^12^0^0 X^61^l^465^22^0^ X^61^D^468^12^0^ S^62^61^P^bodega^SMALLINT^decomarmol.iptb00002.bodega^ D^62^469^469^5^0^0 X^62^D^469^5^0^ S^63^61^P^cod_cia^SMALLINT^decomarmol.iptb00002.cod_cia^ D^63^470^470^5^0^0 X^63^D^470^5^0^ S^64^61^P^cod_grupo^SMALLINT^decomarmol.iptb00002.cod_grupo^ D^64^471^471^5^0^0 X^64^D^471^5^0^ S^65^61^P^cod_n^SMALLINT^decomarmol.iptb00002.cod_n^ D^65^472^472^5^0^0 X^65^D^472^5^0^ S^66^61^P^cod_sec^SMALLINT^decomarmol.iptb00002.cod_sec^ D^66^473^473^5^0^0 X^66^D^473^5^0^ S^67^61^P^cod_tipo^SMALLINT^decomarmol.iptb00002.cod_tipo^ D^67^474^474^5^0^0 X^67^D^474^5^0^ S^68^61^P^codid^INTEGER^decomarmol.iptb00002.codid^ D^68^475^475^5^0^0 X^68^D^475^5^0^ S^69^61^P^control_existencia^VARCHAR(2)^decomarmol.iptb00002.control_existencia^ D^69^476^476^5^0^0 X^69^D^476^5^0^ S^70^61^P^control_itbis^VARCHAR(2)^decomarmol.iptb00002.control_itbis^ D^70^477^477^5^0^0 X^70^D^477^5^0^ S^71^61^P^descrip_esp^VARCHAR(180)^decomarmol.iptb00002.descrip_esp^ D^71^478^478^5^0^0 X^71^D^478^5^0^ S^72^61^P^descrip_ing^VARCHAR(80)^decomarmol.iptb00002.descrip_ing^ D^72^479^479^5^0^0 X^72^D^479^5^0^ S^73^61^P^nomenclatura^VARCHAR(50)^decomarmol.iptb00002.nomenclatura^ D^73^480^480^5^0^0 X^73^D^480^5^0^ S^74^61^P^porc_desc^DECIMAL(12,2)^decomarmol.iptb00002.porc_desc^ D^74^481^481^5^0^0 X^74^D^481^5^0^ S^75^61^P^status_t^CHAR(1)^decomarmol.iptb00002.status_t^ D^75^482^482^5^0^0 X^75^D^482^5^0^ S^76^61^P^unidad_med^VARCHAR(50)^decomarmol.iptb00002.unidad_med^ D^76^483^483^5^0^0 X^76^D^483^5^0^ S^77^61^P^us_crea^VARCHAR(50)^decomarmol.iptb00002.us_crea^ D^77^484^484^5^0^0 X^77^D^484^5^0^ S^78^61^P^us_mod^VARCHAR(50)^decomarmol.iptb00002.us_mod^ D^78^485^485^5^0^0 X^78^D^485^5^0^ S^79^5^P^f^RECORD^^ D^79^487^487^12^0^0 X^79^r^606^69^0^ X^79^r^606^57^0^ X^79^r^602^28^0^ X^79^r^601^28^0^ X^79^r^592^9^0^ X^79^r^585^69^0^ X^79^r^585^57^0^ X^79^r^581^28^0^ X^79^r^580^28^0^ X^79^r^568^11^0^ X^79^r^561^47^0^ X^79^l^465^24^0^ X^79^D^487^12^0^ S^80^79^P^cuenta_no^CHAR(10)^decomarmol.cgtb00034.cuenta_no^ D^80^0^0^0^0^0 X^80^r^606^59^0^ X^80^r^601^30^0^ X^80^r^585^59^0^ X^80^r^580^30^0^ X^80^r^561^49^0^ X^80^D^487^12^0^ S^81^79^P^departamento^SMALLINT^decomarmol.cgtb00034.departamento^ D^81^0^0^0^0^0 X^81^r^606^71^0^ X^81^r^602^30^0^ X^81^r^585^71^0^ X^81^r^581^30^0^ X^81^D^487^12^0^ S^82^79^P^cod_n^SMALLINT^decomarmol.cgtb00034.cod_n^ D^82^0^0^0^0^0 X^82^D^487^12^0^ S^83^79^P^sec_vend^INTEGER^decomarmol.cgtb00034.sec_vend^ D^83^0^0^0^0^0 X^83^D^487^12^0^ S^84^79^P^cod_cia^SMALLINT^decomarmol.cgtb00034.cod_cia^ D^84^0^0^0^0^0 X^84^D^487^12^0^ S^85^79^P^id^CHAR(2)^decomarmol.cgtb00034.id^ D^85^0^0^0^0^0 X^85^r^592^11^0^ X^85^r^568^13^0^ X^85^D^487^12^0^ S^86^5^P^p_clave^CHAR(12)^^ D^86^495^495^12^0^0 X^86^r^554^26^0^ X^86^l^552^20^0^ X^86^l^501^16^0^ X^86^l^465^26^0^ X^86^D^495^12^0^ S^87^5^V^vendedor^CHAR(1)^^ D^87^489^489^12^0^0 X^87^D^489^12^0^ S^88^5^V^imp^CHAR(1)^^ D^88^489^489^21^0^0 X^88^D^489^21^0^ S^89^5^V^imp1^CHAR(1)^^ D^89^489^489^25^0^0 X^89^D^489^25^0^ S^90^5^V^descrip_venta^CHAR(22)^^ D^90^490^490^12^0^0 X^90^D^490^12^0^ S^91^5^V^descrip1^CHAR(30)^^ D^91^491^491^12^0^0 X^91^D^491^12^0^ S^92^5^V^doble_on^CHAR(2)^^ D^92^492^492^12^0^0 X^92^r^533^29^0^ X^92^D^492^12^0^ S^93^5^V^doble_off^CHAR(2)^^ D^93^492^492^21^0^0 X^93^r^533^44^0^ X^93^D^492^21^0^ S^94^5^V^negrillas_on^CHAR(2)^^ D^94^492^492^31^0^0 X^94^r^540^21^0^ X^94^D^492^31^0^ S^95^5^V^negrillas_off^CHAR(2)^^ D^95^492^492^44^0^0 X^95^r^683^34^0^ X^95^r^674^57^0^ X^95^r^546^40^0^ X^95^D^492^44^0^ S^96^5^V^comp_on^CHAR(2)^^ D^96^492^492^58^0^0 X^96^D^492^58^0^ S^97^5^V^comp_off^CHAR(2)^^ D^97^492^492^66^0^0 X^97^r^683^25^0^ X^97^r^516^18^0^ X^97^D^492^66^0^ S^98^5^V^doce^CHAR(2)^^ D^98^493^493^12^0^0 X^98^D^493^12^0^ S^99^5^V^normal^CHAR(2)^^ D^99^493^493^17^0^0 X^99^D^493^17^0^ S^100^5^V^hora^CHAR(5)^^ D^100^494^494^12^0^0 X^100^r^526^29^0^ X^100^l^513^11^0^ X^100^D^494^12^0^ S^101^5^V^reportDef^base.Report^^ D^101^0^0^0^0^0 S^102^1^R^reporte4^^^public D^102^259^444^8^0^0 X^102^D^259^8^0^ X^102^c^253^19^0^finish X^102^c^250^27^0^output X^102^c^201^20^0^start S^103^102^P^x^RECORD^^ D^103^260^260^12^0^0 X^103^r^435^33^0^ X^103^r^434^33^0^ X^103^r^433^33^0^ X^103^r^432^33^0^ X^103^r^421^39^0^ X^103^r^420^39^0^ X^103^r^419^39^0^ X^103^r^418^39^0^ X^103^l^411^19^0^ X^103^r^408^39^0^ X^103^r^407^39^0^ X^103^r^406^39^0^ X^103^r^405^39^0^ X^103^r^395^39^0^ X^103^r^394^39^0^ X^103^r^393^39^0^ X^103^r^392^39^0^ X^103^r^371^15^0^ X^103^l^369^20^0^ X^103^l^291^16^0^ X^103^l^259^17^0^ X^103^D^260^12^0^ S^104^103^P^cod_cia^SMALLINT^decomarmol.vetb00002.cod_cia^ D^104^0^0^0^0^0 X^104^D^260^12^0^ S^105^103^P^factura^INTEGER^decomarmol.vetb00002.factura^ D^105^0^0^0^0^0 X^105^D^260^12^0^ S^106^103^P^fecha_factura^DATE^decomarmol.vetb00002.fecha_factura^ D^106^0^0^0^0^0 X^106^D^260^12^0^ S^107^103^P^ventas^VARCHAR(1)^decomarmol.vetb00002.ventas^ D^107^0^0^0^0^0 X^107^D^260^12^0^ S^108^103^P^zona^VARCHAR(3)^decomarmol.vetb00002.zona^ D^108^0^0^0^0^0 X^108^D^260^12^0^ S^109^103^P^orden^INTEGER^decomarmol.vetb00002.orden^ D^109^0^0^0^0^0 X^109^D^260^12^0^ S^110^103^P^fecha_orden^DATE^decomarmol.vetb00002.fecha_orden^ D^110^0^0^0^0^0 X^110^D^260^12^0^ S^111^103^P^conduce^INTEGER^decomarmol.vetb00002.conduce^ D^111^0^0^0^0^0 X^111^D^260^12^0^ S^112^103^P^fecha_conduce^DATE^decomarmol.vetb00002.fecha_conduce^ D^112^0^0^0^0^0 X^112^D^260^12^0^ S^113^103^P^tipo_cliente^SMALLINT^decomarmol.vetb00002.tipo_cliente^ D^113^0^0^0^0^0 X^113^D^260^12^0^ S^114^103^P^sec_cliente^INTEGER^decomarmol.vetb00002.sec_cliente^ D^114^0^0^0^0^0 X^114^D^260^12^0^ S^115^103^P^cod_vend^INTEGER^decomarmol.vetb00002.cod_vend^ D^115^0^0^0^0^0 X^115^D^260^12^0^ S^116^103^P^sec_vend^SMALLINT^decomarmol.vetb00002.sec_vend^ D^116^0^0^0^0^0 X^116^l^411^21^0^ X^116^r^371^17^0^ X^116^l^369^22^0^ X^116^l^291^18^0^ X^116^D^260^12^0^ S^117^103^P^cond_pago^SMALLINT^decomarmol.vetb00002.cond_pago^ D^117^0^0^0^0^0 X^117^D^260^12^0^ S^118^103^P^porc_itbi^DECIMAL(5,2)^decomarmol.vetb00002.porc_itbi^ D^118^0^0^0^0^0 X^118^D^260^12^0^ S^119^103^P^porc_desc^DECIMAL(8,2)^decomarmol.vetb00002.porc_desc^ D^119^0^0^0^0^0 X^119^D^260^12^0^ S^120^103^P^prima_us^DECIMAL(6,2)^decomarmol.vetb00002.prima_us^ D^120^0^0^0^0^0 X^120^D^260^12^0^ S^121^103^P^sub_total^DECIMAL(10,2)^decomarmol.vetb00002.sub_total^ D^121^0^0^0^0^0 X^121^r^432^35^0^ X^121^r^418^41^0^ X^121^r^405^41^0^ X^121^r^392^41^0^ X^121^D^260^12^0^ S^122^103^P^monto_desc^DECIMAL(10,2)^decomarmol.vetb00002.monto_desc^ D^122^0^0^0^0^0 X^122^r^433^35^0^ X^122^r^419^41^0^ X^122^r^406^41^0^ X^122^r^393^41^0^ X^122^D^260^12^0^ S^123^103^P^monto_itbi^DECIMAL(10,2)^decomarmol.vetb00002.monto_itbi^ D^123^0^0^0^0^0 X^123^r^434^35^0^ X^123^r^420^41^0^ X^123^r^407^41^0^ X^123^r^394^41^0^ X^123^D^260^12^0^ S^124^103^P^neto^DECIMAL(10,2)^decomarmol.vetb00002.neto^ D^124^0^0^0^0^0 X^124^r^435^35^0^ X^124^r^421^41^0^ X^124^r^408^41^0^ X^124^r^395^41^0^ X^124^D^260^12^0^ S^125^103^P^fecha_embarque^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fecha_embarque^ D^125^0^0^0^0^0 X^125^D^260^12^0^ S^126^103^P^status_impresion^VARCHAR(1)^decomarmol.vetb00002.status_impresion^ D^126^0^0^0^0^0 X^126^D^260^12^0^ S^127^103^P^status_t^VARCHAR(1)^decomarmol.vetb00002.status_t^ D^127^0^0^0^0^0 X^127^D^260^12^0^ S^128^103^P^us_crea^VARCHAR(50)^decomarmol.vetb00002.us_crea^ D^128^0^0^0^0^0 X^128^D^260^12^0^ S^129^103^P^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fech_crea^ D^129^0^0^0^0^0 X^129^D^260^12^0^ S^130^103^P^us_mod^VARCHAR(50)^decomarmol.vetb00002.us_mod^ D^130^0^0^0^0^0 X^130^D^260^12^0^ S^131^103^P^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fech_mod^ D^131^0^0^0^0^0 X^131^D^260^12^0^ S^132^103^P^documento^CHAR(15)^decomarmol.vetb00002.documento^ D^132^0^0^0^0^0 X^132^D^260^12^0^ S^133^103^P^placa_transporte^CHAR(25)^decomarmol.vetb00002.placa_transporte^ D^133^0^0^0^0^0 X^133^D^260^12^0^ S^134^103^P^bodega^SMALLINT^decomarmol.vetb00002.bodega^ D^134^0^0^0^0^0 X^134^D^260^12^0^ S^135^103^P^cotizacion_no^INTEGER^decomarmol.vetb00002.cotizacion_no^ D^135^0^0^0^0^0 X^135^D^260^12^0^ S^136^103^P^tipo_factura^CHAR(20)^decomarmol.vetb00002.tipo_factura^ D^136^0^0^0^0^0 X^136^D^260^12^0^ S^137^103^P^documento_ref^CHAR(25)^decomarmol.vetb00002.documento_ref^ D^137^0^0^0^0^0 X^137^D^260^12^0^ S^138^103^P^descripcion_documento^VARCHAR(100)^decomarmol.vetb00002.descripcion_documento^ D^138^0^0^0^0^0 X^138^D^260^12^0^ S^139^102^P^v^RECORD^^ D^139^261^261^12^0^0 X^139^r^436^34^0^ X^139^r^422^40^0^ X^139^r^409^40^0^ X^139^r^396^40^0^ X^139^r^391^29^0^ X^139^l^389^19^0^ X^139^r^387^28^0^ X^139^l^385^20^0^ X^139^l^291^37^0^ X^139^l^259^19^0^ X^139^D^261^12^0^ S^140^139^P^cod_cia^SMALLINT^decomarmol.vetb00003.cod_cia^ D^140^0^0^0^0^0 X^140^D^261^12^0^ S^141^139^P^factura^INTEGER^decomarmol.vetb00003.factura^ D^141^0^0^0^0^0 X^141^D^261^12^0^ S^142^139^P^area^SMALLINT^decomarmol.vetb00003.area^ D^142^0^0^0^0^0 X^142^D^261^12^0^ S^143^139^P^cod_n^SMALLINT^decomarmol.vetb00003.cod_n^ D^143^0^0^0^0^0 X^143^r^391^31^0^ X^143^l^389^21^0^ X^143^r^387^30^0^ X^143^l^385^22^0^ X^143^l^291^39^0^ X^143^D^261^12^0^ S^144^139^P^cod_grupo^SMALLINT^decomarmol.vetb00003.cod_grupo^ D^144^0^0^0^0^0 X^144^D^261^12^0^ S^145^139^P^cod_tipo^SMALLINT^decomarmol.vetb00003.cod_tipo^ D^145^0^0^0^0^0 X^145^D^261^12^0^ S^146^139^P^cod_sec^SMALLINT^decomarmol.vetb00003.cod_sec^ D^146^0^0^0^0^0 X^146^D^261^12^0^ S^147^139^P^cantidad^DECIMAL(12,5)^decomarmol.vetb00003.cantidad^ D^147^0^0^0^0^0 X^147^r^436^36^0^ X^147^r^422^42^0^ X^147^r^409^42^0^ X^147^r^396^42^0^ X^147^D^261^12^0^ S^148^139^P^cantidad_2^DECIMAL(14,2)^decomarmol.vetb00003.cantidad_2^ D^148^0^0^0^0^0 X^148^D^261^12^0^ S^149^139^P^bonificacion^DECIMAL(12,2)^decomarmol.vetb00003.bonificacion^ D^149^0^0^0^0^0 X^149^D^261^12^0^ S^150^139^P^precio^DECIMAL(12,2)^decomarmol.vetb00003.precio^ D^150^0^0^0^0^0 X^150^D^261^12^0^ S^151^139^P^status_t^CHAR(1)^decomarmol.vetb00003.status_t^ D^151^0^0^0^0^0 X^151^D^261^12^0^ S^152^139^P^us_crea^CHAR(50)^decomarmol.vetb00003.us_crea^ D^152^0^0^0^0^0 X^152^D^261^12^0^ S^153^139^P^fech_crea^DATE^decomarmol.vetb00003.fech_crea^ D^153^0^0^0^0^0 X^153^D^261^12^0^ S^154^139^P^us_mod^CHAR(50)^decomarmol.vetb00003.us_mod^ D^154^0^0^0^0^0 X^154^D^261^12^0^ S^155^139^P^fech_mod^DATE^decomarmol.vetb00003.fech_mod^ D^155^0^0^0^0^0 X^155^D^261^12^0^ S^156^139^P^bodega^SMALLINT^decomarmol.vetb00003.bodega^ D^156^0^0^0^0^0 X^156^D^261^12^0^ S^157^139^P^id_kit^INTEGER^decomarmol.vetb00003.id_kit^ D^157^0^0^0^0^0 X^157^D^261^12^0^ S^158^102^P^b^RECORD^^ D^158^262^280^12^0^0 X^158^l^398^19^0^ X^158^r^379^15^0^ X^158^l^377^20^0^ X^158^l^291^27^0^ X^158^l^259^21^0^ X^158^D^262^12^0^ S^159^158^P^bodega^SMALLINT^decomarmol.iptb00002.bodega^ D^159^263^263^5^0^0 X^159^D^263^5^0^ S^160^158^P^cod_cia^SMALLINT^decomarmol.iptb00002.cod_cia^ D^160^264^264^5^0^0 X^160^l^398^21^0^ X^160^r^379^17^0^ X^160^l^377^22^0^ X^160^l^291^29^0^ X^160^D^264^5^0^ S^161^158^P^cod_grupo^SMALLINT^decomarmol.iptb00002.cod_grupo^ D^161^265^265^5^0^0 X^161^D^265^5^0^ S^162^158^P^cod_n^SMALLINT^decomarmol.iptb00002.cod_n^ D^162^266^266^5^0^0 X^162^D^266^5^0^ S^163^158^P^cod_sec^SMALLINT^decomarmol.iptb00002.cod_sec^ D^163^267^267^5^0^0 X^163^D^267^5^0^ S^164^158^P^cod_tipo^SMALLINT^decomarmol.iptb00002.cod_tipo^ D^164^268^268^5^0^0 X^164^D^268^5^0^ S^165^158^P^codid^INTEGER^decomarmol.iptb00002.codid^ D^165^269^269^5^0^0 X^165^D^269^5^0^ S^166^158^P^control_existencia^VARCHAR(2)^decomarmol.iptb00002.control_existencia^ D^166^270^270^5^0^0 X^166^D^270^5^0^ S^167^158^P^control_itbis^VARCHAR(2)^decomarmol.iptb00002.control_itbis^ D^167^271^271^5^0^0 X^167^D^271^5^0^ S^168^158^P^descrip_esp^VARCHAR(180)^decomarmol.iptb00002.descrip_esp^ D^168^272^272^5^0^0 X^168^D^272^5^0^ S^169^158^P^descrip_ing^VARCHAR(80)^decomarmol.iptb00002.descrip_ing^ D^169^273^273^5^0^0 X^169^D^273^5^0^ S^170^158^P^nomenclatura^VARCHAR(50)^decomarmol.iptb00002.nomenclatura^ D^170^274^274^5^0^0 X^170^D^274^5^0^ S^171^158^P^porc_desc^DECIMAL(12,2)^decomarmol.iptb00002.porc_desc^ D^171^275^275^5^0^0 X^171^D^275^5^0^ S^172^158^P^status_t^CHAR(1)^decomarmol.iptb00002.status_t^ D^172^276^276^5^0^0 X^172^D^276^5^0^ S^173^158^P^unidad_med^VARCHAR(50)^decomarmol.iptb00002.unidad_med^ D^173^277^277^5^0^0 X^173^D^277^5^0^ S^174^158^P^us_crea^VARCHAR(50)^decomarmol.iptb00002.us_crea^ D^174^278^278^5^0^0 X^174^D^278^5^0^ S^175^158^P^us_mod^VARCHAR(50)^decomarmol.iptb00002.us_mod^ D^175^279^279^5^0^0 X^175^D^279^5^0^ S^176^102^V^doble_on^CHAR(2)^^ D^176^283^283^12^0^0 X^176^D^283^12^0^ S^177^102^V^doble_off^CHAR(2)^^ D^177^283^283^21^0^0 X^177^D^283^21^0^ S^178^102^V^negrillas_on^CHAR(2)^^ D^178^283^283^31^0^0 X^178^D^283^31^0^ S^179^102^V^negrillas_off^CHAR(2)^^ D^179^283^283^44^0^0 X^179^D^283^44^0^ S^180^102^V^comp_on^CHAR(2)^^ D^180^283^283^58^0^0 X^180^D^283^58^0^ S^181^102^V^comp_off^CHAR(2)^^ D^181^283^283^66^0^0 X^181^D^283^66^0^ S^182^102^V^doce^CHAR(2)^^ D^182^284^284^12^0^0 X^182^D^284^12^0^ S^183^102^V^normal^CHAR(2)^^ D^183^284^284^17^0^0 X^183^D^284^17^0^ S^184^102^V^hora^CHAR(5)^^ D^184^285^285^12^0^0 X^184^r^317^29^0^ X^184^l^304^11^0^ X^184^D^285^12^0^ S^185^102^V^reportDef^base.Report^^ D^185^0^0^0^0^0 S^186^1^F^edprrp004^^^public D^186^85^257^10^0^0 X^186^D^85^10^0^ X^186^c^82^7^0^ S^187^1^F^main^^^public D^187^75^83^1^0^0 X^187^D^75^1^0^ S^188^1^C^busca_vr^base.Cursor^^private D^188^194^194^12^0^0 X^188^u^195^32^0^ X^188^D^194^12^0^ S^189^1^C^movi_vr^base.Cursor^^private D^189^195^195^12^0^0 X^189^u^210^13^0^ X^189^u^196^9^0^ X^189^D^195^12^0^ S^190^0^V^status^INTEGER^^builtin F^1^C:\Program Files (x86)\FourJs\Genero Studio2.50\fgl\lib/fgl.4gl D^190^14^14^1^1^1 X^190^r^649^13^0^ X^190^r^619^13^0^ X^190^r^563^13^0^ X^190^r^151^10^0^ X^190^r^111^16^0^ X^190^D^14^1^1^ S^191^0^V^int_flag^INTEGER^^builtin D^191^14^14^9^1^1 X^191^l^220^12^0^ X^191^r^218^8^0^ X^191^l^161^9^0^ X^191^r^159^5^0^ X^191^D^14^9^1^ S^192^0^V^p_vetb02^RECORD^^global D^192^13^13^12^0^0 X^192^r^251^37^0^ X^192^r^250^36^0^ X^192^r^248^36^0^ X^192^r^247^51^0^ X^192^r^247^30^0^ X^192^l^247^14^0^ X^192^r^246^37^0^ X^192^r^245^58^0^ X^192^r^245^37^0^ X^192^l^245^14^0^ X^192^r^244^37^0^ X^192^l^243^14^0^ X^192^l^242^14^0^ X^192^l^240^17^0^ X^192^r^239^13^0^ X^192^l^237^17^0^ X^192^r^236^13^0^ X^192^l^234^17^0^ X^192^r^233^13^0^ X^192^r^210^26^0^ X^192^D^13^12^0^ S^193^192^V^cod_cia^SMALLINT^decomarmol.vetb00002.cod_cia^ D^193^0^0^0^0^0 X^193^D^13^12^0^ S^194^192^V^factura^INTEGER^decomarmol.vetb00002.factura^ D^194^0^0^0^0^0 X^194^D^13^12^0^ S^195^192^V^fecha_factura^DATE^decomarmol.vetb00002.fecha_factura^ D^195^0^0^0^0^0 X^195^D^13^12^0^ S^196^192^V^ventas^VARCHAR(1)^decomarmol.vetb00002.ventas^ D^196^0^0^0^0^0 X^196^D^13^12^0^ S^197^192^V^zona^VARCHAR(3)^decomarmol.vetb00002.zona^ D^197^0^0^0^0^0 X^197^D^13^12^0^ S^198^192^V^orden^INTEGER^decomarmol.vetb00002.orden^ D^198^0^0^0^0^0 X^198^D^13^12^0^ S^199^192^V^fecha_orden^DATE^decomarmol.vetb00002.fecha_orden^ D^199^0^0^0^0^0 X^199^D^13^12^0^ S^200^192^V^conduce^INTEGER^decomarmol.vetb00002.conduce^ D^200^0^0^0^0^0 X^200^D^13^12^0^ S^201^192^V^fecha_conduce^DATE^decomarmol.vetb00002.fecha_conduce^ D^201^0^0^0^0^0 X^201^D^13^12^0^ S^202^192^V^tipo_cliente^SMALLINT^decomarmol.vetb00002.tipo_cliente^ D^202^0^0^0^0^0 X^202^D^13^12^0^ S^203^192^V^sec_cliente^INTEGER^decomarmol.vetb00002.sec_cliente^ D^203^0^0^0^0^0 X^203^D^13^12^0^ S^204^192^V^cod_vend^INTEGER^decomarmol.vetb00002.cod_vend^ D^204^0^0^0^0^0 X^204^D^13^12^0^ S^205^192^V^sec_vend^SMALLINT^decomarmol.vetb00002.sec_vend^ D^205^0^0^0^0^0 X^205^l^234^26^0^ X^205^r^233^22^0^ X^205^D^13^12^0^ S^206^192^V^cond_pago^SMALLINT^decomarmol.vetb00002.cond_pago^ D^206^0^0^0^0^0 X^206^D^13^12^0^ S^207^192^V^porc_itbi^DECIMAL(5,2)^decomarmol.vetb00002.porc_itbi^ D^207^0^0^0^0^0 X^207^l^240^26^0^ X^207^r^239^22^0^ X^207^D^13^12^0^ S^208^192^V^porc_desc^DECIMAL(8,2)^decomarmol.vetb00002.porc_desc^ D^208^0^0^0^0^0 X^208^r^246^46^0^ X^208^r^244^46^0^ X^208^l^237^26^0^ X^208^r^236^22^0^ X^208^D^13^12^0^ S^209^192^V^prima_us^DECIMAL(6,2)^decomarmol.vetb00002.prima_us^ D^209^0^0^0^0^0 X^209^D^13^12^0^ S^210^192^V^sub_total^DECIMAL(10,2)^decomarmol.vetb00002.sub_total^ D^210^0^0^0^0^0 X^210^r^247^39^0^ X^210^r^245^46^0^ X^210^l^242^23^0^ X^210^D^13^12^0^ S^211^192^V^monto_desc^DECIMAL(10,2)^decomarmol.vetb00002.monto_desc^ D^211^0^0^0^0^0 X^211^r^247^60^0^ X^211^r^245^67^0^ X^211^l^243^23^0^ X^211^D^13^12^0^ S^212^192^V^monto_itbi^DECIMAL(10,2)^decomarmol.vetb00002.monto_itbi^ D^212^0^0^0^0^0 X^212^r^248^45^0^ X^212^l^245^23^0^ X^212^D^13^12^0^ S^213^192^V^neto^DECIMAL(10,2)^decomarmol.vetb00002.neto^ D^213^0^0^0^0^0 X^213^l^247^23^0^ X^213^D^13^12^0^ S^214^192^V^fecha_embarque^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fecha_embarque^ D^214^0^0^0^0^0 X^214^D^13^12^0^ S^215^192^V^status_impresion^VARCHAR(1)^decomarmol.vetb00002.status_impresion^ D^215^0^0^0^0^0 X^215^D^13^12^0^ S^216^192^V^status_t^VARCHAR(1)^decomarmol.vetb00002.status_t^ D^216^0^0^0^0^0 X^216^D^13^12^0^ S^217^192^V^us_crea^VARCHAR(50)^decomarmol.vetb00002.us_crea^ D^217^0^0^0^0^0 X^217^D^13^12^0^ S^218^192^V^fech_crea^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fech_crea^ D^218^0^0^0^0^0 X^218^D^13^12^0^ S^219^192^V^us_mod^VARCHAR(50)^decomarmol.vetb00002.us_mod^ D^219^0^0^0^0^0 X^219^D^13^12^0^ S^220^192^V^fech_mod^DATETIME YEAR TO FRACTION^decomarmol.vetb00002.fech_mod^ D^220^0^0^0^0^0 X^220^D^13^12^0^ S^221^192^V^documento^CHAR(15)^decomarmol.vetb00002.documento^ D^221^0^0^0^0^0 X^221^D^13^12^0^ S^222^192^V^placa_transporte^CHAR(25)^decomarmol.vetb00002.placa_transporte^ D^222^0^0^0^0^0 X^222^D^13^12^0^ S^223^192^V^bodega^SMALLINT^decomarmol.vetb00002.bodega^ D^223^0^0^0^0^0 X^223^D^13^12^0^ S^224^192^V^cotizacion_no^INTEGER^decomarmol.vetb00002.cotizacion_no^ D^224^0^0^0^0^0 X^224^D^13^12^0^ S^225^192^V^tipo_factura^CHAR(20)^decomarmol.vetb00002.tipo_factura^ D^225^0^0^0^0^0 X^225^D^13^12^0^ S^226^192^V^documento_ref^CHAR(25)^decomarmol.vetb00002.documento_ref^ D^226^0^0^0^0^0 X^226^D^13^12^0^ S^227^192^V^descripcion_documento^VARCHAR(100)^decomarmol.vetb00002.descripcion_documento^ D^227^0^0^0^0^0 X^227^D^13^12^0^ S^228^0^V^p_vetb03^RECORD^^global D^228^14^14^12^0^0 X^228^r^251^48^0^ X^228^r^250^47^0^ X^228^r^243^57^0^ X^228^r^243^37^0^ X^228^r^242^56^0^ X^228^r^242^36^0^ X^228^r^210^37^0^ X^228^D^14^12^0^ S^229^228^V^cod_cia^SMALLINT^decomarmol.vetb00003.cod_cia^ D^229^0^0^0^0^0 X^229^D^14^12^0^ S^230^228^V^factura^INTEGER^decomarmol.vetb00003.factura^ D^230^0^0^0^0^0 X^230^D^14^12^0^ S^231^228^V^area^SMALLINT^decomarmol.vetb00003.area^ D^231^0^0^0^0^0 X^231^D^14^12^0^ S^232^228^V^cod_n^SMALLINT^decomarmol.vetb00003.cod_n^ D^232^0^0^0^0^0 X^232^D^14^12^0^ S^233^228^V^cod_grupo^SMALLINT^decomarmol.vetb00003.cod_grupo^ D^233^0^0^0^0^0 X^233^D^14^12^0^ S^234^228^V^cod_tipo^SMALLINT^decomarmol.vetb00003.cod_tipo^ D^234^0^0^0^0^0 X^234^D^14^12^0^ S^235^228^V^cod_sec^SMALLINT^decomarmol.vetb00003.cod_sec^ D^235^0^0^0^0^0 X^235^D^14^12^0^ S^236^228^V^cantidad^DECIMAL(12,5)^decomarmol.vetb00003.cantidad^ D^236^0^0^0^0^0 X^236^r^243^46^0^ X^236^r^242^45^0^ X^236^D^14^12^0^ S^237^228^V^cantidad_2^DECIMAL(14,2)^decomarmol.vetb00003.cantidad_2^ D^237^0^0^0^0^0 X^237^D^14^12^0^ S^238^228^V^bonificacion^DECIMAL(12,2)^decomarmol.vetb00003.bonificacion^ D^238^0^0^0^0^0 X^238^D^14^12^0^ S^239^228^V^precio^DECIMAL(12,2)^decomarmol.vetb00003.precio^ D^239^0^0^0^0^0 X^239^r^243^66^0^ X^239^r^242^65^0^ X^239^D^14^12^0^ S^240^228^V^status_t^CHAR(1)^decomarmol.vetb00003.status_t^ D^240^0^0^0^0^0 X^240^D^14^12^0^ S^241^228^V^us_crea^CHAR(50)^decomarmol.vetb00003.us_crea^ D^241^0^0^0^0^0 X^241^D^14^12^0^ S^242^228^V^fech_crea^DATE^decomarmol.vetb00003.fech_crea^ D^242^0^0^0^0^0 X^242^D^14^12^0^ S^243^228^V^us_mod^CHAR(50)^decomarmol.vetb00003.us_mod^ D^243^0^0^0^0^0 X^243^D^14^12^0^ S^244^228^V^fech_mod^DATE^decomarmol.vetb00003.fech_mod^ D^244^0^0^0^0^0 X^244^D^14^12^0^ S^245^228^V^bodega^SMALLINT^decomarmol.vetb00003.bodega^ D^245^0^0^0^0^0 X^245^D^14^12^0^ S^246^228^V^id_kit^INTEGER^decomarmol.vetb00003.id_kit^ D^246^0^0^0^0^0 X^246^D^14^12^0^ S^247^0^V^p_iptb02^RECORD^^global D^247^15^33^12^0^0 X^247^r^251^59^0^ X^247^r^250^58^0^ X^247^r^227^26^0^ X^247^r^226^28^0^ X^247^l^214^79^0^ X^247^l^214^62^0^ X^247^l^214^42^0^ X^247^l^214^24^0^ X^247^l^214^5^0^ X^247^l^213^5^0^ X^247^l^212^26^0^ X^247^l^212^5^0^ X^247^l^211^98^0^ X^247^l^211^70^0^ X^247^l^211^55^0^ X^247^l^211^37^0^ X^247^l^211^20^0^ X^247^l^211^5^0^ X^247^l^210^81^0^ X^247^l^210^64^0^ X^247^l^210^48^0^ X^247^D^15^12^0^ S^248^247^V^bodega^SMALLINT^decomarmol.iptb00002.bodega^ D^248^16^16^9^0^0 X^248^l^210^57^0^ X^248^D^16^9^0^ S^249^247^V^cod_cia^SMALLINT^decomarmol.iptb00002.cod_cia^ D^249^17^17^5^0^0 X^249^r^226^37^0^ X^249^l^210^73^0^ X^249^D^17^5^0^ S^250^247^V^cod_grupo^SMALLINT^decomarmol.iptb00002.cod_grupo^ D^250^18^18^5^0^0 X^250^l^210^90^0^ X^250^D^18^5^0^ S^251^247^V^cod_n^SMALLINT^decomarmol.iptb00002.cod_n^ D^251^19^19^5^0^0 X^251^r^227^35^0^ X^251^l^211^14^0^ X^251^D^19^5^0^ S^252^247^V^cod_sec^SMALLINT^decomarmol.iptb00002.cod_sec^ D^252^20^20^5^0^0 X^252^l^211^29^0^ X^252^D^20^5^0^ S^253^247^V^cod_tipo^SMALLINT^decomarmol.iptb00002.cod_tipo^ D^253^21^21^5^0^0 X^253^l^211^46^0^ X^253^D^21^5^0^ S^254^247^V^codid^INTEGER^decomarmol.iptb00002.codid^ D^254^22^22^5^0^0 X^254^l^211^64^0^ X^254^D^22^5^0^ S^255^247^V^control_existencia^VARCHAR(2)^decomarmol.iptb00002.control_existencia^ D^255^23^23^5^0^0 X^255^l^211^79^0^ X^255^D^23^5^0^ S^256^247^V^control_itbis^VARCHAR(2)^decomarmol.iptb00002.control_itbis^ D^256^24^24^5^0^0 X^256^l^211^107^0^ X^256^D^24^5^0^ S^257^247^V^descrip_esp^VARCHAR(180)^decomarmol.iptb00002.descrip_esp^ D^257^25^25^5^0^0 X^257^l^212^14^0^ X^257^D^25^5^0^ S^258^247^V^descrip_ing^VARCHAR(80)^decomarmol.iptb00002.descrip_ing^ D^258^26^26^5^0^0 X^258^l^212^35^0^ X^258^D^26^5^0^ S^259^247^V^nomenclatura^VARCHAR(50)^decomarmol.iptb00002.nomenclatura^ D^259^27^27^5^0^0 X^259^l^213^14^0^ X^259^D^27^5^0^ S^260^247^V^porc_desc^DECIMAL(12,2)^decomarmol.iptb00002.porc_desc^ D^260^28^28^5^0^0 X^260^l^214^14^0^ X^260^D^28^5^0^ S^261^247^V^status_t^CHAR(1)^decomarmol.iptb00002.status_t^ D^261^29^29^5^0^0 X^261^l^214^33^0^ X^261^D^29^5^0^ S^262^247^V^unidad_med^VARCHAR(50)^decomarmol.iptb00002.unidad_med^ D^262^30^30^5^0^0 X^262^l^214^51^0^ X^262^D^30^5^0^ S^263^247^V^us_crea^VARCHAR(50)^decomarmol.iptb00002.us_crea^ D^263^31^31^5^0^0 X^263^l^214^71^0^ X^263^D^31^5^0^ S^264^247^V^us_mod^VARCHAR(50)^decomarmol.iptb00002.us_mod^ D^264^32^32^5^0^0 X^264^l^214^88^0^ X^264^D^32^5^0^ S^265^0^V^p_vetb04^RECORD^^global D^265^34^34^12^0^0 X^265^D^34^12^0^ S^266^265^V^tipo_cliente^SMALLINT^decomarmol.vetb00004.tipo_cliente^ D^266^0^0^0^0^0 X^266^D^34^12^0^ S^267^265^V^sec_cliente^SMALLINT^decomarmol.vetb00004.sec_cliente^ D^267^0^0^0^0^0 X^267^D^34^12^0^ S^268^265^V^nombre^CHAR(100)^decomarmol.vetb00004.nombre^ D^268^0^0^0^0^0 X^268^D^34^12^0^ S^269^265^V^cod_zona^SMALLINT^decomarmol.vetb00004.cod_zona^ D^269^0^0^0^0^0 X^269^D^34^12^0^ S^270^265^V^cod_provincia^SMALLINT^decomarmol.vetb00004.cod_provincia^ D^270^0^0^0^0^0 X^270^D^34^12^0^ S^271^265^V^telefono^CHAR(25)^decomarmol.vetb00004.telefono^ D^271^0^0^0^0^0 X^271^D^34^12^0^ S^272^265^V^fax^CHAR(25)^decomarmol.vetb00004.fax^ D^272^0^0^0^0^0 X^272^D^34^12^0^ S^273^265^V^telex^CHAR(25)^decomarmol.vetb00004.telex^ D^273^0^0^0^0^0 X^273^D^34^12^0^ S^274^265^V^patente^VARCHAR(80)^decomarmol.vetb00004.patente^ D^274^0^0^0^0^0 X^274^D^34^12^0^ S^275^265^V^limite_credito^DECIMAL(10,2)^decomarmol.vetb00004.limite_credito^ D^275^0^0^0^0^0 X^275^D^34^12^0^ S^276^265^V^zona_postal^CHAR(10)^decomarmol.vetb00004.zona_postal^ D^276^0^0^0^0^0 X^276^D^34^12^0^ S^277^265^V^num_rnc^CHAR(25)^decomarmol.vetb00004.num_rnc^ D^277^0^0^0^0^0 X^277^D^34^12^0^ S^278^265^V^nombre_patente^CHAR(30)^decomarmol.vetb00004.nombre_patente^ D^278^0^0^0^0^0 X^278^D^34^12^0^ S^279^265^V^status_t^CHAR(1)^decomarmol.vetb00004.status_t^ D^279^0^0^0^0^0 X^279^D^34^12^0^ S^280^265^V^us_crea^CHAR(50)^decomarmol.vetb00004.us_crea^ D^280^0^0^0^0^0 X^280^D^34^12^0^ S^281^265^V^fech_crea^DATE^decomarmol.vetb00004.fech_crea^ D^281^0^0^0^0^0 X^281^D^34^12^0^ S^282^265^V^us_mod^CHAR(50)^decomarmol.vetb00004.us_mod^ D^282^0^0^0^0^0 X^282^D^34^12^0^ S^283^265^V^fech_mod^DATE^decomarmol.vetb00004.fech_mod^ D^283^0^0^0^0^0 X^283^D^34^12^0^ S^284^265^V^puesto_laboral^VARCHAR(50)^decomarmol.vetb00004.puesto_laboral^ D^284^0^0^0^0^0 X^284^D^34^12^0^ S^285^265^V^telefono_casa^CHAR(25)^decomarmol.vetb00004.telefono_casa^ D^285^0^0^0^0^0 X^285^D^34^12^0^ S^286^265^V^tipo_negocio^SMALLINT^decomarmol.vetb00004.tipo_negocio^ D^286^0^0^0^0^0 X^286^D^34^12^0^ S^287^265^V^cond_pago^SMALLINT^decomarmol.vetb00004.cond_pago^ D^287^0^0^0^0^0 X^287^D^34^12^0^ S^288^265^V^id_ciudad^SMALLINT^decomarmol.vetb00004.id_ciudad^ D^288^0^0^0^0^0 X^288^D^34^12^0^ S^289^265^V^url^VARCHAR(200)^decomarmol.vetb00004.url^ D^289^0^0^0^0^0 X^289^D^34^12^0^ S^290^0^V^p_iptb20^RECORD^^global D^290^35^35^12^0^0 X^290^r^391^51^0^ X^290^l^386^35^0^ X^290^D^35^12^0^ S^291^290^V^cod_n^INTEGER^decomarmol.iptb00020.cod_n^ D^291^0^0^0^0^0 X^291^D^35^12^0^ S^292^290^V^producto^CHAR(30)^decomarmol.iptb00020.producto^ D^292^0^0^0^0^0 X^292^r^391^60^0^ X^292^l^386^44^0^ X^292^D^35^12^0^ S^293^290^V^status_t^CHAR(1)^decomarmol.iptb00020.status_t^ D^293^0^0^0^0^0 X^293^D^35^12^0^ S^294^290^V^us_crea^CHAR(9)^decomarmol.iptb00020.us_crea^ D^294^0^0^0^0^0 X^294^D^35^12^0^ S^295^290^V^fech_crea^DATE^decomarmol.iptb00020.fech_crea^ D^295^0^0^0^0^0 X^295^D^35^12^0^ S^296^290^V^us_mod^CHAR(9)^decomarmol.iptb00020.us_mod^ D^296^0^0^0^0^0 X^296^D^35^12^0^ S^297^290^V^fech_mod^DATE^decomarmol.iptb00020.fech_mod^ D^297^0^0^0^0^0 X^297^D^35^12^0^ S^298^290^V^cod_inv^SMALLINT^decomarmol.iptb00020.cod_inv^ D^298^0^0^0^0^0 X^298^D^35^12^0^ S^299^290^V^comentario^CHAR(80)^decomarmol.iptb00020.comentario^ D^299^0^0^0^0^0 X^299^D^35^12^0^ S^300^0^V^p_cgtb34^RECORD^^global D^300^36^36^12^0^0 X^300^r^251^70^0^ X^300^r^230^22^0^ X^300^r^229^24^0^ X^300^r^224^26^0^ X^300^D^36^12^0^ S^301^300^V^cuenta_no^CHAR(10)^decomarmol.cgtb00034.cuenta_no^ D^301^0^0^0^0^0 X^301^r^229^33^0^ X^301^D^36^12^0^ S^302^300^V^departamento^SMALLINT^decomarmol.cgtb00034.departamento^ D^302^0^0^0^0^0 X^302^r^230^31^0^ X^302^D^36^12^0^ S^303^300^V^cod_n^SMALLINT^decomarmol.cgtb00034.cod_n^ D^303^0^0^0^0^0 X^303^D^36^12^0^ S^304^300^V^sec_vend^INTEGER^decomarmol.cgtb00034.sec_vend^ D^304^0^0^0^0^0 X^304^D^36^12^0^ S^305^300^V^cod_cia^SMALLINT^decomarmol.cgtb00034.cod_cia^ D^305^0^0^0^0^0 X^305^D^36^12^0^ S^306^300^V^id^CHAR(2)^decomarmol.cgtb00034.id^ D^306^0^0^0^0^0 X^306^D^36^12^0^ S^307^0^V^p_compania^RECORD^^global D^307^37^37^12^0^0 X^307^r^518^30^0^ X^307^r^514^29^0^ X^307^r^455^13^0^ X^307^r^452^26^0^ X^307^r^449^19^0^ X^307^r^309^30^0^ X^307^r^305^29^0^ X^307^r^81^16^0^ X^307^D^37^12^0^ S^308^307^V^cod_comp^CHAR(5)^decomarmol.companias.cod_comp^ D^308^0^0^0^0^0 X^308^D^37^12^0^ S^309^307^V^nombre^CHAR(40)^decomarmol.companias.nombre^ D^309^0^0^0^0^0 X^309^r^518^41^0^ X^309^r^514^40^0^ X^309^r^455^24^0^ X^309^r^452^37^0^ X^309^r^309^41^0^ X^309^r^305^40^0^ X^309^D^37^12^0^ S^310^307^V^rnc^CHAR(30)^decomarmol.companias.rnc^ D^310^0^0^0^0^0 X^310^D^37^12^0^ S^311^307^V^direccion^CHAR(40)^decomarmol.companias.direccion^ D^311^0^0^0^0^0 X^311^D^37^12^0^ S^312^307^V^telefono^CHAR(15)^decomarmol.companias.telefono^ D^312^0^0^0^0^0 X^312^D^37^12^0^ S^313^307^V^fax^CHAR(15)^decomarmol.companias.fax^ D^313^0^0^0^0^0 X^313^D^37^12^0^ S^314^307^V^administrador^CHAR(40)^decomarmol.companias.administrador^ D^314^0^0^0^0^0 X^314^D^37^12^0^ S^315^307^V^email^CHAR(100)^decomarmol.companias.email^ D^315^0^0^0^0^0 X^315^D^37^12^0^ S^316^307^V^paginaweb^CHAR(100)^decomarmol.companias.paginaweb^ D^316^0^0^0^0^0 X^316^D^37^12^0^ S^317^307^V^direccion1^CHAR(50)^decomarmol.companias.direccion1^ D^317^0^0^0^0^0 X^317^D^37^12^0^ S^318^307^V^telefono1^CHAR(15)^decomarmol.companias.telefono1^ D^318^0^0^0^0^0 X^318^D^37^12^0^ S^319^307^V^fax1^CHAR(15)^decomarmol.companias.fax1^ D^319^0^0^0^0^0 X^319^D^37^12^0^ S^320^307^V^status_t^CHAR(1)^decomarmol.companias.status_t^ D^320^0^0^0^0^0 X^320^D^37^12^0^ S^321^307^V^us_crea^CHAR(9)^decomarmol.companias.us_crea^ D^321^0^0^0^0^0 X^321^D^37^12^0^ S^322^307^V^fech_crea^DATE^decomarmol.companias.fech_crea^ D^322^0^0^0^0^0 X^322^D^37^12^0^ S^323^307^V^us_mod^CHAR(9)^decomarmol.companias.us_mod^ D^323^0^0^0^0^0 X^323^D^37^12^0^ S^324^307^V^fech_mod^DATE^decomarmol.companias.fech_mod^ D^324^0^0^0^0^0 X^324^D^37^12^0^ S^325^307^V^codnomina^CHAR(30)^decomarmol.companias.codnomina^ D^325^0^0^0^0^0 X^325^D^37^12^0^ S^326^307^V^cuenta_no_inv^CHAR(10)^decomarmol.companias.cuenta_no_inv^ D^326^0^0^0^0^0 X^326^D^37^12^0^ S^327^307^V^dias_vence_reservas^SMALLINT^decomarmol.companias.dias_vence_reservas^ D^327^0^0^0^0^0 X^327^D^37^12^0^ S^328^0^V^salir^CHAR(1)^^global D^328^38^38^12^0^0 X^328^D^38^12^0^ S^329^0^V^debito^DECIMAL(12,2)^^global D^329^39^39^12^0^0 X^329^r^673^26^0^ X^329^r^633^23^0^ X^329^l^633^14^0^ X^329^r^579^24^0^ X^329^l^579^14^0^ X^329^l^165^6^0^ X^329^D^39^12^0^ S^330^0^V^debito1^DECIMAL(12,2)^^global D^330^39^39^19^0^0 X^330^r^639^65^0^ X^330^r^636^28^0^ X^330^r^633^32^0^ X^330^r^632^13^0^ X^330^l^630^17^0^ X^330^r^629^13^0^ X^330^l^627^17^0^ X^330^r^626^13^0^ X^330^r^625^28^0^ X^330^l^624^14^0^ X^330^l^623^14^0^ X^330^r^586^70^0^ X^330^r^583^28^0^ X^330^r^579^33^0^ X^330^r^578^28^0^ X^330^r^577^13^0^ X^330^l^575^17^0^ X^330^r^574^13^0^ X^330^l^572^17^0^ X^330^r^571^13^0^ X^330^l^569^15^0^ X^330^l^566^14^0^ X^330^l^164^6^0^ X^330^D^39^19^0^ S^331^0^V^credito^DECIMAL(12,2)^^global D^331^39^39^27^0^0 X^331^r^674^26^0^ X^331^r^659^25^0^ X^331^l^659^14^0^ X^331^r^600^25^0^ X^331^l^600^14^0^ X^331^l^167^6^0^ X^331^D^39^27^0^ S^332^0^V^credito1^DECIMAL(12,2)^^global D^332^39^39^35^0^0 X^332^r^666^42^0^ X^332^r^662^28^0^ X^332^r^659^35^0^ X^332^r^658^13^0^ X^332^l^656^17^0^ X^332^r^655^13^0^ X^332^r^654^29^0^ X^332^l^653^14^0^ X^332^l^652^14^0^ X^332^r^607^72^0^ X^332^r^604^28^0^ X^332^r^600^35^0^ X^332^r^599^29^0^ X^332^r^598^13^0^ X^332^l^596^17^0^ X^332^r^595^13^0^ X^332^l^593^15^0^ X^332^l^166^6^0^ X^332^D^39^35^0^ S^333^0^V^select_ac^STRING^^global D^333^40^40^12^0^0 X^333^D^40^12^0^ S^334^0^V^usuarios^STRING^^global D^334^40^40^22^0^0 X^334^r^80^33^0^ X^334^l^77^28^0^ X^334^D^40^22^0^ S^335^0^V^clave^STRING^^global D^335^40^40^31^0^0 X^335^r^80^48^0^ X^335^l^78^28^0^ X^335^D^40^31^0^ S^336^0^V^impresor^STRING^^global D^336^40^40^37^0^0 X^336^l^79^28^0^ X^336^D^40^37^0^ S^337^0^V^selec_v^STRING^^global D^337^40^40^46^0^0 X^337^r^194^26^0^ X^337^r^193^9^0^ X^337^l^179^12^0^ X^337^D^40^46^0^ S^338^0^V^archivo^STRING^^global D^338^40^40^54^0^0 X^338^D^40^54^0^ S^339^0^V^archivo1^STRING^^global D^339^40^40^62^0^0 X^339^D^40^62^0^ S^340^0^V^lj^SMALLINT^^global D^340^41^41^12^0^0 X^340^r^518^26^0^ X^340^l^514^11^0^ X^340^r^309^26^0^ X^340^l^305^11^0^ X^340^D^41^12^0^ S^341^0^V^idx_ac^SMALLINT^^global D^341^41^41^15^0^0 X^341^D^41^15^0^ S^342^0^V^ano^SMALLINT^^global D^342^41^41^22^0^0 X^342^D^41^22^0^ S^343^0^V^idx_a^SMALLINT^^global D^343^41^41^26^0^0 X^343^D^41^26^0^ S^344^0^V^idx_c^SMALLINT^^global D^344^41^41^32^0^0 X^344^D^41^32^0^ S^345^0^V^l^SMALLINT^^global D^345^41^41^38^0^0 X^345^r^525^25^0^ X^345^l^524^16^0^ X^345^r^521^25^0^ X^345^l^520^16^0^ X^345^l^455^44^0^ X^345^l^452^9^0^ X^345^r^316^25^0^ X^345^l^315^16^0^ X^345^r^312^25^0^ X^345^l^311^16^0^ X^345^D^41^38^0^ S^346^0^V^ano_act^CHAR(4)^^global D^346^42^42^12^0^0 X^346^D^42^12^0^ S^347^0^V^c_ano^CHAR(4)^^global D^347^42^42^20^0^0 X^347^D^42^20^0^ S^348^0^V^fecha_2^CHAR(8)^^global D^348^43^43^12^0^0 X^348^D^43^12^0^ S^349^0^V^nombre_cta^CHAR(30)^^global D^349^44^44^12^0^0 X^349^r^661^28^0^ X^349^l^650^17^0^ X^349^l^646^36^0^ X^349^l^645^14^0^ X^349^r^635^28^0^ X^349^l^620^17^0^ X^349^l^616^33^0^ X^349^r^603^28^0^ X^349^r^582^28^0^ X^349^l^564^17^0^ X^349^l^560^36^0^ X^349^l^559^14^0^ X^349^D^44^12^0^ S^350^0^V^fecha_ini_per^CHAR(8)^^global D^350^45^45^12^0^0 X^350^D^45^12^0^ S^351^0^V^iptb05^RECORD^^global D^351^46^46^12^0^0 X^351^D^46^12^0^ S^352^351^V^cod_mov^SMALLINT^decomarmol.iptb00005.cod_mov^ D^352^0^0^0^0^0 X^352^D^46^12^0^ S^353^351^V^descrip_mov^CHAR(40)^decomarmol.iptb00005.descrip_mov^ D^353^0^0^0^0^0 X^353^D^46^12^0^ S^354^351^V^status_mov^CHAR(1)^decomarmol.iptb00005.status_mov^ D^354^0^0^0^0^0 X^354^D^46^12^0^ S^355^351^V^cuenta_1^CHAR(8)^decomarmol.iptb00005.cuenta_1^ D^355^0^0^0^0^0 X^355^D^46^12^0^ S^356^351^V^cuenta_2^CHAR(8)^decomarmol.iptb00005.cuenta_2^ D^356^0^0^0^0^0 X^356^D^46^12^0^ S^357^351^V^cuenta_3^CHAR(8)^decomarmol.iptb00005.cuenta_3^ D^357^0^0^0^0^0 X^357^D^46^12^0^ S^358^351^V^status_t^CHAR(1)^decomarmol.iptb00005.status_t^ D^358^0^0^0^0^0 X^358^D^46^12^0^ S^359^351^V^us_crea^CHAR(9)^decomarmol.iptb00005.us_crea^ D^359^0^0^0^0^0 X^359^D^46^12^0^ S^360^351^V^fech_crea^DATE^decomarmol.iptb00005.fech_crea^ D^360^0^0^0^0^0 X^360^D^46^12^0^ S^361^351^V^us_mod^CHAR(9)^decomarmol.iptb00005.us_mod^ D^361^0^0^0^0^0 X^361^D^46^12^0^ S^362^351^V^fech_mod^DATE^decomarmol.iptb00005.fech_mod^ D^362^0^0^0^0^0 X^362^D^46^12^0^ S^363^351^V^control_clientes^CHAR(3)^decomarmol.iptb00005.control_clientes^ D^363^0^0^0^0^0 X^363^D^46^12^0^ S^364^351^V^control_despacho^CHAR(2)^decomarmol.iptb00005.control_despacho^ D^364^0^0^0^0^0 X^364^D^46^12^0^ S^365^351^V^control_devolucion^CHAR(2)^decomarmol.iptb00005.control_devolucion^ D^365^0^0^0^0^0 X^365^D^46^12^0^ S^366^351^V^control_transferencia^CHAR(2)^decomarmol.iptb00005.control_transferencia^ D^366^0^0^0^0^0 X^366^D^46^12^0^ S^367^351^V^control_departamento^CHAR(2)^decomarmol.iptb00005.control_departamento^ D^367^0^0^0^0^0 X^367^D^46^12^0^ S^368^0^V^Pclave^CHAR(12)^^global D^368^47^47^12^0^0 X^368^r^251^81^0^ X^368^l^229^15^0^ X^368^D^47^12^0^ S^369^0^V^HANDLER^om.SaxDocumentHandler^^global D^369^48^48^12^0^0 X^369^r^202^45^0^ X^369^r^201^44^0^ X^369^l^199^45^0^ X^369^D^48^12^0^ S^370^0^V^r_output^STRING^^global D^370^49^49^12^0^0 X^370^r^199^25^0^ X^370^l^198^39^0^ X^370^D^49^12^0^ S^371^0^V^afecta^STRING^^global D^371^49^49^21^0^0 X^371^r^663^13^0^ X^371^r^637^13^0^ X^371^r^605^13^0^ X^371^r^584^13^0^ X^371^l^105^37^0^ X^371^D^49^21^0^ S^372^0^V^detalle_ent^STRING^^global D^372^49^49^28^0^0 X^372^D^49^28^0^ S^373^0^V^normal^CHAR(3)^^global D^373^52^52^9^0^0 X^373^D^52^9^0^ S^374^0^V^negrilla_on^CHAR(3)^^global D^374^52^52^16^0^0 X^374^D^52^16^0^ S^375^0^V^negrillas_of^CHAR(3)^^global D^375^52^52^28^0^0 X^375^D^52^28^0^ S^376^0^V^comp_on^CHAR(3)^^global D^376^52^52^41^0^0 X^376^D^52^41^0^ S^377^0^V^comp_off^CHAR(3)^^global D^377^52^52^49^0^0 X^377^D^52^49^0^ S^378^0^V^doce^CHAR(3)^^global D^378^52^52^58^0^0 X^378^D^52^58^0^ S^379^0^V^doble_on^CHAR(3)^^global D^379^52^52^63^0^0 X^379^D^52^63^0^ S^380^0^V^doble_off^CHAR(3)^^global D^380^52^52^72^0^0 X^380^D^52^72^0^ S^381^0^V^cmd^CHAR(150)^^global D^381^54^54^10^0^0 X^381^D^54^10^0^ S^382^0^V^imprime^CHAR(150)^^global D^382^54^54^14^0^0 X^382^D^54^14^0^ S^383^0^V^copia^CHAR(150)^^global D^383^54^54^22^0^0 X^383^D^54^22^0^ S^384^0^V^detalle^CHAR(30)^^global D^384^56^56^8^0^0 X^384^r^682^27^0^ X^384^r^665^57^0^ X^384^r^639^52^0^ X^384^r^607^57^0^ X^384^r^586^57^0^ X^384^l^105^44^0^ X^384^D^56^8^0^ S^385^0^V^mes^SMALLINT^^global D^385^57^57^8^0^0 X^385^D^57^8^0^ S^386^0^V^tasa^DECIMAL(5,2)^^global D^386^58^58^8^0^0 X^386^D^58^8^0^ S^387^0^V^p_fecha^DATE^^global D^387^59^59^8^0^0 X^387^r^131^23^0^ X^387^r^121^25^0^ X^387^l^119^35^0^ X^387^D^59^8^0^ S^388^0^V^fecha1^DATE^^global D^388^59^59^16^0^0 X^388^r^187^90^0^ X^388^r^142^13^0^ X^388^r^131^13^0^ X^388^r^126^14^0^ X^388^l^123^28^0^ X^388^l^121^16^0^ X^388^l^105^23^0^ X^388^D^59^16^0^ S^389^0^V^fecha2^DATE^^global D^389^59^59^24^0^0 X^389^r^664^42^0^ X^389^r^638^42^0^ X^389^r^606^42^0^ X^389^r^585^42^0^ X^389^r^528^35^0^ X^389^r^319^35^0^ X^389^r^188^17^0^ X^389^r^142^22^0^ X^389^r^137^15^0^ X^389^l^105^30^0^ X^389^D^59^24^0^ S^390^0^V^nominas^CHAR(1)^^global D^390^60^60^8^0^0 X^390^D^60^8^0^ S^391^0^V^entra^CHAR(14)^^global D^391^61^61^8^0^0 X^391^r^664^51^0^ X^391^r^638^51^0^ X^391^r^606^51^0^ X^391^r^585^51^0^ X^391^r^533^38^0^ X^391^r^149^52^0^ X^391^r^116^26^0^ X^391^r^109^26^0^ X^391^l^105^17^0^ X^391^D^61^8^0^ S^392^0^V^entra1^CHAR(5)^^global D^392^62^62^8^0^0 X^392^r^120^29^0^ X^392^l^116^17^0^ X^392^D^62^8^0^ S^393^0^V^tipo_papel^SMALLINT^^global D^393^63^63^8^0^0 X^393^r^101^19^0^ X^393^l^100^9^0^ X^393^D^63^8^0^ S^394^0^V^mano_ob^DECIMAL(12,2)^^global D^394^65^65^8^0^0 X^394^D^65^8^0^ S^395^0^V^material^DECIMAL(12,2)^^global D^395^65^65^16^0^0 X^395^D^65^16^0^ S^396^0^V^material9^DECIMAL(12,2)^^global D^396^65^65^25^0^0 X^396^D^65^25^0^ S^397^0^V^material6^DECIMAL(12,2)^^global D^397^65^65^35^0^0 X^397^D^65^35^0^ S^398^0^V^gastos^DECIMAL(12,2)^^global D^398^65^65^45^0^0 X^398^D^65^45^0^ S^399^0^V^salir1^CHAR(1)^^global D^399^71^71^8^0^0 X^399^D^71^8^0^ S^400^0^V^idx^INTEGER^^global D^400^72^72^8^0^0 X^400^D^72^8^0^ S^401^0^F^configureoutput^^^extern X^401^c^199^9^0^ S^402^0^F^seleccionarsalida^^^extern X^402^c^198^9^0^ S^403^0^F^msgrp000^^^extern X^403^c^101^10^0^ T^9^73^d^0^0^DEFINE T^10^73^d^0^0^GLOBALS DEFINE T^13^72^d^0^0^DEFINE T^15^33^d^0^0^RECORD T^75^83^f^0^0^MAIN T^75^75^d^0^0^DEFINE T^85^257^f^0^0^FUNCTION T^85^85^d^0^0^DEFINE T^105^156^i^0^0^INPUT T^107^116^i^0^0^ T^111^114^c^0^0^IF T^112^112^c^0^0^THEN T^118^123^i^0^0^ T^125^134^i^0^0^ T^126^129^c^0^0^IF T^127^127^c^0^0^THEN T^131^134^c^0^0^IF T^132^132^c^0^0^THEN T^136^154^i^0^0^ T^137^140^c^0^0^IF T^138^138^c^0^0^THEN T^142^145^c^0^0^IF T^143^143^c^0^0^THEN T^151^154^c^0^0^IF T^152^152^c^0^0^THEN T^159^163^c^0^0^IF T^160^162^c^0^0^THEN T^210^252^l^0^0^FOREACH T^218^222^c^0^0^IF T^219^221^c^0^0^THEN T^233^235^c^0^0^IF T^234^234^c^0^0^THEN T^236^238^c^0^0^IF T^237^237^c^0^0^THEN T^239^241^c^0^0^IF T^240^240^c^0^0^THEN T^259^444^f^0^0^REPORT T^260^285^d^0^0^DEFINE T^262^280^d^0^0^RECORD r^102^TOP MARGIN^0 r^102^LEFT MARGIN^0 r^102^BOTTOM MARGIN^2 r^102^ORDER EXTERNAL^0 o^102^116^1 o^102^160^1 o^102^143^1 T^294^366^a^0^0^PAGE HEADER x^308^0^ p^c^1 p^l^edprrp025 p^c^expr p^e^ p^c^75 p^l^Pag. p^e^ x^312^0^ p^c^expr p^l^Sistema de Entradas Al Diario p^c^75 p^e^ x^316^0^ p^c^expr p^l^Ventas al Contado p^c^78 p^v^184 x^319^0^ p^c^34 p^l^Al p^v^389 x^347^0^ p^c^1 p^l^-------------------------------------------------- p^l^-------------------------------------------------- p^l^------------------------------ x^351^0^ p^c^49 p^l^MONTO p^c^64 p^l^MONTO p^c^79 p^l^MONTO p^c^94 p^l^MONTO p^c^121 p^l^CANTIDADES x^356^0^ p^c^1 p^l^PRODUCTO p^c^49 p^l^BRUTO p^c^60 p^l^DESCUENTO p^c^79 p^l^ITBI p^c^94 p^l^NETO p^c^123 p^l^VENDIDAS x^363^0^ p^c^1 p^l^-------------------------------------------------- p^l^-------------------------------------------------- p^l^------------------------------ T^369^375^a^0^0^BEFORE GROUP OF 116 T^371^375^c^0^0^IF T^372^372^c^0^0^THEN x^372^0^ p^l^**** SAN CRISTOBAL **** T^373^374^c^0^0^ELSE x^374^0^ p^l^**** SANTO DOMINGO **** T^377^383^a^0^0^BEFORE GROUP OF 160 T^379^383^c^0^0^IF T^380^380^c^0^0^THEN x^380^0^ p^l^PRODUCTO LOCAL T^381^382^c^0^0^ELSE x^382^0^ p^l^PRODUCTO IMPORTADO T^385^387^a^0^0^BEFORE GROUP OF 143 T^389^396^a^0^0^AFTER GROUP OF 143 x^391^0^ p^c^1 p^v^143 p^l^ p^e^ p^c^40 p^e^ p^c^55 p^e^ p^c^70 p^e^ p^c^85 p^e^ p^c^115 p^e^ T^398^409^a^0^0^AFTER GROUP OF 160 x^399^0^ p^c^40 p^l^-------------- p^c^55 p^l^-------------- p^c^70 p^l^-------------- p^c^85 p^l^-------------- p^c^115 p^l^--------------- x^404^0^ p^c^1 p^l^Total Por Origen Producto ---> p^c^40 p^e^ p^c^55 p^e^ p^c^70 p^e^ p^c^85 p^e^ p^c^115 p^e^ T^411^422^a^0^0^AFTER GROUP OF 116 x^412^0^ p^c^40 p^l^-------------- p^c^55 p^l^-------------- p^c^70 p^l^-------------- p^c^85 p^l^-------------- p^c^115 p^l^--------------- x^417^0^ p^c^1 p^l^Total Por Localidad ---> p^c^40 p^e^ p^c^55 p^e^ p^c^70 p^e^ p^c^85 p^e^ p^c^115 p^e^ T^424^443^a^0^0^ON LAST ROW x^425^0^ p^c^40 p^l^-------------- p^c^55 p^l^-------------- p^c^70 p^l^-------------- p^c^85 p^l^-------------- p^c^115 p^l^--------------- x^431^0^ p^c^1 p^l^Total Ventas ---> p^c^40 p^e^ p^c^55 p^e^ p^c^70 p^e^ p^c^85 p^e^ p^c^115 p^e^ x^437^0^ p^c^40 p^l^============== p^c^55 p^l^============== p^c^70 p^l^============== p^c^85 p^l^============== p^c^115 p^l^=============== T^446^463^f^0^0^FUNCTION T^447^448^d^0^0^DEFINE T^465^686^f^0^0^REPORT T^466^495^d^0^0^DEFINE T^468^486^d^0^0^RECORD r^5^TOP MARGIN^0 r^5^LEFT MARGIN^0 r^5^BOTTOM MARGIN^2 r^5^ORDER EXTERNAL^0 o^5^86^1 T^504^550^a^0^0^PAGE HEADER x^516^0^ p^v^97 x^517^0^ p^c^1 p^l^edprrp004 p^c^expr p^e^ p^c^75 p^l^Pag. p^e^ x^521^0^ p^c^expr p^l^Sistema de Entradas Al Diario p^c^75 p^e^ x^525^0^ p^c^expr p^l^Ventas al Contado p^c^78 p^v^100 x^528^0^ p^c^34 p^l^Al p^v^389 x^531^0^ p^c^1 p^e^ p^e^ p^e^ x^532^0^ p^c^01 p^l^Entrada de Diario No. p^v^92 p^v^391 p^v^93 x^534^0^ p^c^1 p^l^Observaciones: _____________________________________ x^535^0^ p^c^1 p^l^ _____________________________________ x^537^0^ p^c^1 p^l^-------------------------------------------------- p^l^---------------------------------------- p^v^94 x^542^0^ p^c^2 p^l^Cuenta p^c^11 p^l^Dpto p^c^18 p^l^Concepto p^c^50 p^l^Debe p^c^71 p^l^Haber p^v^95 x^548^0^ p^c^1 p^l^-------------------------------------------------- p^l^---------------------------------------- T^552^611^a^0^0^AFTER GROUP OF 86 T^563^565^c^0^0^IF T^564^564^c^0^0^THEN T^567^611^c^0^0^CASE T^568^589^c^0^0^WHEN T^571^573^c^0^0^IF T^572^572^c^0^0^THEN T^574^576^c^0^0^IF T^575^575^c^0^0^THEN T^577^589^c^0^0^IF T^578^588^c^0^0^THEN x^580^0^ p^c^2 p^v^80 p^c^11 p^v^81 p^c^18 p^e^ p^c^50 p^v^330 T^584^588^c^0^0^IF T^585^587^c^0^0^THEN T^592^610^c^0^0^WHEN T^595^597^c^0^0^IF T^596^596^c^0^0^THEN T^598^610^c^0^0^IF T^599^609^c^0^0^THEN x^601^0^ p^c^2 p^v^80 p^c^11 p^v^81 p^c^18 p^e^ p^c^50 p^v^332 T^605^609^c^0^0^IF T^606^608^c^0^0^THEN T^614^684^a^0^0^ON LAST ROW T^619^621^c^0^0^IF T^620^620^c^0^0^THEN T^626^628^c^0^0^IF T^627^627^c^0^0^THEN T^629^631^c^0^0^IF T^630^630^c^0^0^THEN T^632^642^c^0^0^IF T^633^641^c^0^0^THEN x^634^0^ p^c^2 p^l^1100 p^c^18 p^e^ p^c^50 p^v^330 T^637^641^c^0^0^IF T^638^640^c^0^0^THEN T^649^651^c^0^0^IF T^650^650^c^0^0^THEN T^655^657^c^0^0^IF T^656^656^c^0^0^THEN T^658^668^c^0^0^IF T^659^667^c^0^0^THEN x^660^0^ p^c^2 p^l^2128-01 p^c^18 p^e^ p^c^65 p^v^332 T^663^667^c^0^0^IF T^664^666^c^0^0^THEN x^670^0^ p^c^50 p^l^-------------- p^c^65 p^l^-------------- x^672^0^ p^c^35 p^l^Totales--> p^c^50 p^v^329 p^c^65 p^v^331 p^v^95 x^682^0^ p^c^1 p^v^384 x^683^0^ p^c^1 p^v^97 p^v^95