You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
173 lines
7.0 KiB
173 lines
7.0 KiB
<?xml version="1.0" encoding="ISO-8859-1"?>
|
|
<VUE name="PMSI000264" label="PMSI. Prestations OVALIDE" title="= 'PMSI. Prestations OVALIDE : ' + VIEW.LAST_MAT2A_TEXT" database="iCTI" swf="*CTI_view1" softCode="iCTI_pmsi" skipFirstSelection="true" globals="PMSI_globals.XML" componentsFile="PMSI_components.XML" typeEts="1" helpDokuWIkiDir="" helpDokuWIkiFile="pmsi000264" helpFile="iCTI_PMSI_PMSI000264.HTML">
|
|
<CACHE cachable="false" />
|
|
<VIEWPROPERTIES>
|
|
<PROPERTY dataLink="VIEWPROPERTIES" nameField="name" valueField="value"/>
|
|
<PROPERTY name="ROWS">
|
|
<value><![CDATA[[EVAL
|
|
|
|
if ('[OPTION]' == 'ERR' ) {
|
|
return "WHERE ( cti_quantite IS DISTINCT FROM mat2a_quantite OR
|
|
cti_montant_br IS DISTINCT FROM mat2a_montant_br OR
|
|
cti_montant_amo IS DISTINCT FROM mat2a_montant_amo) " ;
|
|
}
|
|
else {
|
|
return "";
|
|
}
|
|
|
|
EVAL]]]></value>
|
|
</PROPERTY>
|
|
</VIEWPROPERTIES>
|
|
<SELECTIONS label="" displayText="= var display:String = '';
|
|
|
|
if (SELECT.OPTION != 'ALL') {
|
|
display = display + '#B#' + SELECT.OPTION_LABEL + '#/B# ';
|
|
}
|
|
|
|
if (display != '') {
|
|
}
|
|
return display;
|
|
|
|
">
|
|
<GROUP label="Lignes à afficher">
|
|
<FIELD name="OPTION" width="200" label="" UI="combo" default="ALL">
|
|
<OPTION label="Toutes les lignes" data="ALL" />
|
|
<OPTION label="Uniquement les lignes en erreur" data="ERR" showIfNotDefault="true" />
|
|
</FIELD>
|
|
</GROUP>
|
|
</SELECTIONS>
|
|
<QUERIES>
|
|
<QUERY label="">
|
|
<SQL>
|
|
<select><![CDATA[
|
|
SELECT
|
|
rsf.prestation_id,
|
|
mat2a.prestation_code,
|
|
|
|
rsf.cti_quantite,
|
|
rsf.cti_montant_br,
|
|
rsf.cti_montant_amo,
|
|
|
|
mat2a.mat2a_quantite,
|
|
mat2a.mat2a_montant_br,
|
|
mat2a.mat2a_montant_amo
|
|
FROM
|
|
(
|
|
SELECT
|
|
mt2.prestation_code AS prestation_code,
|
|
mt2.quantite AS mat2a_quantite,
|
|
round(mt2.montant_br) AS mat2a_montant_br,
|
|
round(mt2.montant_amo) AS mat2a_montant_amo
|
|
FROM
|
|
pmsi.w_mat2a_oqn_prestations mt2
|
|
JOIN pmsi.p_mat2a_import ON p_mat2a_import.oid = mt2.mat2a_id
|
|
WHERE
|
|
p_mat2a_import.mat2a_annee::text || lpad(p_mat2a_import.mat2a_mois, 2, 0) = '[VIEW.LAST_MAT2A]'
|
|
ORDER BY 1
|
|
) mat2a
|
|
LEFT JOIN
|
|
(
|
|
SELECT
|
|
v_rsf_detail_1.prestation_id,
|
|
v_rsf_detail_1.prestation_code AS prestation_code,
|
|
round(sum(v_rsf_detail_1.nombre)) AS cti_quantite,
|
|
round(sum(v_rsf_detail_1.base_remboursement)) AS cti_montant_br,
|
|
round(sum(v_rsf_detail_1.sejour_remboursable)) AS cti_montant_amo
|
|
FROM pmsi.v_rsf_detail_1 JOIN pmsi.v_rss_1 ON v_rss_1.rss_id = v_rsf_detail_1.rss_id
|
|
WHERE
|
|
v_rss_1.date_sortie between '[VIEW.LAST_MAT2A_FROM]'::date AND '[VIEW.LAST_MAT2A_TO]'::date
|
|
AND v_rss_1.cmd_code <> '15'
|
|
AND v_rss_1.en_cours = '0'
|
|
GROUP BY 1,2
|
|
) rsf ON mat2a.prestation_code = rsf.prestation_code
|
|
[VIEW.ROWS]
|
|
ORDER BY 2
|
|
;
|
|
]]>
|
|
</select>
|
|
<FIELDS>
|
|
<FIELD name="PRESTATION_ID"/>
|
|
<FIELD name="PRESTATION_CODE"/>
|
|
|
|
<FIELD name="CTI_QUANTITE"/>
|
|
<FIELD name="CTI_MONTANT_BR"/>
|
|
<FIELD name="CTI_MONTANT_AMO"/>
|
|
|
|
<FIELD name="MAT2A_QUANTITE"/>
|
|
<FIELD name="MAT2A_MONTANT_BR"/>
|
|
<FIELD name="MAT2A_MONTANT_AMO"/>
|
|
</FIELDS>
|
|
</SQL>
|
|
</QUERY>
|
|
<QUERY type="propertiesLink" name="VIEWPROPERTIES" forSelections="false">
|
|
<SQL>
|
|
<select><![CDATA[
|
|
|
|
SELECT 'LAST_MAT2A'::text, coalesce(max(mat2a_annee::text || lpad(mat2a_mois, 2, 0)::text), '2099-12-31') FROM pmsi.p_mat2a_import
|
|
UNION
|
|
SELECT 'LAST_MAT2A_FROM'::text, coalesce(to_char(date_trunc('year', to_date(max(mat2a_annee::text || lpad(mat2a_mois, 2, 0)::text), 'YYYYMM')), 'YYYY-MM-DD'), '2099-12-31') FROM pmsi.p_mat2a_import
|
|
UNION
|
|
SELECT 'LAST_MAT2A_TO'::text, coalesce(to_char((to_date(max(mat2a_annee::text || lpad(mat2a_mois, 2, 0)::text), 'YYYYMM') + interval '1 month' - interval '1 day'), 'YYYY-MM-DD'), '2099-12-31') FROM pmsi.p_mat2a_import
|
|
UNION
|
|
SELECT 'LAST_MAT2A_TEXT'::text, base.cti_to_french(to_char((to_date(max(mat2a_annee::text || lpad(mat2a_mois, 2, 0)::text), 'YYYYMM') + interval '1 month' - interval '1 day'), 'Mon YYYY')) FROM pmsi.p_mat2a_import
|
|
]]></select>
|
|
<FIELDS>
|
|
<FIELD name="name"/>
|
|
<FIELD name="value"/>
|
|
</FIELDS>
|
|
</SQL>
|
|
</QUERY>
|
|
</QUERIES>
|
|
<PRESENTATION>
|
|
<VIEWLINKS>
|
|
<VIEWLINK label="Liste Prestations" shortLabel="Liste Prestations" view="PMSI000026.XML">
|
|
<ARG name="_OPTION_FORCEDEFAULT"><value><![CDATA[ return '1'; ]]></value></ARG>
|
|
<ARG name="PRESTATION"><value><![CDATA[ return 'PR' + ROW.PRESTATION_ID; ]]></value></ARG>
|
|
<ARG name="CHAMP"><value><![CDATA[ return 'EXVA'; ]]></value></ARG>
|
|
<ARG name="PERIODE"><value><![CDATA[ return VIEW.LAST_MAT2A_FROM; ]]></value></ARG>
|
|
<ARG name="TOPERIODE"><value><![CDATA[ return VIEW.LAST_MAT2A_TO; ]]></value></ARG>
|
|
<ARG name="GROUPBY"><value><![CDATA[ return 'GHS'; ]]></value></ARG>
|
|
<ARG name="T_DUREE_SEJOUR"><value><![CDATA[ return '-1'; ]]></value></ARG>
|
|
</VIEWLINK>
|
|
</VIEWLINKS>
|
|
<ONGLET>
|
|
<DATAGRID title="Chiffrier OVALIDE" headerHeight="48" >
|
|
|
|
|
|
<COLUMN dataField="PRESTATION_ID" type="Char" width="100" headerText="Prestation id" visible="false" />
|
|
<COLUMN dataField="PRESTATION_CODE" type="Char" width="100" headerText="Prestation" />
|
|
|
|
|
|
|
|
<COLUMN dataField="CTI_QUANTITE" type="Number" width="100" outputFormat="#" headerText="Quantité
CTI" textAlign="left">
|
|
<HEADERCELLSTYLE name="backgroundColor" value="0xFFD393"/>
|
|
<CELLSTYLE name="cellIndicator" value="circle, 5, right middle, 0xFFA500" condition="ROW.CTI_QUANTITE != ROW.MAT2A_QUANTITE" />
|
|
</COLUMN>
|
|
<COLUMN dataField="MAT2A_QUANTITE" type="Number" width="100" outputFormat="#" headerText="Quantité
OVALIDE" textAlign="left">
|
|
<HEADERCELLSTYLE name="backgroundColor" value="0xFFD393"/>
|
|
</COLUMN>
|
|
|
|
|
|
|
|
<COLUMN dataField="CTI_MONTANT_BR" type="Number" width="90" outputFormat="0#E" headerText="Montant BR
CTI" textAlign="left">
|
|
<CELLSTYLE name="cellIndicator" value="circle, 5, right middle, 0xFFA500" condition="ROW.CTI_MONTANT_BR != ROW.MAT2A_MONTANT_BR" />
|
|
</COLUMN>
|
|
<COLUMN dataField="MAT2A_MONTANT_BR" type="Number" width="90" outputFormat="0#E" headerText="Montant BR
OVALIDE" textAlign="left" />
|
|
|
|
|
|
|
|
<COLUMN dataField="CTI_MONTANT_AMO" type="Number" width="90" outputFormat="0#E" headerText="Montant AM
CTI" textAlign="left">
|
|
<HEADERCELLSTYLE name="backgroundColor" value="0xFFD393"/>
|
|
<CELLSTYLE name="cellIndicator" value="circle, 5, right middle, 0xFFA500" condition="ROW.CTI_MONTANT_AMO != ROW.MAT2A_MONTANT_AMO" />
|
|
</COLUMN>
|
|
<COLUMN dataField="MAT2A_MONTANT_AMO" type="Number" width="90" outputFormat="0#E" headerText="Montant AM
OVALIDE" textAlign="left">
|
|
<HEADERCELLSTYLE name="backgroundColor" value="0xFFD393"/>
|
|
</COLUMN>
|
|
|
|
|
|
|
|
<COLUMN dataField="" type="Char" width="100" headerText="" />
|
|
</DATAGRID>
|
|
</ONGLET>
|
|
</PRESENTATION>
|
|
</VUE>
|