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>
+20 -11
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,25 +168,28 @@ 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 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
@@ -194,7 +199,11 @@ FUNCTION ctprrp004()
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
+21 -11
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,25 +131,28 @@ 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 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
@@ -154,7 +160,11 @@ FUNCTION ctprrp004()
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>
+25 -17
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
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
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
IF idx = 1 THEN
FINISH REPORT prt_co
ELSE
CALL fgl_winmessage("INFO", "NO EXISTEN REGISTROS", "INFO")
END IF
START REPORT prt_co TO XML HANDLER HANDLER
PREPARE comando FROM selec
DECLARE busca CURSOR FOR comando
OPEN busca USING fecha1,fecha2
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