This commit is contained in:
2026-10-16 17:07:28 -04:00
23 changed files with 2089 additions and 267 deletions
+1 -1
View File
@@ -11,7 +11,7 @@
END RECORD,
nombre_cia STRING
FUNCTION impresion(pnumoc)
FUNCTION impresion_oc(pnumoc)
DEFINE pnumoc,I INT
DECLARE busca_orden CURSOR FOR
+1 -1
View File
@@ -177,7 +177,7 @@ END RECORD
" ORDEN ECOMMERCE ",orden_externa USING "&&&&&&&"
INPUT ARRAY detalle FROM sdetalle.* ATTRIBUTE(WITHOUT DEFAULTS)
ON ACTION impresion ATTRIBUTE(TEXT="Orden",IMAGE="printer")
CALL impresion(pnum_oc)
CALL impresion_oc(pnum_oc)
ON ACTION etiqueta ATTRIBUTE(TEXT="Label",IMAGE="fa-tag")
LET datos.celular = orden.celular
LET datos.cliente = orden.nombre_envio
+146
View File
@@ -0,0 +1,146 @@
<?xml version="1.0" encoding="UTF-8"?>
<report:Report xmlns:rtl="http://www.4js.com/2004/RTL" xmlns:report="http://www.4js.com/2007/REPORT" xmlns="http://www.4js.com/2004/PXML" gstVersion="3140a" version="6.00">
<report:Settings RWPageWidth="letterwidth" RWPageLength="letterlength" RWLeftMargin="0.5inch" RWTopMargin="0.5inch" RWRightMargin="0.5inch" RWBottomMargin="0.5inch">
<report:FormatList>
<report:Format-SVG/>
<report:Format-PDF/>
<report:Format-image/>
</report:FormatList>
</report:Settings>
<report:Data RWDataLocation="../ipdir/ipprrp047.rdd" RWFglReportName="opera"/>
<report:Conflicts/>
<rtl:stylesheet>
<PXML>
<rtl:match name="Report" nameConstraint="Report">
<MINIPAGE name="Page Root" width="max" length="max" alignment="near">
<LAYOUTNODE name="Cabeceras" width="min" length="min" fontSize="8" fontBold="true" port="anyPageHeader" floatingBehavior="enclosed">
<LAYOUTNODE name="Enc.Principal" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox" width="38.5" floatingBehavior="enclosed" text="ipprrp047"/>
<rtl:input-variable name="p_companias.nombre" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="p_companias.nombre Value" width="459.302" floatingBehavior="enclosed" text="{{p_companias.nombre}}" textAlignment="center"/>
<WORDBOX name="WordBox3" floatingBehavior="enclosed" text="Pagina: "/>
<PAGENOBOX name="PageNoBox" width="9.5" floatingBehavior="enclosed"/>
</LAYOUTNODE>
<LAYOUTNODE name="Enc.Secundario" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<rtl:input-variable name="rango_fecha" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="rango_fecha Value" width="width(&quot;M&quot;)*20" floatingBehavior="enclosed" text="{{rango_fecha}}"/>
<WORDBOX name="WordBox5" width="342.328" alignment="near" floatingBehavior="enclosed" text=" Reporte productos terminados"/>
<rtl:input-variable name="fecha_reporte" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="fecha_reporte Value" alignment="near" floatingBehavior="enclosed" text="{{fecha_reporte}}"/>
</LAYOUTNODE>
<MINIPAGE name="Titulo1" width="9.2883" length="537.324" fontSize="7" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox2" width="260.309" alignment="center" floatingBehavior="enclosed" text="Producto"/>
<WORDBOX name="WordBox4_1" width="33.3244" alignment="baseline" floatingBehavior="enclosed" text="Cantidad"/>
<WORDBOX name="WordBox4_2" width="32.3514" alignment="baseline" floatingBehavior="enclosed" text="Material"/>
<WORDBOX name="WordBox4_3" width="40.1171" length="10.2883" alignment="baseline" floatingBehavior="enclosed" text="V.material"/>
<WORDBOX name="WordBox4_4" width="35.495" length="10.2883" alignment="baseline" floatingBehavior="enclosed" text="Labor"/>
<WORDBOX name="WordBox4_5_1" width="37.566" length="10.2883" alignment="baseline" floatingBehavior="enclosed" text="V.labor"/>
<WORDBOX name="WordBox4_5" width="33.566" length="10.2883" alignment="baseline" floatingBehavior="enclosed" text="Gasto"/>
<WORDBOX name="WordBox4_6" width="38.3124" length="10.2883" alignment="near" floatingBehavior="enclosed" text="V.gasto"/>
<WORDBOX name="WordBox4" width="23.9461" length="8.89765" alignment="center" floatingBehavior="enclosed" text="V.Total"/>
</MINIPAGE>
</LAYOUTNODE>
<rtl:match name="Group cod_cia" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:match name="Group cod_mov" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="titulo_mov" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="titulo_mov Value" width="234" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{titulo_mov}}"/>
<rtl:match name="Group departamento" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="x.departamento" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.departamento Value" width="233.5" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{x.departamento}}"/>
<rtl:match name="OnEveryRow" nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Data" width="min" length="538.746" fontSize="5" layoutDirection="leftToRight">
<rtl:input-variable name="producto" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="producto Value" width="262.827" alignment="baseline" fontSize="5" floatingBehavior="enclosed" text="{{producto}}"/>
<rtl:input-variable name="x.consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.consumo Value" width="26.2623" anchorX="1" alignment="baseline" fontSize="5" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,-----&amp;.&amp;&amp;" value="{{x.consumo}}"/>
<rtl:input-variable name="x.material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.material Value" width="30.7929" anchorX="1" alignment="baseline" fontSize="5" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.material}}"/>
<rtl:input-variable name="v_material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="v_material Value" width="38.6108" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{v_material}}"/>
<rtl:input-variable name="x.labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.labor Value" width="27.0502" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.labor}}"/>
<rtl:input-variable name="v_labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="v_labor Value" width="39.0459" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{v_labor}}"/>
<rtl:input-variable name="x.gastos" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.gastos Value" width="34.2279" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.gastos}}"/>
<rtl:input-variable name="v_gasto" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="v_gasto Value" width="39.5104" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{v_gasto}}"/>
<rtl:input-variable name="total_costo_st" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_costo_st Value" width="37.0251" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$---,---,-&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_costo_st}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_departamento" width="min" length="538.703" alignment="near" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox6" width="262.382" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Total departamento: "/>
<rtl:input-variable name="t_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_consumo Value" width="25.9289" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_consumo}}"/>
<rtl:input-variable name="t_material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_material Value" width="30.5858" length="6.5" anchorX="1" alignment="far" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_material}}"/>
<rtl:input-variable name="total_material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_material Value" width="39.5148" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_material}}"/>
<rtl:input-variable name="t_labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_labor Value" width="26.5356" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_labor}}"/>
<rtl:input-variable name="total_labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_labor Value" width="39.0208" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_labor}}"/>
<rtl:input-variable name="t_gasto" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_gasto Value" width="34.3137" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_gasto}}"/>
<rtl:input-variable name="total_gastos" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_gastos Value" width="39.9497" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_gastos}}"/>
<rtl:input-variable name="total_valor_departamento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_valor_departamento Value" width="36.7678" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_valor_departamento}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_movimiento" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox8" width="262.382" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total Movimiento: "/>
<rtl:input-variable name="t_m_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_consumo Value" width="25.636" length="5.04545" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_consumo}}"/>
<rtl:input-variable name="t_m_material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_material Value" width="30.6465" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_material}}"/>
<rtl:input-variable name="total_material_movimiento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_material_movimiento Value" width="39.3683" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_material_movimiento}}"/>
<rtl:input-variable name="t_m_labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_labor Value" width="26.6821" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_labor}}"/>
<rtl:input-variable name="total_labor_movimiento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_labor_movimiento Value" width="39.8267" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_labor_movimiento}}"/>
<rtl:input-variable name="t_m_gasto" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_gasto Value" width="33.7784" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_gasto}}"/>
<rtl:input-variable name="total_gastos_movimiento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_gastos_movimiento Value" width="39.8916" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_gastos_movimiento}}"/>
<rtl:input-variable name="total_valor_movimiento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_valor_movimiento Value" width="37.4142" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_valor_movimiento}}"/>
</MINIPAGE>
</rtl:match>
<LAYOUTNODE name="CiaNode" width="min" length="min" fontSize="5" fontBold="true" layoutDirection="leftToRight" floatingBehavior="enclosed">
<rtl:input-variable name="titulo_cia" type="FGLString" expectedLocation="expectedBefore"/>
<WORDBOX name="WordBox9" width="3.5inch" alignment="near" floatingBehavior="enclosed" textAlignment="right" text="{{&quot;TOTAL ORIGEN: &quot;+titulo_cia.trim()}}"/>
<rtl:input-variable name="t_consumo_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_consumo_cia Value" class="grwNumericValue" width=".5inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_consumo_cia}}"/>
<rtl:input-variable name="t_material_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_material_cia Value" class="grwNumericValue" width="1inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="--,---,---,---,--&amp;.&amp;&amp;" value="{{t_material_cia}}"/>
<rtl:input-variable name="t_labor_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_labor_cia Value" class="grwNumericValue" width=".9inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_labor_cia}}"/>
<rtl:input-variable name="t_gasto_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_gasto_cia Value" class="grwNumericValue" width=".5inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,--&amp;.&amp;&amp;" value="{{t_gasto_cia}}"/>
<rtl:input-variable name="t_general_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_general_cia Value" class="grwNumericValue" width="1inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="--,---,---,---,--&amp;.&amp;&amp;" value="{{t_general_cia}}"/>
</LAYOUTNODE>
</rtl:match>
<rtl:match name="OnLastRow" nameConstraint="OnLastRow" minOccurs="0" maxOccurs="1">
<LAYOUTNODE name="totalgeneral" width="min" length="min" fontSize="5" fontBold="true" layoutDirection="leftToRight" floatingBehavior="enclosed" roundedCorners="true" borderStyle="solid">
<WORDBOX name="WordBox10" width="3.5inch" floatingBehavior="enclosed" textAlignment="right" text="TOTAL GENERAL"/>
<rtl:input-variable name="total_consumo_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_consumo_gral Value" class="grwNumericValue" width=".55inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="###,##&amp;.&amp;&amp;" value="{{total_consumo_gral}}"/>
<rtl:input-variable name="total_material_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_material_gral Value" class="grwNumericValue" width="70.3951" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="###,###,#&amp;.&amp;&amp;" value="{{total_material_gral}}"/>
<rtl:input-variable name="total_labor_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_labor_gral Value" class="grwNumericValue" width="55.2863" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="###,##&amp;.&amp;&amp;" value="{{total_labor_gral}}"/>
<rtl:input-variable name="total_gastos_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_gastos_gral Value" class="grwNumericValue" width="60.1079" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="###,##&amp;.&amp;&amp;" value="{{total_gastos_gral}}"/>
<rtl:input-variable name="total_valor_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_valor_gral Value" class="grwNumericValue" width="43.7298" length="6" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="#,###,###,##&amp;.&amp;&amp;" value="{{total_valor_gral}}"/>
</LAYOUTNODE>
</rtl:match>
</MINIPAGE>
</rtl:match>
</PXML>
</rtl:stylesheet>
</report:Report>
+93
View File
@@ -0,0 +1,93 @@
<?xml version="1.0" encoding="UTF-8"?>
<report:Report xmlns:rtl="http://www.4js.com/2004/RTL" xmlns:report="http://www.4js.com/2007/REPORT" xmlns="http://www.4js.com/2004/PXML" gstVersion="31408" version="6.00">
<report:Settings RWPageWidth="letterwidth" RWPageLength="letterlength" RWLeftMargin="0.5inch" RWTopMargin="0.5inch" RWRightMargin="0.5inch" RWBottomMargin="0.5inch">
<report:FormatList>
<report:Format-SVG/>
<report:Format-PDF/>
<report:Format-image/>
</report:FormatList>
</report:Settings>
<report:Data RWDataLocation="../ipdir/IPPRRP048.rdd" RWFglReportName="opera"/>
<report:Conflicts/>
<rtl:stylesheet>
<PXML>
<rtl:match name="Report" nameConstraint="Report">
<MINIPAGE name="Page Root" width="max" length="max" alignment="near">
<LAYOUTNODE name="Cabeceras" width="min" length="min" fontSize="8" fontBold="true" port="anyPageHeader" floatingBehavior="enclosed">
<LAYOUTNODE name="Enc.Principal" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox" width="38.5" floatingBehavior="enclosed" text="ipprrp048"/>
<rtl:input-variable name="p_companias.nombre" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="p_companias.nombre Value" width="459.302" floatingBehavior="enclosed" text="{{p_companias.nombre}}" textAlignment="center"/>
<WORDBOX name="WordBox3" floatingBehavior="enclosed" text="Pagina: "/>
<PAGENOBOX name="PageNoBox" width="9.5" floatingBehavior="enclosed"/>
</LAYOUTNODE>
<LAYOUTNODE name="Enc.Secundario" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<rtl:input-variable name="rango_fecha" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="rango_fecha Value" width="width(&quot;M&quot;)*20" floatingBehavior="enclosed" text="{{rango_fecha}}"/>
<WORDBOX name="WordBox5" width="342.328" alignment="near" floatingBehavior="enclosed" text=" Reporte productos terminados"/>
<rtl:input-variable name="fecha_reporte" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="fecha_reporte Value" alignment="near" floatingBehavior="enclosed" text="{{fecha_reporte}}"/>
</LAYOUTNODE>
<MINIPAGE name="Titulo1" width="9.2883" length="537.324" fontSize="7" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox2" width="233.809" alignment="center" floatingBehavior="enclosed" text="Producto"/>
<WORDBOX name="WordBox4_1" width="33.3244" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Cantidad"/>
<WORDBOX name="WordBox9" width="36" floatingBehavior="enclosed" textAlignment="right" text="UM"/>
<WORDBOX name="WordBox10" width="50.5" floatingBehavior="enclosed" textAlignment="right" text="F.conversion"/>
<WORDBOX name="WordBox10_1" width="45.5" floatingBehavior="enclosed" textAlignment="right" text="F.Adicional"/>
<WORDBOX name="WordBox11" width="64.5" floatingBehavior="enclosed" textAlignment="right" text="Mts. Adicionales"/>
</MINIPAGE>
</LAYOUTNODE>
<rtl:match name="Group cod_mov" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="titulo_mov" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="titulo_mov Value" width="233.5" alignment="baseline" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{titulo_mov}}"/>
<rtl:match name="Group departamento" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="x.departamento" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.departamento Value" width="233.5" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{x.departamento}}"/>
<rtl:match name="OnEveryRow" nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Data" width="min" length="538.746" fontSize="5" layoutDirection="leftToRight">
<rtl:input-variable name="producto" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="producto Value" width="233.327" alignment="baseline" fontSize="5" floatingBehavior="enclosed" text="{{producto}}"/>
<rtl:input-variable name="x.consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.consumo Value" width="33.7623" anchorX="1" alignment="baseline" fontSize="5" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,-----&amp;.&amp;&amp;" value="{{x.consumo}}"/>
<rtl:input-variable name="x.unidad_med" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.unidad_med Value" width="37.5" alignment="baseline" floatingBehavior="enclosed" text="{{x.unidad_med}}" textAlignment="right"/>
<rtl:input-variable name="x.factor_conv" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.factor_conv Value" width="49.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;&amp;&amp;&amp;" value="{{x.factor_conv}}"/>
<rtl:input-variable name="x.factor_ad" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.factor_ad Value" width="47" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;&amp;&amp;&amp;" value="{{x.factor_ad}}"/>
<rtl:input-variable name="x.mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.mtsAdicionales Value" width="61.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_departamento" width="min" length="538.703" alignment="near" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox6" width="223.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Total departamento: "/>
<rtl:input-variable name="t_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_consumo Value" width="42.4289" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_consumo}}"/>
<LAYOUTNODE name="LayoutNode2" width="5.85786" length="153.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_mtsAdicionales Value" width="41.4645" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_movimiento" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox8" width="224.542" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total Movimiento: "/>
<rtl:input-variable name="t_m_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_consumo Value" width="41.636" length="5.04545" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_consumo}}"/>
<LAYOUTNODE name="LayoutNode1" width="5.28431" length="154.438" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_m_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_mtsAdicionales Value" width="39.9792" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_general" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox13" width="223.28" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total General: "/>
<rtl:input-variable name="t_t_consumo" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="t_t_consumo Value" width="42.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_t_consumo}}"/>
<LAYOUTNODE name="LayoutNode" width="5.70476" length="154.964" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_t_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="t_t_mtsAdicionales Value" width="40.2628" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_t_mtsAdicionales}}"/>
</MINIPAGE>
</MINIPAGE>
<rtl:match name="OnLastRow" nameConstraint="OnLastRow" minOccurs="0" maxOccurs="1"/>
</rtl:match>
</PXML>
</rtl:stylesheet>
</report:Report>
+118
View File
@@ -0,0 +1,118 @@
<?xml version="1.0" encoding="UTF-8"?>
<report:Report xmlns:rtl="http://www.4js.com/2004/RTL" xmlns:report="http://www.4js.com/2007/REPORT" xmlns="http://www.4js.com/2004/PXML" gstVersion="3140a" version="6.00">
<report:Settings RWPageWidth="letterwidth" RWPageLength="letterlength" RWLeftMargin="0.5inch" RWTopMargin="0.5inch" RWRightMargin="0.5inch" RWBottomMargin="0.5inch">
<report:FormatList>
<report:Format-SVG/>
<report:Format-PDF/>
<report:Format-image/>
</report:FormatList>
</report:Settings>
<report:Data RWDataLocation="../ipdir/IPPRRP051.rdd" RWFglReportName="opera"/>
<report:Conflicts/>
<rtl:stylesheet>
<PXML>
<rtl:match name="Report" nameConstraint="Report">
<MINIPAGE name="Page Root" width="max" length="max" alignment="near">
<LAYOUTNODE name="Cabeceras" width="min" length="min" fontSize="8" fontBold="true" port="anyPageHeader" floatingBehavior="enclosed">
<LAYOUTNODE name="Enc.Principal" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox" width="38.5" floatingBehavior="enclosed" text="ipprrp051"/>
<rtl:input-variable name="p_companias.nombre" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="p_companias.nombre Value" width="459.302" floatingBehavior="enclosed" text="{{p_companias.nombre}}" textAlignment="center"/>
<WORDBOX name="WordBox3" floatingBehavior="enclosed" text="Pagina: "/>
<PAGENOBOX name="PageNoBox" width="9.5" floatingBehavior="enclosed"/>
</LAYOUTNODE>
<LAYOUTNODE name="Enc.Secundario" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<rtl:input-variable name="rango_fecha" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="rango_fecha Value" width="width(&quot;M&quot;)*20" floatingBehavior="enclosed" text="{{rango_fecha}}"/>
<WORDBOX name="WordBox5" width="342.328" alignment="near" floatingBehavior="enclosed" text=" Reporte productos terminados"/>
<rtl:input-variable name="fecha_reporte" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="fecha_reporte Value" alignment="near" floatingBehavior="enclosed" text="{{fecha_reporte}}"/>
</LAYOUTNODE>
<MINIPAGE name="Titulo1" width="9.2883" length="537.324" fontSize="7" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox2" width="233.809" alignment="center" floatingBehavior="enclosed" text="Producto"/>
<WORDBOX name="WordBox4_1" width="33.3244" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Cantidad"/>
<WORDBOX name="WordBox9" width="36" floatingBehavior="enclosed" textAlignment="right" text="UM"/>
<WORDBOX name="WordBox10" width="50.5" floatingBehavior="enclosed" textAlignment="right" text="F.conversion"/>
<WORDBOX name="WordBox10_1" width="45.5" floatingBehavior="enclosed" textAlignment="right" text="F.Adicional"/>
<WORDBOX name="WordBox11" width="64.5" floatingBehavior="enclosed" textAlignment="right" text="Mts. Adicionales"/>
</MINIPAGE>
</LAYOUTNODE>
<rtl:match name="Group cod_mov" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="titulo_mov" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="titulo_mov Value" width="233.5" alignment="baseline" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{titulo_mov}}"/>
<rtl:match name="Group departamento" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="x.departamento" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.departamento Value" width="233.5" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{x.departamento}}"/>
<rtl:match name="OnEveryRow" nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Data" width="min" length="538.746" fontSize="5" layoutDirection="leftToRight">
<rtl:input-variable name="producto" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="producto Value" width="233.327" alignment="baseline" fontSize="5" floatingBehavior="enclosed" text="{{producto}}"/>
<rtl:input-variable name="x.consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.consumo Value" width="33.7623" anchorX="1" alignment="baseline" fontSize="5" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,-----&amp;.&amp;&amp;" value="{{x.consumo}}"/>
<rtl:input-variable name="x.unidad_med" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.unidad_med Value" width="37.5" alignment="baseline" floatingBehavior="enclosed" text="{{x.unidad_med}}" textAlignment="right"/>
<rtl:input-variable name="x.factor_conv" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.factor_conv Value" width="49.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;&amp;&amp;&amp;" value="{{x.factor_conv}}"/>
<rtl:input-variable name="x.factor_ad" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.factor_ad Value" width="47" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;&amp;&amp;&amp;" value="{{x.factor_ad}}"/>
<rtl:input-variable name="x.mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.mtsAdicionales Value" width="61.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.mtsAdicionales}}"/>
</MINIPAGE>
<MINIPAGE name="total_departamento1" width="min" length="538.703" alignment="near" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="seccion" width="24.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Seccion:"/>
<rtl:input-variable name="y.seccion" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="y.seccion Value" class="grwNumericValue" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="----------#" value="{{y.seccion}}"/>
<LAYOUTNODE name="LayoutNode4" width="5.85786" length="11.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<WORDBOX name="tramo" width="24.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Tramo:"/>
<rtl:input-variable name="y.tramo" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="y.tramo Value" class="grwNumericValue" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="----------#" value="{{y.tramo}}"/>
<LAYOUTNODE name="LayoutNode4_1" width="5.85786" length="11.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<WORDBOX name="fila" width="24.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Fila:"/>
<rtl:input-variable name="y.fila" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="y.fila Value" class="grwNumericValue" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="----------#" value="{{y.fila}}"/>
<LAYOUTNODE name="LayoutNode4_2" width="5.85786" length="11.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<WORDBOX name="posicion" width="24.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Posicion:"/>
<rtl:input-variable name="y.posicion" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="y.posicion Value" class="grwNumericValue" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="----------#" value="{{y.posicion}}"/>
<LAYOUTNODE name="LayoutNode4_3" width="5.85786" length="11.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
</MINIPAGE>
<rtl:match name="For" nameConstraint="For" minOccurs="1" maxOccurs="1">
<rtl:match name="ForItem" nameConstraint="ForItem" minOccurs="0" maxOccurs="unbounded">
<rtl:match name="If" nameConstraint="If" minOccurs="1" maxOccurs="1">
<rtl:match name="IfThen" nameConstraint="IfThen" minOccurs="0" maxOccurs="1"/>
</rtl:match>
</rtl:match>
</rtl:match>
</rtl:match>
<MINIPAGE name="total_departamento" width="min" length="538.703" alignment="near" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox6" width="223.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Total departamento: "/>
<rtl:input-variable name="t_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_consumo Value" width="42.4289" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_consumo}}"/>
<LAYOUTNODE name="LayoutNode2" width="5.85786" length="153.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_mtsAdicionales Value" width="41.4645" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_movimiento" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox8" width="224.542" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total Movimiento: "/>
<rtl:input-variable name="t_m_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_consumo Value" width="41.636" length="5.04545" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_consumo}}"/>
<LAYOUTNODE name="LayoutNode1" width="5.28431" length="154.438" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_m_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_mtsAdicionales Value" width="39.9792" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_general" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox13" width="223.28" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total General: "/>
<rtl:input-variable name="t_t_consumo" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="t_t_consumo Value" width="42.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_t_consumo}}"/>
<LAYOUTNODE name="LayoutNode" width="5.70476" length="154.964" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_t_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="t_t_mtsAdicionales Value" width="40.2628" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_t_mtsAdicionales}}"/>
</MINIPAGE>
</MINIPAGE>
<rtl:match name="OnLastRow" nameConstraint="OnLastRow" minOccurs="0" maxOccurs="1"/>
</rtl:match>
</PXML>
</rtl:stylesheet>
</report:Report>
+65
View File
@@ -0,0 +1,65 @@
<?xml version="1.0" encoding="UTF-8"?>
<report:Report xmlns:rtl="http://www.4js.com/2004/RTL" xmlns:report="http://www.4js.com/2007/REPORT" xmlns="http://www.4js.com/2004/PXML" gstVersion="31405" version="6.00">
<report:Settings RWPageWidth="a4width" RWPageLength="a4length" RWLeftMargin="1.3cm" RWTopMargin="1.3cm" RWRightMargin="1.3cm" RWBottomMargin="1.3cm">
<report:FormatList>
<report:Format-SVG/>
<report:Format-PDF/>
<report:Format-image/>
</report:FormatList>
</report:Settings>
<report:Data RWDataLocation="../ipdir/ipprrp054.rdd" RWFglReportName="prt_co"/>
<report:Conflicts/>
<rtl:stylesheet>
<PXML>
<rtl:match name="Report" nameConstraint="Report" minOccurs="1" maxOccurs="1">
<MINIPAGE name="Page Root" width="max" length="max">
<LAYOUTNODE name="Page Header" width="max" length="min" port="anyPageHeader">
<MINIPAGE name="StripeLayouter3" width="min" length="max" layoutDirection="leftToRight">
<rtl:input-variable name="p_companias.nombre" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="Report Title" x="0" y="max/2" anchorX="0" anchorY="0.5" alignment="baseline" fontSize="25" baselineType="leftleft" floatingBehavior="enclosed" text="{{p_companias.nombre.trim()}}"/>
<PAGENOBOX name="PageNoBox" x="1.23857" y="max" anchorX="0" anchorY="1" alignment="baseline" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right"/>
<WORDBOX name="WordBox" floatingBehavior="enclosed" text="IPPRRP054"/>
<rtl:input-variable name="fecht" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="WordBox1" y="15cm" floatingBehavior="enclosed" text="{{fecht.trim()}}"/>
<WORDBOX name="WordBox10" x="1cm" y="7cm" fontBold="true" floatingBehavior="enclosed" text="Revision de Conduces"/>
<rtl:input-variable name="fecha1" type="FGLString" expectedLocation="expectedAhead"/>
<rtl:input-variable name="fecha2" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="WordBox11" x="1.5cm" y="7cm" floatingBehavior="enclosed" text="{{fecha1.trim()+&quot; AL &quot;+fecha2.trim()}}"/>
</MINIPAGE>
<MINIPAGE name="Separator1" width="1" length="max" bgColor="#000000" layoutDirection="leftToRight"/>
<MINIPAGE name="Table Header" class="grwTableHeader" width="min" length="max" layoutDirection="leftToRight">
<WORDBOX name="Spacer" alignment="baseline" baselineType="leftleft" port="itemSeparator" text=" "/>
<WORDBOX name="WordBox2" floatingBehavior="enclosed" text="{{&quot;Num. Documento&quot;}}"/>
<WORDBOX name="WordBox3" y="4cm" floatingBehavior="enclosed" text="Cliente"/>
<WORDBOX name="WordBox8" y="11cm" floatingBehavior="enclosed" text="Estado"/>
<WORDBOX name="WordBox12" y="14cm" floatingBehavior="enclosed" text="Fecha Creacion"/>
</MINIPAGE>
<MINIPAGE name="Separator" width="1" length="max" bgColor="#000000" layoutDirection="leftToRight"/>
</LAYOUTNODE>
<rtl:match name="Group cod_mov" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Table Row1" class="grwTableRow" width="min" length="max" layoutDirection="leftToRight">
<WORDBOX name="Spacer_2" alignment="baseline" baselineType="leftleft" port="itemSeparator" text=" "/>
<rtl:input-variable name="titulo_mov" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="WordBox5" fontBold="true" floatingBehavior="enclosed" text="{{titulo_mov.trim()}}"/>
</MINIPAGE>
<rtl:match name="OnEveryRow" nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Table Row" class="grwTableRow" width="min" length="max" alignment="near" fontSize="8" layoutDirection="leftToRight">
<WORDBOX name="Spacer_1" alignment="baseline" baselineType="leftleft" port="itemSeparator" text=" "/>
<rtl:input-variable name="x.num_doc" type="FGLNumeric" expectedLocation="expectedHere"/>
<WORDBOX name="WordBox6" width="2cm" floatingBehavior="enclosed" textAlignment="left" text="{{x.num_doc.format(&quot;&lt;&lt;&lt;&lt;&quot;)}}"/>
<rtl:input-variable name="x.cod_sp" type="FGLNumeric" expectedLocation="expectedHere"/>
<rtl:input-variable name="x.cod_sp_sec" type="FGLNumeric" expectedLocation="expectedHere"/>
<rtl:input-variable name="x.nombre" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="WordWrapBox" y="4cm" width="max/3" alignment="baseline" floatingBehavior="enclosed" text="{{x.cod_sp.format(&quot;&lt;&lt;&quot;)+&quot;-&quot;+x.cod_sp_sec.format(&quot;&lt;&lt;&lt;&lt;&quot;)+&quot; &quot;+x.nombre.trim()}}"/>
<rtl:input-variable name="x.v_estado" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="WordBox9" y="11cm" floatingBehavior="enclosed" text="{{x.v_estado.trim()}}"/>
<rtl:input-variable name="x.fecha" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="WordBox13" y="14cm" floatingBehavior="enclosed" text="{{x.fecha.trim()}}"/>
</MINIPAGE>
</rtl:match>
</rtl:match>
</MINIPAGE>
</rtl:match>
</PXML>
</rtl:stylesheet>
</report:Report>
Binary file not shown.
@@ -61,6 +61,7 @@
</rtl:match>
<rtl:match name="OnEveryRow" nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<LAYOUTNODE name="Detalle" width="min" length="max" layoutDirection="leftToRight" borderWidth="1" borderStyle="solid" borderColor="#dfdfdf">
<rtl:input-variable name="x.tipo" type="FGLString" expectedLocation="expectedHere"/>
<rtl:input-variable name="x.nivel" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.nivel Value" width="6cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="left" text="{{x.nivel}}"/>
<rtl:input-variable name="x.v01" type="FGLString" expectedLocation="expectedHere"/>
@@ -68,73 +69,73 @@
<rtl:input-variable name="x.v02" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v02 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v02}}"/>
<rtl:input-variable name="x.v03" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v03 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v03}}"/>
<WORDBOX name="x.v03 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v03}}"/>
<rtl:input-variable name="x.v04" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v04 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v04}}"/>
<rtl:input-variable name="x.v05" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v05 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v05}}"/>
<rtl:input-variable name="x.v06" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v06 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v06}}"/>
<WORDBOX name="x.v06 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v06}}"/>
<rtl:input-variable name="x.v07" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v07 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v07}}"/>
<rtl:input-variable name="x.v08" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v08 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v08}}"/>
<rtl:input-variable name="x.v09" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v09 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v09}}"/>
<WORDBOX name="x.v09 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v09}}"/>
<rtl:input-variable name="x.v10" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v10 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v10}}"/>
<rtl:input-variable name="x.v11" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v11 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v11}}"/>
<rtl:input-variable name="x.v12" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v12 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v12}}"/>
<WORDBOX name="x.v12 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v12}}"/>
<rtl:input-variable name="x.v13" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v13 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v13}}"/>
<rtl:input-variable name="x.v14" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v14 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v14}}"/>
<rtl:input-variable name="x.v15" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v15 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v15}}"/>
<WORDBOX name="x.v15 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v15}}"/>
<rtl:input-variable name="x.v16" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v16 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v16}}"/>
<rtl:input-variable name="x.v17" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v17 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v17}}"/>
<rtl:input-variable name="x.v18" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v18 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v18}}"/>
<WORDBOX name="x.v18 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v18}}"/>
<rtl:input-variable name="x.v19" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v19 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v19}}"/>
<rtl:input-variable name="x.v20" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v20 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v20}}"/>
<rtl:input-variable name="x.v21" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v21 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v21}}"/>
<WORDBOX name="x.v21 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v21}}"/>
<rtl:input-variable name="x.v22" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v22 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v22}}"/>
<rtl:input-variable name="x.v23" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v23 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v23}}"/>
<rtl:input-variable name="x.v24" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v24 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v24}}"/>
<WORDBOX name="x.v24 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v24}}"/>
<rtl:input-variable name="x.v25" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v25 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v25}}"/>
<rtl:input-variable name="x.v26" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v26 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v26}}"/>
<rtl:input-variable name="x.v27" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v27 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v27}}"/>
<WORDBOX name="x.v27 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v27}}"/>
<rtl:input-variable name="x.v28" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v28 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v28}}"/>
<rtl:input-variable name="x.v29" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v29 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v29}}"/>
<rtl:input-variable name="x.v30" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v30 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v30}}"/>
<WORDBOX name="x.v30 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v30}}"/>
<rtl:input-variable name="x.v31" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v31 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v31}}"/>
<rtl:input-variable name="x.v32" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v32 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v32}}"/>
<rtl:input-variable name="x.v33" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v33 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v33}}"/>
<WORDBOX name="x.v33 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v33}}"/>
<rtl:input-variable name="x.v34" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v34 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v34}}"/>
<rtl:input-variable name="x.v35" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v35 Value" width="1.8cm" length="0.42cm" alignment="baseline" fontSize="7" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v35}}"/>
<rtl:input-variable name="x.v36" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="x.v36 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="#eeeeee" fontSize="7" fontBold="true" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v36}}"/>
<WORDBOX name="x.v36 Value" width="1.8cm" length="0.42cm" alignment="baseline" bgColor="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;#ffffff&quot;:&quot;#eeeeee&quot;}}" fontSize="7" fontBold="{{(x.tipo==&quot;D&quot;||x.tipo==&quot;H&quot;||x.tipo==&quot;S&quot;)?&quot;false&quot;:&quot;true&quot;}}" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right" text="{{x.v36}}"/>
</LAYOUTNODE>
</rtl:match>
</MINIPAGE>
+26 -17
View File
@@ -20,6 +20,7 @@ DEFINE HANDLER om.SaxDocumentHandler, -- return value from fgl_report_commitCurr
DEFINE selec5 STRING
DEFINE anos CHAR(4)
DEFINE jdx INTEGER
DEFINE hay_filas SMALLINT
DEFINE fecha_inicio, fecha_corte, fecha1 DATE, reporte_tipo INT
MAIN
@@ -52,6 +53,7 @@ FUNCTION ctprrp004()
OPEN FORM ctfmrp004 FROM "ctfmrp004"
DISPLAY FORM ctfmrp004
CALL ui.Window.getCurrent().setText("Reporte Produccion Diaria")
CONSTRUCT criterio ON c.departamento, c.cod_prod FROM departamento, cod_prod
@@ -166,35 +168,42 @@ FUNCTION ctprrp004()
LET r_filename = 'ctprrp004.4rp'
IF fgl_report_loadCurrentSettings(r_filename) THEN
LET preview=1
CALL selectoutput() RETURNING r_output
CALL fgl_report_selectDevice(r_output) -- changing default
CALL fgl_report_selectPreview(preview) -- changing default
LET handler = fgl_report_commitCurrentSettings() -- commit changes
END IF
START REPORT reporte_detallado TO XML HANDLER HANDLER
LET fecha_actual = CURRENT YEAR TO FRACTION
DISPLAY selec5
PREPARE comando4 FROM selec5
DECLARE busca4 CURSOR FOR comando4
LET hay_filas = FALSE
FOREACH busca4 INTO prod_dia.*
IF reporte_tipo <> 1 THEN
IF NOT hay_filas THEN
IF fgl_report_loadCurrentSettings(r_filename) THEN
LET preview=1
CALL selectoutput() RETURNING r_output
CALL fgl_report_selectDevice(r_output)
CALL fgl_report_selectPreview(preview)
LET handler = fgl_report_commitCurrentSettings()
END IF
START REPORT reporte_detallado TO XML HANDLER HANDLER
LET hay_filas = TRUE
END IF
IF reporte_tipo <> 1 THEN
LET prod_dia.num_doc = 0
LET prod_dia.fecha = CURRENT
END IF
LET prod_dia.fecha = CURRENT
END IF
OUTPUT TO REPORT reporte_detallado(
prod_dia.*, fecha_inicio, fecha_corte, fecha_actual)
END FOREACH
FINISH REPORT reporte_detallado
IF hay_filas THEN
FINISH REPORT reporte_detallado
ELSE
CALL fgl_winmessage("INFO", "NO EXISTEN REGISTROS PARA ESTOS PARAMETROS", "INFO")
END IF
IF abortar_reporte THEN
RETURN
+27 -17
View File
@@ -20,6 +20,8 @@ DEFINE HANDLER om.SaxDocumentHandler, -- return value from fgl_report_commitCurr
DEFINE selec5 STRING
DEFINE anos STRING
DEFINE hay_filas SMALLINT
MAIN
DEFER INTERRUPT
CALL ARG_VAL(1) RETURNING usuarios
@@ -55,6 +57,7 @@ FUNCTION ctprrp004()
OPEN FORM ctfmrp004 FROM "ctfmrp014"
DISPLAY FORM ctfmrp004
CALL ui.Window.getCurrent().setText("Reporte Produccion Mensual")
CONSTRUCT criterio ON c.cod_prod FROM cod_prod
@@ -128,33 +131,40 @@ FUNCTION ctprrp004()
LET r_filename = 'ctprrp014.4rp'
IF fgl_report_loadCurrentSettings(r_filename) THEN
LET preview=1
CALL selectoutput() RETURNING r_output
CALL fgl_report_selectDevice(r_output) -- changing default
CALL fgl_report_selectPreview(preview) -- changing default
LET handler = fgl_report_commitCurrentSettings() -- commit changes
END IF
START REPORT reporte_mensual TO XML HANDLER HANDLER
LET fecha_actual = CURRENT YEAR TO FRACTION
DISPLAY selec5
PREPARE comando4 FROM selec5
DECLARE busca4 CURSOR FOR comando4
LET hay_filas = FALSE
FOREACH busca4 INTO prod_dia.*
IF prod_dia.semielaborado IS NULL THEN
IF NOT hay_filas THEN
IF fgl_report_loadCurrentSettings(r_filename) THEN
LET preview=1
CALL selectoutput() RETURNING r_output
CALL fgl_report_selectDevice(r_output)
CALL fgl_report_selectPreview(preview)
LET handler = fgl_report_commitCurrentSettings()
END IF
START REPORT reporte_mensual TO XML HANDLER HANDLER
LET hay_filas = TRUE
END IF
IF prod_dia.semielaborado IS NULL THEN
LET abortar_reporte = TRUE;
END IF
END IF
OUTPUT TO REPORT reporte_mensual(prod_dia.*, anos, fecha_actual);
END FOREACH
FINISH REPORT reporte_mensual
IF hay_filas THEN
FINISH REPORT reporte_mensual
ELSE
CALL fgl_winmessage("INFO", "NO EXISTEN REGISTROS PARA ESTOS PARAMETROS", "INFO")
END IF
IF abortar_reporte THEN
RETURN
+18 -2
View File
@@ -75,6 +75,7 @@ FUNCTION ipprrp048()
OPEN FORM ipfmrp048 FROM "ipfmrp048"
DISPLAY FORM ipfmrp048
CALL ui.Window.getCurrent().setText("Transacciones de Inventario por Departamento")
DISPLAY "ipprrp048" AT 4,3
DISPLAY "Operacion Por Movimiento Detallado y Valorizado" AT 6,18
@@ -167,7 +168,7 @@ END INPUT
IF fgl_report_loadCurrentSettings(r_filename) THEN
LET preview=1
CALL seleccionarsalida() RETURNING r_output -- load the .4rp file
CALL selectOutputSimple() RETURNING r_output -- load the .4rp file
CALL fgl_report_selectDevice(r_output) -- changing default
CALL fgl_report_selectPreview(preview) -- changing default
LET handler = fgl_report_commitCurrentSettings() -- commit changes
@@ -296,5 +297,20 @@ FORMAT
PRINTX t_t_consumo,t_t_mtsAdicionales
END REPORT
FUNCTION busca_departamento()
DEFINE
pdepartamento ui.combobox,
kdepartamento SMALLINT,
kdescripcion CHAR(30)
LET pdepartamento = ui.combobox.forname("formonly.departamento")
CALL pdepartamento.clear()
DECLARE pagar CURSOR FOR
SELECT departamento, nom_dpto
FROM adtb00001
WHERE status_t IS NULL
ORDER BY nom_dpto
FOREACH pagar INTO kdepartamento, kdescripcion
CALL pdepartamento.additem(kdepartamento, kdescripcion)
END FOREACH
END FUNCTION
+18 -2
View File
@@ -78,6 +78,7 @@ FUNCTION ipprrp047()
OPEN FORM ipfmrp047 FROM "ipfmrp047"
DISPLAY FORM ipfmrp047
CALL ui.Window.getCurrent().setText("Transacciones de Inventario")
DISPLAY "ipprrp047" AT 4,3
DISPLAY "Operacion Por Movimiento Detallado y Valorizado" AT 6,18
@@ -200,7 +201,7 @@ END IF
IF fgl_report_loadCurrentSettings(r_filename) THEN
LET preview=1
CALL seleccionarsalida() RETURNING r_output -- load the .4rp file
CALL selectOutputSimple() RETURNING r_output -- load the .4rp file
CALL fgl_report_selectDevice(r_output) -- changing default
CALL fgl_report_selectPreview(preview) -- changing default
LET handler = fgl_report_commitCurrentSettings() -- commit changes
@@ -504,5 +505,20 @@ FORMAT
END REPORT
FUNCTION busca_departamento()
DEFINE
pdepartamento ui.combobox,
kdepartamento SMALLINT,
kdescripcion CHAR(30)
LET pdepartamento = ui.combobox.forname("formonly.departamento")
CALL pdepartamento.clear()
DECLARE pagar CURSOR FOR
SELECT departamento, nom_dpto
FROM adtb00001
WHERE status_t IS NULL
ORDER BY nom_dpto
FOREACH pagar INTO kdepartamento, kdescripcion
CALL pdepartamento.additem(kdepartamento, kdescripcion)
END FOREACH
END FUNCTION
+146
View File
@@ -0,0 +1,146 @@
<?xml version="1.0" encoding="UTF-8"?>
<report:Report xmlns:rtl="http://www.4js.com/2004/RTL" xmlns:report="http://www.4js.com/2007/REPORT" xmlns="http://www.4js.com/2004/PXML" gstVersion="3140a" version="6.00">
<report:Settings RWPageWidth="letterwidth" RWPageLength="letterlength" RWLeftMargin="0.5inch" RWTopMargin="0.5inch" RWRightMargin="0.5inch" RWBottomMargin="0.5inch">
<report:FormatList>
<report:Format-SVG/>
<report:Format-PDF/>
<report:Format-image/>
</report:FormatList>
</report:Settings>
<report:Data RWDataLocation="../ipdir/ipprrp047.rdd" RWFglReportName="opera"/>
<report:Conflicts/>
<rtl:stylesheet>
<PXML>
<rtl:match name="Report" nameConstraint="Report">
<MINIPAGE name="Page Root" width="max" length="max" alignment="near">
<LAYOUTNODE name="Cabeceras" width="min" length="min" fontSize="8" fontBold="true" port="anyPageHeader" floatingBehavior="enclosed">
<LAYOUTNODE name="Enc.Principal" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox" width="38.5" floatingBehavior="enclosed" text="ipprrp047"/>
<rtl:input-variable name="p_companias.nombre" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="p_companias.nombre Value" width="459.302" floatingBehavior="enclosed" text="{{p_companias.nombre}}" textAlignment="center"/>
<WORDBOX name="WordBox3" floatingBehavior="enclosed" text="Pagina: "/>
<PAGENOBOX name="PageNoBox" width="9.5" floatingBehavior="enclosed"/>
</LAYOUTNODE>
<LAYOUTNODE name="Enc.Secundario" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<rtl:input-variable name="rango_fecha" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="rango_fecha Value" width="width(&quot;M&quot;)*20" floatingBehavior="enclosed" text="{{rango_fecha}}"/>
<WORDBOX name="WordBox5" width="342.328" alignment="near" floatingBehavior="enclosed" text=" Reporte productos terminados"/>
<rtl:input-variable name="fecha_reporte" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="fecha_reporte Value" alignment="near" floatingBehavior="enclosed" text="{{fecha_reporte}}"/>
</LAYOUTNODE>
<MINIPAGE name="Titulo1" width="9.2883" length="537.324" fontSize="7" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox2" width="260.309" alignment="center" floatingBehavior="enclosed" text="Producto"/>
<WORDBOX name="WordBox4_1" width="33.3244" alignment="baseline" floatingBehavior="enclosed" text="Cantidad"/>
<WORDBOX name="WordBox4_2" width="32.3514" alignment="baseline" floatingBehavior="enclosed" text="Material"/>
<WORDBOX name="WordBox4_3" width="40.1171" length="10.2883" alignment="baseline" floatingBehavior="enclosed" text="V.material"/>
<WORDBOX name="WordBox4_4" width="35.495" length="10.2883" alignment="baseline" floatingBehavior="enclosed" text="Labor"/>
<WORDBOX name="WordBox4_5_1" width="37.566" length="10.2883" alignment="baseline" floatingBehavior="enclosed" text="V.labor"/>
<WORDBOX name="WordBox4_5" width="33.566" length="10.2883" alignment="baseline" floatingBehavior="enclosed" text="Gasto"/>
<WORDBOX name="WordBox4_6" width="38.3124" length="10.2883" alignment="near" floatingBehavior="enclosed" text="V.gasto"/>
<WORDBOX name="WordBox4" width="23.9461" length="8.89765" alignment="center" floatingBehavior="enclosed" text="V.Total"/>
</MINIPAGE>
</LAYOUTNODE>
<rtl:match name="Group cod_cia" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:match name="Group cod_mov" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="titulo_mov" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="titulo_mov Value" width="234" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{titulo_mov}}"/>
<rtl:match name="Group departamento" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="x.departamento" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.departamento Value" width="233.5" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{x.departamento}}"/>
<rtl:match name="OnEveryRow" nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Data" width="min" length="538.746" fontSize="5" layoutDirection="leftToRight">
<rtl:input-variable name="producto" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="producto Value" width="262.827" alignment="baseline" fontSize="5" floatingBehavior="enclosed" text="{{producto}}"/>
<rtl:input-variable name="x.consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.consumo Value" width="26.2623" anchorX="1" alignment="baseline" fontSize="5" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,-----&amp;.&amp;&amp;" value="{{x.consumo}}"/>
<rtl:input-variable name="x.material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.material Value" width="30.7929" anchorX="1" alignment="baseline" fontSize="5" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.material}}"/>
<rtl:input-variable name="v_material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="v_material Value" width="38.6108" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{v_material}}"/>
<rtl:input-variable name="x.labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.labor Value" width="27.0502" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.labor}}"/>
<rtl:input-variable name="v_labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="v_labor Value" width="39.0459" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{v_labor}}"/>
<rtl:input-variable name="x.gastos" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.gastos Value" width="34.2279" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.gastos}}"/>
<rtl:input-variable name="v_gasto" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="v_gasto Value" width="39.5104" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{v_gasto}}"/>
<rtl:input-variable name="total_costo_st" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_costo_st Value" width="37.0251" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$---,---,-&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_costo_st}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_departamento" width="min" length="538.703" alignment="near" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox6" width="262.382" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Total departamento: "/>
<rtl:input-variable name="t_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_consumo Value" width="25.9289" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_consumo}}"/>
<rtl:input-variable name="t_material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_material Value" width="30.5858" length="6.5" anchorX="1" alignment="far" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_material}}"/>
<rtl:input-variable name="total_material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_material Value" width="39.5148" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_material}}"/>
<rtl:input-variable name="t_labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_labor Value" width="26.5356" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_labor}}"/>
<rtl:input-variable name="total_labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_labor Value" width="39.0208" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_labor}}"/>
<rtl:input-variable name="t_gasto" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_gasto Value" width="34.3137" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_gasto}}"/>
<rtl:input-variable name="total_gastos" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_gastos Value" width="39.9497" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_gastos}}"/>
<rtl:input-variable name="total_valor_departamento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_valor_departamento Value" width="36.7678" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_valor_departamento}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_movimiento" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox8" width="262.382" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total Movimiento: "/>
<rtl:input-variable name="t_m_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_consumo Value" width="25.636" length="5.04545" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_consumo}}"/>
<rtl:input-variable name="t_m_material" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_material Value" width="30.6465" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_material}}"/>
<rtl:input-variable name="total_material_movimiento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_material_movimiento Value" width="39.3683" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_material_movimiento}}"/>
<rtl:input-variable name="t_m_labor" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_labor Value" width="26.6821" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_labor}}"/>
<rtl:input-variable name="total_labor_movimiento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_labor_movimiento Value" width="39.8267" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_labor_movimiento}}"/>
<rtl:input-variable name="t_m_gasto" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_gasto Value" width="33.7784" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_gasto}}"/>
<rtl:input-variable name="total_gastos_movimiento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_gastos_movimiento Value" width="39.8916" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_gastos_movimiento}}"/>
<rtl:input-variable name="total_valor_movimiento" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_valor_movimiento Value" width="37.4142" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="$&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&lt;,&lt;&lt;&amp;.&amp;&amp;" value="{{total_valor_movimiento}}"/>
</MINIPAGE>
</rtl:match>
<LAYOUTNODE name="CiaNode" width="min" length="min" fontSize="5" fontBold="true" layoutDirection="leftToRight" floatingBehavior="enclosed">
<rtl:input-variable name="titulo_cia" type="FGLString" expectedLocation="expectedBefore"/>
<WORDBOX name="WordBox9" width="3.5inch" alignment="near" floatingBehavior="enclosed" textAlignment="right" text="{{&quot;TOTAL ORIGEN: &quot;+titulo_cia.trim()}}"/>
<rtl:input-variable name="t_consumo_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_consumo_cia Value" class="grwNumericValue" width=".5inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_consumo_cia}}"/>
<rtl:input-variable name="t_material_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_material_cia Value" class="grwNumericValue" width="1inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="--,---,---,---,--&amp;.&amp;&amp;" value="{{t_material_cia}}"/>
<rtl:input-variable name="t_labor_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_labor_cia Value" class="grwNumericValue" width=".9inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_labor_cia}}"/>
<rtl:input-variable name="t_gasto_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_gasto_cia Value" class="grwNumericValue" width=".5inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,--&amp;.&amp;&amp;" value="{{t_gasto_cia}}"/>
<rtl:input-variable name="t_general_cia" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_general_cia Value" class="grwNumericValue" width="1inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="--,---,---,---,--&amp;.&amp;&amp;" value="{{t_general_cia}}"/>
</LAYOUTNODE>
</rtl:match>
<rtl:match name="OnLastRow" nameConstraint="OnLastRow" minOccurs="0" maxOccurs="1">
<LAYOUTNODE name="totalgeneral" width="min" length="min" fontSize="5" fontBold="true" layoutDirection="leftToRight" floatingBehavior="enclosed" roundedCorners="true" borderStyle="solid">
<WORDBOX name="WordBox10" width="3.5inch" floatingBehavior="enclosed" textAlignment="right" text="TOTAL GENERAL"/>
<rtl:input-variable name="total_consumo_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_consumo_gral Value" class="grwNumericValue" width=".55inch" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="###,##&amp;.&amp;&amp;" value="{{total_consumo_gral}}"/>
<rtl:input-variable name="total_material_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_material_gral Value" class="grwNumericValue" width="70.3951" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="###,###,#&amp;.&amp;&amp;" value="{{total_material_gral}}"/>
<rtl:input-variable name="total_labor_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_labor_gral Value" class="grwNumericValue" width="55.2863" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="###,##&amp;.&amp;&amp;" value="{{total_labor_gral}}"/>
<rtl:input-variable name="total_gastos_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_gastos_gral Value" class="grwNumericValue" width="60.1079" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="###,##&amp;.&amp;&amp;" value="{{total_gastos_gral}}"/>
<rtl:input-variable name="total_valor_gral" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="total_valor_gral Value" class="grwNumericValue" width="43.7298" length="6" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="#,###,###,##&amp;.&amp;&amp;" value="{{total_valor_gral}}"/>
</LAYOUTNODE>
</rtl:match>
</MINIPAGE>
</rtl:match>
</PXML>
</rtl:stylesheet>
</report:Report>
+93
View File
@@ -0,0 +1,93 @@
<?xml version="1.0" encoding="UTF-8"?>
<report:Report xmlns:rtl="http://www.4js.com/2004/RTL" xmlns:report="http://www.4js.com/2007/REPORT" xmlns="http://www.4js.com/2004/PXML" gstVersion="31408" version="6.00">
<report:Settings RWPageWidth="letterwidth" RWPageLength="letterlength" RWLeftMargin="0.5inch" RWTopMargin="0.5inch" RWRightMargin="0.5inch" RWBottomMargin="0.5inch">
<report:FormatList>
<report:Format-SVG/>
<report:Format-PDF/>
<report:Format-image/>
</report:FormatList>
</report:Settings>
<report:Data RWDataLocation="../ipdir/IPPRRP048.rdd" RWFglReportName="opera"/>
<report:Conflicts/>
<rtl:stylesheet>
<PXML>
<rtl:match name="Report" nameConstraint="Report">
<MINIPAGE name="Page Root" width="max" length="max" alignment="near">
<LAYOUTNODE name="Cabeceras" width="min" length="min" fontSize="8" fontBold="true" port="anyPageHeader" floatingBehavior="enclosed">
<LAYOUTNODE name="Enc.Principal" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox" width="38.5" floatingBehavior="enclosed" text="ipprrp048"/>
<rtl:input-variable name="p_companias.nombre" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="p_companias.nombre Value" width="459.302" floatingBehavior="enclosed" text="{{p_companias.nombre}}" textAlignment="center"/>
<WORDBOX name="WordBox3" floatingBehavior="enclosed" text="Pagina: "/>
<PAGENOBOX name="PageNoBox" width="9.5" floatingBehavior="enclosed"/>
</LAYOUTNODE>
<LAYOUTNODE name="Enc.Secundario" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<rtl:input-variable name="rango_fecha" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="rango_fecha Value" width="width(&quot;M&quot;)*20" floatingBehavior="enclosed" text="{{rango_fecha}}"/>
<WORDBOX name="WordBox5" width="342.328" alignment="near" floatingBehavior="enclosed" text=" Reporte productos terminados"/>
<rtl:input-variable name="fecha_reporte" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="fecha_reporte Value" alignment="near" floatingBehavior="enclosed" text="{{fecha_reporte}}"/>
</LAYOUTNODE>
<MINIPAGE name="Titulo1" width="9.2883" length="537.324" fontSize="7" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox2" width="233.809" alignment="center" floatingBehavior="enclosed" text="Producto"/>
<WORDBOX name="WordBox4_1" width="33.3244" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Cantidad"/>
<WORDBOX name="WordBox9" width="36" floatingBehavior="enclosed" textAlignment="right" text="UM"/>
<WORDBOX name="WordBox10" width="50.5" floatingBehavior="enclosed" textAlignment="right" text="F.conversion"/>
<WORDBOX name="WordBox10_1" width="45.5" floatingBehavior="enclosed" textAlignment="right" text="F.Adicional"/>
<WORDBOX name="WordBox11" width="64.5" floatingBehavior="enclosed" textAlignment="right" text="Mts. Adicionales"/>
</MINIPAGE>
</LAYOUTNODE>
<rtl:match name="Group cod_mov" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="titulo_mov" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="titulo_mov Value" width="233.5" alignment="baseline" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{titulo_mov}}"/>
<rtl:match name="Group departamento" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="x.departamento" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.departamento Value" width="233.5" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{x.departamento}}"/>
<rtl:match name="OnEveryRow" nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Data" width="min" length="538.746" fontSize="5" layoutDirection="leftToRight">
<rtl:input-variable name="producto" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="producto Value" width="233.327" alignment="baseline" fontSize="5" floatingBehavior="enclosed" text="{{producto}}"/>
<rtl:input-variable name="x.consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.consumo Value" width="33.7623" anchorX="1" alignment="baseline" fontSize="5" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,-----&amp;.&amp;&amp;" value="{{x.consumo}}"/>
<rtl:input-variable name="x.unidad_med" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.unidad_med Value" width="37.5" alignment="baseline" floatingBehavior="enclosed" text="{{x.unidad_med}}" textAlignment="right"/>
<rtl:input-variable name="x.factor_conv" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.factor_conv Value" width="49.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;&amp;&amp;&amp;" value="{{x.factor_conv}}"/>
<rtl:input-variable name="x.factor_ad" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.factor_ad Value" width="47" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;&amp;&amp;&amp;" value="{{x.factor_ad}}"/>
<rtl:input-variable name="x.mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.mtsAdicionales Value" width="61.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_departamento" width="min" length="538.703" alignment="near" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox6" width="223.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Total departamento: "/>
<rtl:input-variable name="t_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_consumo Value" width="42.4289" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_consumo}}"/>
<LAYOUTNODE name="LayoutNode2" width="5.85786" length="153.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_mtsAdicionales Value" width="41.4645" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_movimiento" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox8" width="224.542" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total Movimiento: "/>
<rtl:input-variable name="t_m_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_consumo Value" width="41.636" length="5.04545" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_consumo}}"/>
<LAYOUTNODE name="LayoutNode1" width="5.28431" length="154.438" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_m_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_mtsAdicionales Value" width="39.9792" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_general" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox13" width="223.28" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total General: "/>
<rtl:input-variable name="t_t_consumo" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="t_t_consumo Value" width="42.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_t_consumo}}"/>
<LAYOUTNODE name="LayoutNode" width="5.70476" length="154.964" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_t_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="t_t_mtsAdicionales Value" width="40.2628" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_t_mtsAdicionales}}"/>
</MINIPAGE>
</MINIPAGE>
<rtl:match name="OnLastRow" nameConstraint="OnLastRow" minOccurs="0" maxOccurs="1"/>
</rtl:match>
</PXML>
</rtl:stylesheet>
</report:Report>
+20 -2
View File
@@ -87,6 +87,7 @@ FUNCTION ipprrp051()
OPEN FORM ipfmrp051 FROM "ipfmrp051"
DISPLAY FORM ipfmrp051
CALL ui.Window.getCurrent().setText("Transacciones de Inventario")
DISPLAY "ipprrp051" AT 4, 3
DISPLAY "Operacion Por Movimiento Detallado y Valorizado" AT 6, 18
@@ -186,8 +187,7 @@ FUNCTION ipprrp051()
IF fgl_report_loadCurrentSettings(r_filename) THEN
LET preview = 1
CALL seleccionarsalida()
RETURNING r_output -- load the .4rp file
CALL selectOutputSimple() RETURNING r_output -- load the .4rp file
CALL fgl_report_selectDevice(r_output) -- changing default
CALL fgl_report_selectPreview(preview) -- changing default
LET handler =
@@ -381,3 +381,21 @@ REPORT opera(x, y)
LET t_t_mtsAdicionales = SUM(x.mtsAdicionales)
PRINTX t_t_consumo, t_t_mtsAdicionales
END REPORT
FUNCTION busca_departamento()
DEFINE
pdepartamento ui.combobox,
kdepartamento SMALLINT,
kdescripcion CHAR(30)
LET pdepartamento = ui.combobox.forname("formonly.departamento")
CALL pdepartamento.clear()
DECLARE pagar CURSOR FOR
SELECT departamento, nom_dpto
FROM adtb00001
WHERE status_t IS NULL
ORDER BY nom_dpto
FOREACH pagar INTO kdepartamento, kdescripcion
CALL pdepartamento.additem(kdepartamento, kdescripcion)
END FOREACH
END FUNCTION
+118
View File
@@ -0,0 +1,118 @@
<?xml version="1.0" encoding="UTF-8"?>
<report:Report xmlns:rtl="http://www.4js.com/2004/RTL" xmlns:report="http://www.4js.com/2007/REPORT" xmlns="http://www.4js.com/2004/PXML" gstVersion="3140a" version="6.00">
<report:Settings RWPageWidth="letterwidth" RWPageLength="letterlength" RWLeftMargin="0.5inch" RWTopMargin="0.5inch" RWRightMargin="0.5inch" RWBottomMargin="0.5inch">
<report:FormatList>
<report:Format-SVG/>
<report:Format-PDF/>
<report:Format-image/>
</report:FormatList>
</report:Settings>
<report:Data RWDataLocation="../ipdir/IPPRRP051.rdd" RWFglReportName="opera"/>
<report:Conflicts/>
<rtl:stylesheet>
<PXML>
<rtl:match name="Report" nameConstraint="Report">
<MINIPAGE name="Page Root" width="max" length="max" alignment="near">
<LAYOUTNODE name="Cabeceras" width="min" length="min" fontSize="8" fontBold="true" port="anyPageHeader" floatingBehavior="enclosed">
<LAYOUTNODE name="Enc.Principal" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox" width="38.5" floatingBehavior="enclosed" text="ipprrp051"/>
<rtl:input-variable name="p_companias.nombre" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="p_companias.nombre Value" width="459.302" floatingBehavior="enclosed" text="{{p_companias.nombre}}" textAlignment="center"/>
<WORDBOX name="WordBox3" floatingBehavior="enclosed" text="Pagina: "/>
<PAGENOBOX name="PageNoBox" width="9.5" floatingBehavior="enclosed"/>
</LAYOUTNODE>
<LAYOUTNODE name="Enc.Secundario" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<rtl:input-variable name="rango_fecha" type="FGLString" expectedLocation="expectedAhead"/>
<WORDWRAPBOX name="rango_fecha Value" width="width(&quot;M&quot;)*20" floatingBehavior="enclosed" text="{{rango_fecha}}"/>
<WORDBOX name="WordBox5" width="342.328" alignment="near" floatingBehavior="enclosed" text=" Reporte productos terminados"/>
<rtl:input-variable name="fecha_reporte" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="fecha_reporte Value" alignment="near" floatingBehavior="enclosed" text="{{fecha_reporte}}"/>
</LAYOUTNODE>
<MINIPAGE name="Titulo1" width="9.2883" length="537.324" fontSize="7" layoutDirection="leftToRight" floatingBehavior="enclosed" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox2" width="233.809" alignment="center" floatingBehavior="enclosed" text="Producto"/>
<WORDBOX name="WordBox4_1" width="33.3244" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Cantidad"/>
<WORDBOX name="WordBox9" width="36" floatingBehavior="enclosed" textAlignment="right" text="UM"/>
<WORDBOX name="WordBox10" width="50.5" floatingBehavior="enclosed" textAlignment="right" text="F.conversion"/>
<WORDBOX name="WordBox10_1" width="45.5" floatingBehavior="enclosed" textAlignment="right" text="F.Adicional"/>
<WORDBOX name="WordBox11" width="64.5" floatingBehavior="enclosed" textAlignment="right" text="Mts. Adicionales"/>
</MINIPAGE>
</LAYOUTNODE>
<rtl:match name="Group cod_mov" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="titulo_mov" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="titulo_mov Value" width="233.5" alignment="baseline" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{titulo_mov}}"/>
<rtl:match name="Group departamento" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<rtl:input-variable name="x.departamento" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.departamento Value" width="233.5" fontSize="6" fontBold="true" floatingBehavior="enclosed" text="{{x.departamento}}"/>
<rtl:match name="OnEveryRow" nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Data" width="min" length="538.746" fontSize="5" layoutDirection="leftToRight">
<rtl:input-variable name="producto" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="producto Value" width="233.327" alignment="baseline" fontSize="5" floatingBehavior="enclosed" text="{{producto}}"/>
<rtl:input-variable name="x.consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.consumo Value" width="33.7623" anchorX="1" alignment="baseline" fontSize="5" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,-----&amp;.&amp;&amp;" value="{{x.consumo}}"/>
<rtl:input-variable name="x.unidad_med" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="x.unidad_med Value" width="37.5" alignment="baseline" floatingBehavior="enclosed" text="{{x.unidad_med}}" textAlignment="right"/>
<rtl:input-variable name="x.factor_conv" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.factor_conv Value" width="49.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;&amp;&amp;&amp;" value="{{x.factor_conv}}"/>
<rtl:input-variable name="x.factor_ad" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.factor_ad Value" width="47" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;&amp;&amp;&amp;" value="{{x.factor_ad}}"/>
<rtl:input-variable name="x.mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="x.mtsAdicionales Value" width="61.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{x.mtsAdicionales}}"/>
</MINIPAGE>
<MINIPAGE name="total_departamento1" width="min" length="538.703" alignment="near" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="seccion" width="24.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Seccion:"/>
<rtl:input-variable name="y.seccion" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="y.seccion Value" class="grwNumericValue" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="----------#" value="{{y.seccion}}"/>
<LAYOUTNODE name="LayoutNode4" width="5.85786" length="11.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<WORDBOX name="tramo" width="24.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Tramo:"/>
<rtl:input-variable name="y.tramo" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="y.tramo Value" class="grwNumericValue" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="----------#" value="{{y.tramo}}"/>
<LAYOUTNODE name="LayoutNode4_1" width="5.85786" length="11.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<WORDBOX name="fila" width="24.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Fila:"/>
<rtl:input-variable name="y.fila" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="y.fila Value" class="grwNumericValue" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="----------#" value="{{y.fila}}"/>
<LAYOUTNODE name="LayoutNode4_2" width="5.85786" length="11.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<WORDBOX name="posicion" width="24.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Posicion:"/>
<rtl:input-variable name="y.posicion" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="y.posicion Value" class="grwNumericValue" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="----------#" value="{{y.posicion}}"/>
<LAYOUTNODE name="LayoutNode4_3" width="5.85786" length="11.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
</MINIPAGE>
<rtl:match name="For" nameConstraint="For" minOccurs="1" maxOccurs="1">
<rtl:match name="ForItem" nameConstraint="ForItem" minOccurs="0" maxOccurs="unbounded">
<rtl:match name="If" nameConstraint="If" minOccurs="1" maxOccurs="1">
<rtl:match name="IfThen" nameConstraint="IfThen" minOccurs="0" maxOccurs="1"/>
</rtl:match>
</rtl:match>
</rtl:match>
</rtl:match>
<MINIPAGE name="total_departamento" width="min" length="538.703" alignment="near" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox6" width="223.28" length="5.95578" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" text="Total departamento: "/>
<rtl:input-variable name="t_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_consumo Value" width="42.4289" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_consumo}}"/>
<LAYOUTNODE name="LayoutNode2" width="5.85786" length="153.997" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_mtsAdicionales Value" width="41.4645" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_movimiento" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox8" width="224.542" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total Movimiento: "/>
<rtl:input-variable name="t_m_consumo" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_consumo Value" width="41.636" length="5.04545" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_consumo}}"/>
<LAYOUTNODE name="LayoutNode1" width="5.28431" length="154.438" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_m_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedHere"/>
<DECIMALFORMATBOX name="t_m_mtsAdicionales Value" width="39.9792" anchorX="1" alignment="baseline" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_m_mtsAdicionales}}"/>
</MINIPAGE>
</rtl:match>
<MINIPAGE name="total_general" width="min" length="538.287" fontSize="5" fontBold="true" layoutDirection="leftToRight" borderWidth="0.5" borderStyle="solid">
<WORDBOX name="WordBox13" width="223.28" length="6.10193" floatingBehavior="enclosed" textAlignment="right" text="Total General: "/>
<rtl:input-variable name="t_t_consumo" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="t_t_consumo Value" width="42.5" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_t_consumo}}"/>
<LAYOUTNODE name="LayoutNode" width="5.70476" length="154.964" layoutDirection="leftToRight" floatingBehavior="enclosed"/>
<rtl:input-variable name="t_t_mtsAdicionales" type="FGLNumeric" expectedLocation="expectedAhead"/>
<DECIMALFORMATBOX name="t_t_mtsAdicionales Value" width="40.2628" anchorX="1" floatingBehavior="enclosed" textAlignment="right" format="---,---,---,--&amp;.&amp;&amp;" value="{{t_t_mtsAdicionales}}"/>
</MINIPAGE>
</MINIPAGE>
<rtl:match name="OnLastRow" nameConstraint="OnLastRow" minOccurs="0" maxOccurs="1"/>
</rtl:match>
</PXML>
</rtl:stylesheet>
</report:Report>
+28 -20
View File
@@ -34,6 +34,7 @@ FUNCTION ipprrp054()
OPEN FORM ipfmrp054 FROM "ipfmrp054"
DISPLAY FORM ipfmrp054
CALL ui.Window.getCurrent().setText("Conduces con y sin Archivo")
INPUT BY NAME fecha1,fecha2
BEFORE INPUT
AFTER INPUT
@@ -50,27 +51,34 @@ FUNCTION ipprrp054()
LET r_filename = "ipprrp054.4rp"
CALL seleccionarsalida() RETURNING r_output
iF fgl_report_loadCurrentSettings(r_filename) THEN -- load the .4rp file
LET preview=1
CALL fgl_report_selectDevice(r_output) -- changing default
CALL fgl_report_selectPreview(preview) -- changing default
LET handler = fgl_report_commitCurrentSettings() -- commit changes
ELSE
EXIT PROGRAM
END IF
START REPORT prt_co TO XML HANDLER HANDLER
PREPARE comando FROM selec
DECLARE busca CURSOR FOR comando
OPEN busca USING fecha1,fecha2
PREPARE comando FROM selec
DECLARE busca CURSOR FOR comando
OPEN busca USING fecha1,fecha2
LET idx = 0
FOREACH busca INTO co.*
IF idx = 0 THEN
CALL selectOutputSimple() RETURNING r_output
IF fgl_report_loadCurrentSettings(r_filename) THEN
LET preview = 1
CALL fgl_report_selectDevice(r_output)
CALL fgl_report_selectPreview(preview)
LET handler = fgl_report_commitCurrentSettings()
ELSE
EXIT PROGRAM
END IF
START REPORT prt_co TO XML HANDLER HANDLER
LET idx = 1
END IF
OUTPUT TO REPORT prt_co(co.*)
END FOREACH
IF idx = 1 THEN
FINISH REPORT prt_co
ELSE
CALL fgl_winmessage("INFO", "NO EXISTEN REGISTROS", "INFO")
END IF
FOREACH busca INTO co.*
OUTPUT TO REPORT prt_co(co.*)
END FOREACH
FINISH REPORT prt_co
END INPUT
END FUNCTION
+65
View File
@@ -0,0 +1,65 @@
<?xml version="1.0" encoding="UTF-8"?>
<report:Report xmlns:rtl="http://www.4js.com/2004/RTL" xmlns:report="http://www.4js.com/2007/REPORT" xmlns="http://www.4js.com/2004/PXML" gstVersion="31405" version="6.00">
<report:Settings RWPageWidth="a4width" RWPageLength="a4length" RWLeftMargin="1.3cm" RWTopMargin="1.3cm" RWRightMargin="1.3cm" RWBottomMargin="1.3cm">
<report:FormatList>
<report:Format-SVG/>
<report:Format-PDF/>
<report:Format-image/>
</report:FormatList>
</report:Settings>
<report:Data RWDataLocation="../ipdir/ipprrp054.rdd" RWFglReportName="prt_co"/>
<report:Conflicts/>
<rtl:stylesheet>
<PXML>
<rtl:match name="Report" nameConstraint="Report" minOccurs="1" maxOccurs="1">
<MINIPAGE name="Page Root" width="max" length="max">
<LAYOUTNODE name="Page Header" width="max" length="min" port="anyPageHeader">
<MINIPAGE name="StripeLayouter3" width="min" length="max" layoutDirection="leftToRight">
<rtl:input-variable name="p_companias.nombre" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="Report Title" x="0" y="max/2" anchorX="0" anchorY="0.5" alignment="baseline" fontSize="25" baselineType="leftleft" floatingBehavior="enclosed" text="{{p_companias.nombre.trim()}}"/>
<PAGENOBOX name="PageNoBox" x="1.23857" y="max" anchorX="0" anchorY="1" alignment="baseline" baselineType="leftleft" floatingBehavior="enclosed" textAlignment="right"/>
<WORDBOX name="WordBox" floatingBehavior="enclosed" text="IPPRRP054"/>
<rtl:input-variable name="fecht" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="WordBox1" y="15cm" floatingBehavior="enclosed" text="{{fecht.trim()}}"/>
<WORDBOX name="WordBox10" x="1cm" y="7cm" fontBold="true" floatingBehavior="enclosed" text="Revision de Conduces"/>
<rtl:input-variable name="fecha1" type="FGLString" expectedLocation="expectedAhead"/>
<rtl:input-variable name="fecha2" type="FGLString" expectedLocation="expectedAhead"/>
<WORDBOX name="WordBox11" x="1.5cm" y="7cm" floatingBehavior="enclosed" text="{{fecha1.trim()+&quot; AL &quot;+fecha2.trim()}}"/>
</MINIPAGE>
<MINIPAGE name="Separator1" width="1" length="max" bgColor="#000000" layoutDirection="leftToRight"/>
<MINIPAGE name="Table Header" class="grwTableHeader" width="min" length="max" layoutDirection="leftToRight">
<WORDBOX name="Spacer" alignment="baseline" baselineType="leftleft" port="itemSeparator" text=" "/>
<WORDBOX name="WordBox2" floatingBehavior="enclosed" text="{{&quot;Num. Documento&quot;}}"/>
<WORDBOX name="WordBox3" y="4cm" floatingBehavior="enclosed" text="Cliente"/>
<WORDBOX name="WordBox8" y="11cm" floatingBehavior="enclosed" text="Estado"/>
<WORDBOX name="WordBox12" y="14cm" floatingBehavior="enclosed" text="Fecha Creacion"/>
</MINIPAGE>
<MINIPAGE name="Separator" width="1" length="max" bgColor="#000000" layoutDirection="leftToRight"/>
</LAYOUTNODE>
<rtl:match name="Group cod_mov" nameConstraint="Group" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Table Row1" class="grwTableRow" width="min" length="max" layoutDirection="leftToRight">
<WORDBOX name="Spacer_2" alignment="baseline" baselineType="leftleft" port="itemSeparator" text=" "/>
<rtl:input-variable name="titulo_mov" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="WordBox5" fontBold="true" floatingBehavior="enclosed" text="{{titulo_mov.trim()}}"/>
</MINIPAGE>
<rtl:match name="OnEveryRow" nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<MINIPAGE name="Table Row" class="grwTableRow" width="min" length="max" alignment="near" fontSize="8" layoutDirection="leftToRight">
<WORDBOX name="Spacer_1" alignment="baseline" baselineType="leftleft" port="itemSeparator" text=" "/>
<rtl:input-variable name="x.num_doc" type="FGLNumeric" expectedLocation="expectedHere"/>
<WORDBOX name="WordBox6" width="2cm" floatingBehavior="enclosed" textAlignment="left" text="{{x.num_doc.format(&quot;&lt;&lt;&lt;&lt;&quot;)}}"/>
<rtl:input-variable name="x.cod_sp" type="FGLNumeric" expectedLocation="expectedHere"/>
<rtl:input-variable name="x.cod_sp_sec" type="FGLNumeric" expectedLocation="expectedHere"/>
<rtl:input-variable name="x.nombre" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="WordWrapBox" y="4cm" width="max/3" alignment="baseline" floatingBehavior="enclosed" text="{{x.cod_sp.format(&quot;&lt;&lt;&quot;)+&quot;-&quot;+x.cod_sp_sec.format(&quot;&lt;&lt;&lt;&lt;&quot;)+&quot; &quot;+x.nombre.trim()}}"/>
<rtl:input-variable name="x.v_estado" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="WordBox9" y="11cm" floatingBehavior="enclosed" text="{{x.v_estado.trim()}}"/>
<rtl:input-variable name="x.fecha" type="FGLString" expectedLocation="expectedHere"/>
<WORDBOX name="WordBox13" y="14cm" floatingBehavior="enclosed" text="{{x.fecha.trim()}}"/>
</MINIPAGE>
</rtl:match>
</rtl:match>
</MINIPAGE>
</rtl:match>
</PXML>
</rtl:stylesheet>
</report:Report>
File diff suppressed because one or more lines are too long
+168 -147
View File
@@ -553,7 +553,7 @@
<Configuration commandLineArguments="jpeguero Peguero2023" id="-554965098" label="Configuration"/>
<File compilerOptions="--build-rdd" filePath="lqdir/lqprmt002.4gl"/>
</Application>
<Application binaryName="lqprrp004" dependencies="2132467565,-1026233879,-764824792" externalDependencies="libgre.42x" id="-432861602" label="lqprrp004">
<Application binaryName="lqprrp004" dependencies="2132467565,-1026233879,-764824792,-1423229125" externalDependencies="libgre.42x" id="-432861602" label="lqprrp004">
<Configuration commandLineArguments="jpeguero Peguero2023" id="530364294" label="Configuration"/>
<File compilerOptions="--build-rdd" filePath="lqdir/lqprrp004.4gl"/>
</Application>
@@ -659,141 +659,6 @@
<File compilerOptions="--build-rdd" filePath="indir/inprrp011.4gl"/>
</Application>
</Group>
<Group id="1302820616" label="NOMINA">
<Library binaryName="FORMULARIOS_NO" id="-335228674" label="FORMULARIOS_NO">
<File filePath="nodir/nofmmt002.per"/>
<File filePath="nodir/nofmwd001.per"/>
<File filePath="nodir/nofmmt003.4fd"/>
<File filePath="nodir/nofmmt001.4fd"/>
<File filePath="nodir/nofmmt007.4fd"/>
<File filePath="nodir/nofmmt008.4fd"/>
<File filePath="nodir/nofmmt108.per"/>
<File filePath="nodir/nofmmt208.per"/>
<File filePath="nodir/nofmmt011.4fd"/>
<File filePath="nodir/nofmmt016.per"/>
<File filePath="nodir/nofmmt018.per"/>
<File filePath="nodir/nofmmt019.per"/>
<File filePath="nodir/nofmmt023.4fd"/>
<File filePath="nodir/nofmmt024.per"/>
<File filePath="nodir/nofmmt025.4fd"/>
<File filePath="nodir/nofmcs002.per"/>
<File filePath="nodir/nofmcs004.4fd"/>
<File filePath="nodir/nofmcs006.4fd"/>
<File filePath="nodir/nofmrp002.4fd"/>
<File filePath="nodir/nofmrp003.4fd"/>
<File filePath="nodir/nofmrp039.4fd"/>
<File filePath="nodir/nofmrp044.4fd"/>
<File filePath="nodir/nofmrp008.4fd"/>
<File filePath="nodir/nofmrp043.4fd"/>
<File filePath="nodir/nofmrp009.per"/>
<File filePath="nodir/nofmrp015.per"/>
</Library>
<Library binaryName="FUNCIONES_NO" id="-306412216" label="FUNCIONES_NO">
<File filePath="nodir/noprgb000.4gl"/>
<File filePath="nodir/noprfu000.4gl"/>
<File filePath="nodir/nocarnet.4gl"/>
</Library>
<Application binaryName="noprmt002" dependencies="-1026233879,-764824792,-306412216,-335228674,1612573873" id="-700000043" label="noprmt002">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000044" label="Configuration"/>
<File filePath="nodir/noprmt002.4gl"/>
</Application>
<Application binaryName="noprmt003" dependencies="-1026233879,-764824792,-306412216,-335228674" environment="dir:FGLSPOOL=$(ProjectDir)/spool" id="-700000045" label="noprmt003">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000046" label="Configuration"/>
<File filePath="nodir/noprmt003.4gl"/>
</Application>
<Application binaryName="noprmt001" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000047" label="noprmt001">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000048" label="Configuration"/>
<File filePath="nodir/noprmt001.4gl"/>
</Application>
<Application binaryName="noprmt007" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000049" label="noprmt007">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000050" label="Configuration"/>
<File filePath="nodir/noprmt007.4gl"/>
</Application>
<Application binaryName="noprmt008" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000053" label="noprmt008">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000054" label="Configuration"/>
<File filePath="nodir/noprmt008.4gl"/>
</Application>
<Application binaryName="noprmt011" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000055" label="noprmt011">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000056" label="Configuration"/>
<File filePath="nodir/noprmt011.4gl"/>
</Application>
<Application binaryName="noprmt016" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000057" label="noprmt016">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000058" label="Configuration"/>
<File filePath="nodir/noprmt016.4gl"/>
</Application>
<Application binaryName="noprmt018" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000059" label="noprmt018">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000060" label="Configuration"/>
<File filePath="nodir/noprmt018.4gl"/>
</Application>
<Application binaryName="noprmt019" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000061" label="noprmt019">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000062" label="Configuration"/>
<File filePath="nodir/noprmt019.4gl"/>
</Application>
<Application binaryName="noprmt023" dependencies="-1026233879,-764824792,-306412216,-335228674" environment="file:FGLPROFILE=$(ProjectDir)/config/fglprofile" id="-700000063" label="noprmt023">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000064" label="Configuration"/>
<File filePath="nodir/noprmt023.4gl"/>
</Application>
<Application binaryName="noprmt024" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000065" label="noprmt024">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000066" label="Configuration"/>
<File filePath="nodir/noprmt024.4gl"/>
</Application>
<Application binaryName="noprmt025" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000067" label="noprmt025">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000068" label="Configuration"/>
<File filePath="nodir/noprmt025.4gl"/>
</Application>
<Application binaryName="noprcs002" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000069" label="noprcs002">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000070" label="Configuration"/>
<File filePath="nodir/noprcs002.4gl"/>
</Application>
<Application binaryName="noprcs004" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000071" label="noprcs004">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000072" label="Configuration"/>
<File filePath="nodir/noprcs004.4gl"/>
<File filePath="addir/adfunciones.4gl"/>
</Application>
<Application binaryName="noprcs006" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000073" label="noprcs006">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000074" label="Configuration"/>
<File filePath="nodir/noprcs006.4gl"/>
<File filePath="bin/noprcs006.4rp"/>
</Application>
<Application binaryName="noprrp002" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000075" label="noprrp002">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000076" label="Configuration"/>
<File filePath="nodir/noprrp002.4gl"/>
<File filePath="bin/noprrp002.4rp"/>
</Application>
<Application binaryName="noprrp003" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000077" label="noprrp003">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000078" label="Configuration"/>
<File filePath="nodir/noprrp003.4gl"/>
<File filePath="bin/noprrp003.4rp"/>
</Application>
<Application binaryName="noprrp039" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000079" label="noprrp039">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000080" label="Configuration"/>
<File filePath="nodir/noprrp039.4gl"/>
<File filePath="bin/noprrp039.4rp"/>
</Application>
<Application binaryName="noprrp044" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000081" label="noprrp044">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000082" label="Configuration"/>
<File filePath="nodir/noprrp044.4gl"/>
<File filePath="bin/noprrp044.4rp"/>
</Application>
<Application binaryName="noprrp038" dependencies="-1026233879,-764824792,-306412216,-335228674" environment="dir:FGLSPOOL=$(ProjectDir)/spool" id="-700000085" label="noprrp038">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000086" label="Configuration"/>
<File filePath="nodir/noprrp038.4gl"/>
</Application>
<Application binaryName="noprrp043" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000087" label="noprrp043">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000088" label="Configuration"/>
<File filePath="nodir/noprrp043.4gl"/>
<File filePath="bin/noprrp043.4rp"/>
</Application>
<Application binaryName="noprrp009" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" environment="dir:FGLSPOOL=$(ProjectDir)/spool" externalDependencies="libgre.42x" id="-700000089" label="noprrp009">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000090" label="Configuration"/>
<File filePath="nodir/noprrp009.4gl"/>
</Application>
<Application binaryName="noprrp015" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" environment="dir:FGLSPOOL=$(ProjectDir)/spool" externalDependencies="libgre.42x" id="-700000091" label="noprrp015">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000092" label="Configuration"/>
<File filePath="nodir/noprrp015.4gl"/>
<File filePath="bin/noprrp015.4rp"/>
</Application>
</Group>
<Group id="1667448785" label="PRODUCTOS TERMINADOS">
<Library binaryName="FORMULARIOS_IP" dependencies="-1026233879" id="-1826025351" label="FORMULARIOS_IP">
<File filePath="ipdir/ipfmmt003.4fd"/>
@@ -973,21 +838,25 @@
<File compilerOptions="--build-rdd" filePath="ipdir/ipprrp046.4gl"/>
<File filePath="ipdir/ipfmrp046.per"/>
</Application>
<Application binaryName="ipprrp047" dependencies="1763548104,-1026233879,-764824792" externalDependencies="libgre.42x" id="-960000030" label="ipprrp047">
<Application binaryName="ipprrp047" dependencies="1763548104,-1026233879,-764824792,-1423229125" externalDependencies="libgre.42x" id="-960000030" label="ipprrp047">
<Configuration commandLineArguments="jpeguero Peguero2023" id="-961000030" label="Configuration"/>
<File compilerOptions="--build-rdd" filePath="ipdir/ipprrp047.4gl"/>
<File filePath="ipdir/ipfmrp047.4fd"/>
</Application>
<Application binaryName="ipprrp048" dependencies="1763548104,-1026233879,-764824792" externalDependencies="libgre.42x" id="-960000031" label="ipprrp048">
<Application binaryName="ipprrp048" dependencies="1763548104,-1026233879,-764824792,-1423229125" externalDependencies="libgre.42x" id="-960000031" label="ipprrp048">
<Configuration commandLineArguments="jpeguero Peguero2023" id="-961000031" label="Configuration"/>
<File compilerOptions="--build-rdd" filePath="ipdir/ipprrp048.4gl"/>
<File filePath="ipdir/ipfmrp048.4fd"/>
</Application>
<Application binaryName="ipprrp051" dependencies="1763548104,-1026233879,-764824792" externalDependencies="libgre.42x" id="-960000032" label="ipprrp051">
<Application binaryName="ipprrp051" dependencies="1763548104,-1026233879,-764824792,-1423229125" externalDependencies="libgre.42x" id="-960000032" label="ipprrp051">
<Configuration commandLineArguments="jpeguero Peguero2023" id="-961000032" label="Configuration"/>
<File compilerOptions="--build-rdd" filePath="ipdir/ipprrp051.4gl"/>
<File filePath="ipdir/ipfmrp051.4fd"/>
</Application>
<Application binaryName="ipprrp054" dependencies="1763548104,-1026233879,-764824792" externalDependencies="libgre.42x" id="-960000033" label="ipprrp054">
<Application binaryName="ipprrp054" dependencies="1763548104,-1026233879,-764824792,-1423229125" externalDependencies="libgre.42x" id="-960000033" label="ipprrp054">
<Configuration commandLineArguments="jpeguero Peguero2023" id="-961000033" label="Configuration"/>
<File compilerOptions="--build-rdd" filePath="ipdir/ipprrp054.4gl"/>
<File filePath="ipdir/ipfmrp054.4fd"/>
</Application>
</Group>
<Group id="615555875" label="PRODUCCION">
@@ -1007,7 +876,7 @@
<Configuration commandLineArguments="jpeguero Peguero2023" id="-211320415" label="Configuration"/>
<File filePath="PRDIR/prprmt010.4gl"/>
</Application>
<Application binaryName="prprmt011" dependencies="-837156229,-1026233879,-764824792" externalDependencies="libgre.42x" id="-284744691" label="prprmt011">
<Application binaryName="prprmt011" dependencies="-837156229,-1026233879,-764824792,-1423229125" externalDependencies="libgre.42x" id="-284744691" label="prprmt011">
<Configuration commandLineArguments="jpeguero Peguero2023" id="-569394285" label="Configuration"/>
<File compilerOptions="--build-rdd" filePath="PRDIR/prprmt011.4gl"/>
</Application>
@@ -1074,12 +943,164 @@
</Library>
</Group>
<Group id="46006545" label="RECURSOS HUMANOS">
<Group id="328490448" label="ADMINISTRACION PERSONAL"/>
<Library binaryName="FORMULARIOS_AD" id="1612573873" label="FORMULARIOS_AD">
<File filePath="addir/adfmwd004.per"/>
</Library>
<Library binaryName="FUNCIONES_AD" id="114070979" label="FUNCIONES_AD"/>
<Group id="942743738" label="NOMINA"/>
<Group id="328490448" label="ADMINISTRACION PERSONAL">
<Library binaryName="FORMULARIOS_AD" id="1612573873" label="FORMULARIOS_AD">
<File filePath="addir/adfmwd004.per"/>
</Library>
<Library binaryName="FUNCIONES_AD" id="114070979" label="FUNCIONES_AD"/>
</Group>
<Group id="942743738" label="NOMINA">
<Library binaryName="FORMULARIOS_NO" id="-335228674" label="FORMULARIOS_NO">
<File filePath="nodir/nofmmt002.per"/>
<File filePath="nodir/nofmwd001.per"/>
<File filePath="nodir/nofmmt003.4fd"/>
<File filePath="nodir/nofmmt001.4fd"/>
<File filePath="nodir/nofmmt007.4fd"/>
<File filePath="nodir/nofmmt008.4fd"/>
<File filePath="nodir/nofmmt108.per"/>
<File filePath="nodir/nofmmt208.per"/>
<File filePath="nodir/nofmmt011.4fd"/>
<File filePath="nodir/nofmmt016.per"/>
<File filePath="nodir/nofmmt018.per"/>
<File filePath="nodir/nofmmt019.per"/>
<File filePath="nodir/nofmmt023.4fd"/>
<File filePath="nodir/nofmmt024.per"/>
<File filePath="nodir/nofmmt025.4fd"/>
<File filePath="nodir/nofmcs002.per"/>
<File filePath="nodir/nofmcs004.4fd"/>
<File filePath="nodir/nofmcs006.4fd"/>
<File filePath="nodir/nofmrp002.4fd"/>
<File filePath="nodir/nofmrp003.4fd"/>
<File filePath="nodir/nofmrp039.4fd"/>
<File filePath="nodir/nofmrp044.4fd"/>
<File filePath="nodir/nofmrp008.4fd"/>
<File filePath="nodir/nofmrp043.4fd"/>
<File filePath="nodir/nofmrp009.per"/>
<File filePath="nodir/nofmrp015.per"/>
<File filePath="nodir/nofmrp045.per"/>
<File filePath="nodir/nofmrp041.4fd"/>
<File filePath="nodir/nofmmt026.4fd"/>
</Library>
<Library binaryName="FUNCIONES_NO" id="-306412216" label="FUNCIONES_NO">
<File filePath="nodir/noprgb000.4gl"/>
<File filePath="nodir/noprfu000.4gl"/>
<File filePath="nodir/nocarnet.4gl"/>
</Library>
<Application binaryName="noprmt002" dependencies="-1026233879,-764824792,-306412216,-335228674,1612573873" id="-700000043" label="noprmt002">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000044" label="Configuration"/>
<File filePath="nodir/noprmt002.4gl"/>
</Application>
<Application binaryName="noprmt003" dependencies="-1026233879,-764824792,-306412216,-335228674" environment="dir:FGLSPOOL=$(ProjectDir)/spool" id="-700000045" label="noprmt003">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000046" label="Configuration"/>
<File filePath="nodir/noprmt003.4gl"/>
</Application>
<Application binaryName="noprmt001" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000047" label="noprmt001">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000048" label="Configuration"/>
<File filePath="nodir/noprmt001.4gl"/>
</Application>
<Application binaryName="noprmt007" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000049" label="noprmt007">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000050" label="Configuration"/>
<File filePath="nodir/noprmt007.4gl"/>
</Application>
<Application binaryName="noprmt008" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000053" label="noprmt008">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000054" label="Configuration"/>
<File filePath="nodir/noprmt008.4gl"/>
</Application>
<Application binaryName="noprmt011" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000055" label="noprmt011">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000056" label="Configuration"/>
<File filePath="nodir/noprmt011.4gl"/>
</Application>
<Application binaryName="noprmt016" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000057" label="noprmt016">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000058" label="Configuration"/>
<File filePath="nodir/noprmt016.4gl"/>
</Application>
<Application binaryName="noprmt018" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000059" label="noprmt018">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000060" label="Configuration"/>
<File filePath="nodir/noprmt018.4gl"/>
</Application>
<Application binaryName="noprmt019" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000061" label="noprmt019">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000062" label="Configuration"/>
<File filePath="nodir/noprmt019.4gl"/>
</Application>
<Application binaryName="noprmt023" dependencies="-1026233879,-764824792,-306412216,-335228674" environment="file:FGLPROFILE=$(ProjectDir)/config/fglprofile" id="-700000063" label="noprmt023">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000064" label="Configuration"/>
<File filePath="nodir/noprmt023.4gl"/>
</Application>
<Application binaryName="noprmt024" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000065" label="noprmt024">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000066" label="Configuration"/>
<File filePath="nodir/noprmt024.4gl"/>
</Application>
<Application binaryName="noprmt025" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000067" label="noprmt025">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000068" label="Configuration"/>
<File filePath="nodir/noprmt025.4gl"/>
</Application>
<Application binaryName="noprcs002" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000069" label="noprcs002">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000070" label="Configuration"/>
<File filePath="nodir/noprcs002.4gl"/>
</Application>
<Application binaryName="noprcs004" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000071" label="noprcs004">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000072" label="Configuration"/>
<File filePath="nodir/noprcs004.4gl"/>
<File filePath="addir/adfunciones.4gl"/>
</Application>
<Application binaryName="noprcs006" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000073" label="noprcs006">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000074" label="Configuration"/>
<File filePath="nodir/noprcs006.4gl"/>
<File filePath="bin/noprcs006.4rp"/>
</Application>
<Application binaryName="noprrp002" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000075" label="noprrp002">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000076" label="Configuration"/>
<File filePath="nodir/noprrp002.4gl"/>
<File filePath="bin/noprrp002.4rp"/>
</Application>
<Application binaryName="noprrp003" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000077" label="noprrp003">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000078" label="Configuration"/>
<File filePath="nodir/noprrp003.4gl"/>
<File filePath="bin/noprrp003.4rp"/>
</Application>
<Application binaryName="noprrp039" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000079" label="noprrp039">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000080" label="Configuration"/>
<File filePath="nodir/noprrp039.4gl"/>
<File filePath="bin/noprrp039.4rp"/>
</Application>
<Application binaryName="noprrp044" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000081" label="noprrp044">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000082" label="Configuration"/>
<File filePath="nodir/noprrp044.4gl"/>
<File filePath="bin/noprrp044.4rp"/>
</Application>
<Application binaryName="noprrp038" dependencies="-1026233879,-764824792,-306412216,-335228674" environment="dir:FGLSPOOL=$(ProjectDir)/spool" id="-700000085" label="noprrp038">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000086" label="Configuration"/>
<File filePath="nodir/noprrp038.4gl"/>
</Application>
<Application binaryName="noprrp043" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000087" label="noprrp043">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000088" label="Configuration"/>
<File filePath="nodir/noprrp043.4gl"/>
<File filePath="bin/noprrp043.4rp"/>
</Application>
<Application binaryName="noprrp009" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" environment="dir:FGLSPOOL=$(ProjectDir)/spool" externalDependencies="libgre.42x" id="-700000089" label="noprrp009">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000090" label="Configuration"/>
<File filePath="nodir/noprrp009.4gl"/>
</Application>
<Application binaryName="noprrp015" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" environment="dir:FGLSPOOL=$(ProjectDir)/spool" externalDependencies="libgre.42x" id="-700000091" label="noprrp015">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000092" label="Configuration"/>
<File filePath="nodir/noprrp015.4gl"/>
<File filePath="bin/noprrp015.4rp"/>
</Application>
<Application binaryName="noprrp045" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000093" label="noprrp045">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000094" label="Configuration"/>
<File filePath="nodir/noprrp045.4gl"/>
<File filePath="bin/noprrp045.4rp"/>
</Application>
<Application binaryName="noprrp041" dependencies="-1026233879,-764824792,-306412216,-335228674,-1423229125" externalDependencies="libgre.42x" id="-700000095" label="noprrp041">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000096" label="Configuration"/>
<File filePath="nodir/noprrp041.4gl"/>
<File filePath="bin/noprrp041.4rp"/>
</Application>
<Application binaryName="noprmt026" dependencies="-1026233879,-764824792,-306412216,-335228674" environment="dir:FGLSPOOL=$(ProjectDir)/spool" id="-700000097" label="noprmt026">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000098" label="Configuration"/>
<File filePath="nodir/noprmt026.4gl"/>
</Application>
</Group>
</Group>
<Group id="-802694369" label="REPORTE ENTRADA">
<Library binaryName="FORMULARIO_AL" id="267647114" label="FORMULARIO_AL"/>
+13 -9
View File
@@ -1,20 +1,24 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm fileVersion="31400" gstVersion="3140a" name="ManagedForm" uid="{4cf2aa58-ffb3-40ad-8821-bc58edfe0d03}">
<ManagedForm fileVersion="31400" gstVersion="31408" name="ManagedForm" uid="{4cf2aa58-ffb3-40ad-8821-bc58edfe0d03}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{14657cfd-6ea9-484d-85b5-36c7f2503c70}" where="">
<RecordField colName="" fieldIdRef="1" name="fecha_inicial" sqlTabName="" table_alias_name="" uid="{ea62721d-1145-41ce-8d25-da746f2aef2c}"/>
<RecordField colName="" fieldIdRef="2" name="fecha_final" sqlTabName="" table_alias_name="" uid="{53fc6932-3358-481a-89da-8d1725963d21}"/>
<RecordField colName="" fieldIdRef="4" name="cod_sup" sqlTabName="" table_alias_name="" uid="{743b47a0-0a5f-44ed-a6b8-85748e888f94}"/>
<RecordField colName="" fieldIdRef="6" name="num_emp" sqlTabName="" table_alias_name="" uid="{437cc479-28ae-4447-996d-ff226613accb}"/>
<RecordField fieldIdRef="1" name="num_nomi" uid="{e896a050-89b9-484e-a851-bcfbbf17dfea}"/>
<RecordField fieldIdRef="2" name="nom_emp" uid="{ee09c82c-1e71-4b43-8ae1-6f5059b5fcfb}"/>
</Record>
<Form gridHeight="11" gridWidth="46" name="Form" text="Form">
<Form gridHeight="8" gridWidth="38" name="Form" text="Form">
<Grid gridHeight="6" gridWidth="34" name="Grid1" posX="2" posY="1">
<Label gridHeight="1" gridWidth="10" name="Label1" posX="2" posY="2" text="No. Nómina"/>
<Edit fieldId="1" gridHeight="1" gridWidth="5" name="num_nomi" posX="13" posY="2" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label4" posX="2" posY="3" text="Empleado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="6" gridHeight="1" gridWidth="5" name="num_emp" posX="13" posY="3" sqlTabName="" tabIndex="1" table_alias_name="" title="Edit1" widget="Edit"/>
<Edit fieldId="2" gridHeight="1" gridWidth="14" name="nom_emp" noEntry="true" posX="19" posY="3" scroll="true" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label1" posX="3" posY="1" text="Fecha Inicial"/>
<DateEdit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="1" format="dd/mm/yyyy" gridHeight="1" gridWidth="12" name="fecha_inicial" posX="16" posY="1" sqlTabName="" tabIndex="1" table_alias_name="" title="DateEdit1" widget="DateEdit"/>
<Label gridHeight="1" gridWidth="10" name="Label2" posX="3" posY="2" text="Fecha Final"/>
<DateEdit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="2" format="dd/mm/yyyy" gridHeight="1" gridWidth="12" name="fecha_final" posX="16" posY="2" sqlTabName="" tabIndex="2" table_alias_name="" title="DateEdit1" widget="DateEdit"/>
<Label gridHeight="1" gridWidth="10" name="Label3" posX="3" posY="3" text="Supervisor"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="4" gridHeight="1" gridWidth="6" name="cod_sup" posX="16" posY="3" sqlTabName="" tabIndex="3" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label4" posX="3" posY="4" text="Empleado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="6" gridHeight="1" gridWidth="6" name="num_emp" posX="16" posY="4" sqlTabName="" tabIndex="4" table_alias_name="" title="Edit1" widget="Edit"/>
</Grid>
</Form>
<DiagramLayout>
+86 -32
View File
@@ -20,7 +20,9 @@ DEFINE rcol,arch_pc,prog STRING,
d_tipos,mensaje,f_tipos,filepath,p_res,res,fila,val STRING
DEFINE usuarios,clave CHAR(80),
FILE,nombre_cia STRING
FILE,nombre_cia STRING,
celdas DICTIONARY OF STRING,
maxfila,maxcol INTEGER
END GLOBALS
MAIN
@@ -49,7 +51,7 @@ DEFINE ptss RECORD
departamento INT,
valor_isr DEC(12,2)
END RECORD,
fecha_inicial,fecha_final DATE,
fecha_inicial,fecha_final,fecha_sig DATE,
kano,kmes, cnt,numero_msg SMALLINT,
cels CHAR(40),
filename,sysos CHAR(200),
@@ -79,7 +81,7 @@ DEFINE ptss RECORD
AFTER FIELD kmes
LET selec =
"SELECT CONVERT(CHAR(10),MIN(a.fecha_del),103) ,CONVERT(CHAR(10),MAX(a.fecha_al),103) ",
"SELECT MIN(a.fecha_del), MAX(a.fecha_al) ",
" FROM notb00010 a ",
" WHERE a.ano ='", kano,"' AND a.mes ='", kmes, "'"
PREPARE busca_fecha FROM selec
@@ -98,6 +100,8 @@ DEFINE ptss RECORD
END INPUT
LET fecha_sig = fecha_final + 1 -- el +1 no se puede hacer dentro del SQL (date + int)
LET periodo = kmes USING "&&",kano USING "&&&&"
LET FILE = filepath
@@ -144,7 +148,7 @@ DEFINE ptss RECORD
CALL ui.Interface.refresh()
LET selec =
" SELECT a.num_emp,b.nom1_emp,b.apell1_emp,b.apell2_emp,d.sexo,b.tipo_documento,b.cedula,convert(char(10),b.fech_nac,103),",
" SELECT a.num_emp,b.nom1_emp,b.apell1_emp,b.apell2_emp,d.sexo,b.tipo_documento,b.cedula,b.fech_nac,",
" SUM(a.valor),b.departamento ",
" FROM adtb00003 b, notb00008 a,notb00010 c,adtb00021 d ",
" WHERE b.num_emp = a.num_emp AND c.mes ='",kmes,"' AND ",
@@ -154,8 +158,8 @@ DEFINE ptss RECORD
" a.cod_mov in (1,40,36,5,24,51,34,56) AND ",
" a.num_emp = d.num_emp AND ",
#" a.cod_mov in (32) AND ",
" convert(char(10), a.fecha,101) between '",fecha_inicial USING "mm/dd/yyyy",
"' and '",fecha_final using "mm/dd/yyyy","' and b.nomina = 'Q' ",
" a.fecha >= '",fecha_inicial USING "yyyymmdd",
"' and a.fecha < '",(fecha_final + 1) using "yyyymmdd","' and b.nomina = 'Q' ",
" GROUP BY a.num_emp,b.nom1_emp,b.apell1_emp,b.apell2_emp,d.sexo,b.cedula,b.fech_nac,b.departamento,a.num_emp,b.tipo_documento ",
" ORDER BY b.departamento,a.num_emp "
ELSE
@@ -176,7 +180,7 @@ DEFINE ptss RECORD
CALL ui.Interface.refresh()
LET cnt = 15
LET selec =
" SELECT a.num_emp,b.nom1_emp,b.apell1_emp,b.apell2_emp,d.sexo,b.tipo_documento,b.cedula,convert(char(10),b.fech_nac,103),",
" SELECT a.num_emp,b.nom1_emp,b.apell1_emp,b.apell2_emp,d.sexo,b.tipo_documento,b.cedula,b.fech_nac,",
" SUM(a.valor),a.departamento ",
" FROM adtb00003 b, notb00008 a,notb00010 c,adtb00021 d ",
" WHERE b.num_emp = a.num_emp AND b.status_t is not null and c.mes ='",kmes,"' AND ",
@@ -186,8 +190,8 @@ DEFINE ptss RECORD
#" a.cod_mov in (1,40,36,5,24,51,34) AND ",
" a.num_emp = d.num_emp AND ",
" a.cod_mov in (33) AND ",
" convert(char(10), a.fecha,101) between '",fecha_inicial USING "mm/dd/yyyy",
"' and '",fecha_final using "mm/dd/yyyy","' and b.nomina = 'Q' ",
" a.fecha >= '",fecha_inicial USING "yyyymmdd",
"' and a.fecha < '",(fecha_final + 1) using "yyyymmdd","' and b.nomina = 'Q' ",
" GROUP BY a.num_emp,b.nom1_emp,b.apell1_emp,b.apell2_emp,d.sexo,b.cedula,b.fech_nac,a.departamento,a.num_emp,b.tipo_documento ",
" ORDER BY a.departamento,a.num_emp "
END IF
@@ -197,7 +201,7 @@ DEFINE ptss RECORD
LET cuenta = 0
IF tipo_reporte = 'NOR' THEN
FOREACH busca INTO ptss.*
FOREACH busca INTO ptss.ficha THRU ptss.departamento
LET col = 2
LET fila = cnt
@@ -240,7 +244,7 @@ DEFINE ptss RECORD
LET col = 9
LET fila = cnt
LET val = ptss.fecha_n
LET val = ptss.fecha_n USING "dd/mm/yyyy"
CALL enviaDDE(fila,col,val)
LET col = 10
@@ -253,7 +257,7 @@ DEFINE ptss RECORD
SELECT ISNULL(SUM(a.valor),0) INTO ptss.valor_isr
FROM notb00008 a
WHERE a.num_emp = ptss.ficha AND
a.fecha BETWEEN fecha_inicial AND fecha_final AND
a.fecha >= fecha_inicial AND a.fecha < fecha_sig AND
a.clase_mov IN ("E","I") and a.cod_mov not in (32,33)
LET col = 12
@@ -267,7 +271,7 @@ DEFINE ptss RECORD
SELECT ISNULL(SUM(a.valor),0) INTO valor_boni
FROM notb00008 a
WHERE a.num_emp = ptss.ficha AND
a.fecha BETWEEN fecha_inicial AND fecha_final AND
a.fecha >= fecha_inicial AND a.fecha < fecha_sig AND
a.clase_mov IN ("E","I") and a.cod_mov in (33)
# VARIFICACION VACACIONES
@@ -275,7 +279,7 @@ DEFINE ptss RECORD
SELECT ISNULL(SUM(a.valor),0) INTO valor_vacaciones
FROM notb00008 a
WHERE a.num_emp = ptss.ficha AND
a.fecha BETWEEN fecha_inicial AND fecha_final AND
a.fecha >= fecha_inicial AND a.fecha < fecha_sig AND
a.clase_mov IN ("E","I") and a.cod_mov in (36)
IF valor_vacaciones =0 THEN
@@ -305,7 +309,7 @@ DEFINE ptss RECORD
SELECT SUM(a.valor) INTO valor_boni
FROM notb00008 a
WHERE a.num_emp = ptss.ficha AND
a.fecha BETWEEN fecha_inicial AND fecha_final AND
a.fecha >= fecha_inicial AND a.fecha < fecha_sig AND
a.clase_mov IN ("E","I") and a.cod_mov in (32)
@@ -333,7 +337,7 @@ DEFINE ptss RECORD
ELSE
#BONI CANCELADOS
IF tipo_reporte = "BON1" THEN
FOREACH busca INTO ptss.*
FOREACH busca INTO ptss.ficha THRU ptss.departamento
LET col = 2
LET fila = cnt
@@ -368,7 +372,7 @@ DEFINE ptss RECORD
LET col = 8
LET fila = cnt
LET val = ptss.fecha_n
LET val = ptss.fecha_n USING "dd/mm/yyyy"
CALL enviaDDE(fila,col,val)
LET col = 9
@@ -392,32 +396,82 @@ DEFINE ptss RECORD
END IF
CALL fgl_winmessage("INFO","REPROTE TERMINADO","INFO")
CALL escribeCSV(tipo_reporte,periodo) RETURNING mensaje
CALL fgl_winmessage("INFO","REPORTE TERMINADO. ARCHIVO: "||mensaje,"INFO")
END FUNCTION
-- Genero 6 (GDC 6.00) ya no incluye el modulo WINDDE: en lugar de llenar Excel
-- celda por celda, cada "celda" se guarda en memoria y al final se escribe un
-- CSV (separador ;) con las mismas filas y columnas de la plantilla de la TSS.
FUNCTION celda_key(xf,xc)
DEFINE xf,xc INTEGER
DEFINE sf,sc STRING
LET sf = xf USING "<<<<<&"
LET sc = xc USING "<<<<<&"
RETURN sf || "," || sc
END FUNCTION
FUNCTION enviaDDE(xfila,xcol,xval)
DEFINE xfila,xcol,xval,xcelda STRING
DISPLAY "enviado ",xfila," c ",xcol," v ",xval
LET xcelda = fila_office CLIPPED,xfila CLIPPED,"C",xcol CLIPPED
DISPLAY "celda ",xcelda
LET xval=xval CLIPPED
CALL ui.Interface.frontCall("WINDDE","DDEPoke", [prog,file,xcelda,xval], [res] );
CALL checkError(res)
DEFINE xfila,xcol INTEGER
DEFINE xval STRING
DEFINE k STRING
LET k = celda_key(xfila,xcol)
LET celdas[k] = xval CLIPPED
IF xfila > maxfila THEN LET maxfila = xfila END IF
IF xcol > maxcol THEN LET maxcol = xcol END IF
END FUNCTION
FUNCTION terminaDDE()
CALL ui.Interface.frontCall("WINDDE","DDEFinishAll", [], [res] );
CALL checkError(res)
CALL celdas.clear()
LET maxfila = 0
LET maxcol = 0
END FUNCTION
FUNCTION conectarDDE()
CALL ui.Interface.frontCall("WINDDE","DDEConnect", [prog,file], [res] )
CALL checkError(res)
CALL celdas.clear()
LET maxfila = 0
LET maxcol = 0
END FUNCTION
-- Escribe las celdas acumuladas en FGLSPOOL/noprmt026_<tipo>_<periodo>.csv
-- y devuelve la ruta del archivo.
FUNCTION escribeCSV(xtipo,xperiodo)
DEFINE xtipo,xperiodo STRING
DEFINE ch base.Channel
DEFINE ruta STRING
DEFINE f,c INTEGER
DEFINE lin base.StringBuffer
DEFINE k,v STRING
LET ruta = FGL_GETENV("FGLSPOOL")
IF ruta IS NULL OR ruta.getLength() = 0 THEN LET ruta = "." END IF
LET ruta = ruta || "\\noprmt026_" || xtipo || "_" || xperiodo || ".csv"
LET ch = base.Channel.create()
LET lin = base.StringBuffer.create()
CALL ch.openFile(ruta,"w")
FOR f = 1 TO maxfila
CALL lin.clear()
FOR c = 1 TO maxcol
LET k = celda_key(f,c)
IF celdas.contains(k) THEN
LET v = celdas[k]
IF v.getIndexOf(";",1) > 0 OR v.getIndexOf("\"",1) > 0 THEN
LET v = "\"" || v.trim() || "\""
END IF
ELSE
LET v = ""
END IF
IF c > 1 THEN CALL lin.append(";") END IF
CALL lin.append(v)
END FOR
CALL ch.writeNoNL(lin.toString())
CALL ch.writeNoNL("\r\n")
END FOR
CALL ch.close()
RETURN ruta
END FUNCTION
FUNCTION checkError(res)
+3 -3
View File
@@ -71,7 +71,7 @@ END GLOBALS
END INPUT
CONSTRUCT criterio ON a.supervisor, a.num_emp
CONSTRUCT criterio ON a.num_emp, b.num_emp
FROM cod_sup, num_emp
ON ACTION mostrar
@@ -79,9 +79,9 @@ END GLOBALS
b.num_emp, b.nombre, a.fecha,b.cantidad,b.valor,b.descrip_mov,a.num_doc,b.fech_crea
from notb00028 a
inner join notb00029 b on a.num_doc = b.num_doc
inner join adtb00003 c on a.supervisor = c.num_emp
inner join adtb00003 c on a.num_emp = c.num_emp
where " , criterio CLIPPED, " and ","
a.fecha between '", datos.fecha_inicial USING "mm/dd/yyyy" , "' and '",datos.fecha_final USING "mm/dd/yyyy","' "
a.fecha >= '", datos.fecha_inicial USING "yyyymmdd" , "' and a.fecha < '",(datos.fecha_final + 1) USING "yyyymmdd","' "
DISPLAY selec
PREPARE comando FROM selec
DECLARE cotizaciones CURSOR FOR comando