|
|
<?xml version="1.0" encoding="ISO-8859-1"?>
|
|
|
<VUE name="PMSI000263" label="PMSI. CaseMix GHS OVALIDE" title="= 'PMSI. CaseMix GHS 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="pmsi000263" helpFile="iCTI_PMSI_PMSI000263.HTML">
|
|
|
<CACHE cachable="false" />
|
|
|
<VIEWPROPERTIES>
|
|
|
<PROPERTY dataLink="VIEWPROPERTIES" nameField="name" valueField="value"/>
|
|
|
<PROPERTY name="ROWS">
|
|
|
<value><![CDATA[[EVAL
|
|
|
|
|
|
if ('[OPTION]' == 'ERR' ) {
|
|
|
return "WHERE ( cti_nb_sej IS DISTINCT FROM mat2a_nb_sej OR
|
|
|
cti_montant_br IS DISTINCT FROM mat2a_montant_br) " ;
|
|
|
}
|
|
|
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
|
|
|
COALESCE(rss.ghs_id, 0),
|
|
|
mat2a.ghs_code,
|
|
|
|
|
|
COALESCE(rss.ghm_id, 0),
|
|
|
mat2a.ghm_code,
|
|
|
|
|
|
rss.cti_nb_sej,
|
|
|
rss.cti_montant_br,
|
|
|
|
|
|
mat2a.mat2a_nb_sej,
|
|
|
mat2a.mat2a_montant_br
|
|
|
FROM
|
|
|
(
|
|
|
SELECT
|
|
|
mt2.ghs_code::numeric,
|
|
|
mt2.ghm_code,
|
|
|
round(mt2.nb_sej) AS mat2a_nb_sej,
|
|
|
round(mt2.montant_br) AS mat2a_montant_br
|
|
|
FROM
|
|
|
pmsi.w_mat2a_oqn_casemix 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]'
|
|
|
) mat2a
|
|
|
LEFT JOIN
|
|
|
(
|
|
|
(
|
|
|
SELECT
|
|
|
v_rss_1.ghs_id AS ghs_id,
|
|
|
v_rss_1.ghs_code::numeric AS ghs_code,
|
|
|
v_rss_1.ghm_id AS ghm_id,
|
|
|
v_rss_1.ghm_code AS ghm_code,
|
|
|
sum(CASE WHEN v_rss_1.ghm_code IN ('28Z01Z', '28Z02Z', '28Z03Z', '28Z04Z', '28Z05Z', '28Z06Z') THEN v_rss_1.nb_rsa ELSE 1 END) AS cti_nb_sej,
|
|
|
round(sum(v_rss_1.base_remboursement)) AS cti_montant_br
|
|
|
FROM pmsi.v_rss_1
|
|
|
WHERE
|
|
|
date_sortie between '[VIEW.LAST_MAT2A_FROM]'::date AND '[VIEW.LAST_MAT2A_TO]'::date
|
|
|
AND cas_code <> '*'
|
|
|
AND traitement_epmsi IN ('30')
|
|
|
AND (cmd_code <> '14' OR ghm_code = '14Z08Z')
|
|
|
AND cmd_code <> '15'
|
|
|
AND v_rss_1.en_cours = '0'
|
|
|
GROUP BY 1, 2,3,4
|
|
|
)
|
|
|
UNION
|
|
|
(
|
|
|
SELECT
|
|
|
v_rss_1.ghs_id AS ghs_id,
|
|
|
v_rss_1.ghs_code::numeric AS ghs_code,
|
|
|
v_rss_1.ghm_id AS ghm_id,
|
|
|
v_rss_1.ghm_code AS ghm_code,
|
|
|
count(distinct v_rsf_detail_1.rss_id) AS cti_nb_sej,
|
|
|
round(sum(v_rsf_detail_1.base_remboursement)) AS cti_montant_br
|
|
|
FROM
|
|
|
pmsi.v_rss_1
|
|
|
JOIN pmsi.v_rsf_detail_1 On v_rsf_detail_1.rss_id = v_rss_1.rss_id
|
|
|
WHERE
|
|
|
date_sortie between '[VIEW.LAST_MAT2A_FROM]'::date AND '[VIEW.LAST_MAT2A_TO]'::date
|
|
|
AND traitement_epmsi = '30'
|
|
|
AND cas_code <> '*'
|
|
|
AND v_rss_1.cmd_code = '14'
|
|
|
AND v_rsf_detail_1.ghs_id NOT IN (SELECT to_id FROM pmsi.v_listes_3 WHERE liste_code = 'CTI_GHS_BB')
|
|
|
AND v_rss_1.en_cours = '0'
|
|
|
GROUP BY 1, 2,3,4
|
|
|
)
|
|
|
UNION
|
|
|
(
|
|
|
SELECT
|
|
|
enfant.ghs_id,
|
|
|
t_ghs.code as ghs_code,
|
|
|
enfant.ghm_id,
|
|
|
t_ghm.code as ghm_code,
|
|
|
count(distinct v_rsf_detail_1.rss_id) AS cti_nb_sej,
|
|
|
round(sum(v_rsf_detail_1.base_remboursement)) AS cti_montant_br
|
|
|
FROM pmsi.p_rss enfant
|
|
|
join pmsi.t_ghs on t_ghs.oid = enfant.ghs_id
|
|
|
join pmsi.t_ghm on t_ghm.oid = enfant.ghm_id
|
|
|
join pmsi.t_cmd on t_cmd.oid = t_ghm.cmd_id
|
|
|
join pmsi.p_rss mere on mere.no_rss = enfant.rss_mere_id
|
|
|
join pmsi.v_rsf_detail_1 ON v_rsf_detail_1.rss_id = mere.oid
|
|
|
WHERE
|
|
|
enfant.date_sortie between '[VIEW.LAST_MAT2A_FROM]'::date AND '[VIEW.LAST_MAT2A_TO]'::date
|
|
|
AND enfant.traitement_epmsi = '30'
|
|
|
AND v_rsf_detail_1.ghs_id IN (SELECT to_id FROM pmsi.v_listes_3 WHERE liste_code = 'CTI_GHS_BB')
|
|
|
AND prestation_code = 'GHS'
|
|
|
AND t_cmd.code = '15'
|
|
|
GROUP BY 1, 2,3,4
|
|
|
)
|
|
|
|
|
|
) rss ON mat2a.ghs_code = rss.ghs_code AND mat2a.ghm_code = rss.ghm_code
|
|
|
[VIEW.ROWS]
|
|
|
ORDER BY 2
|
|
|
;
|
|
|
]]>
|
|
|
</select>
|
|
|
<FIELDS>
|
|
|
<FIELD name="GHS_ID"/>
|
|
|
<FIELD name="GHS_CODE"/>
|
|
|
|
|
|
<FIELD name="GHM_ID"/>
|
|
|
<FIELD name="GHM_CODE"/>
|
|
|
|
|
|
<FIELD name="CTI_NB_SEJ"/>
|
|
|
<FIELD name="CTI_MONTANT_BR"/>
|
|
|
|
|
|
<FIELD name="MAT2A_NB_SEJ"/>
|
|
|
<FIELD name="MAT2A_MONTANT_BR"/>
|
|
|
</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 RSS" shortLabel="Liste RSS" view="PMSI000005.XML">
|
|
|
<ARG name="_OPTION_FORCEDEFAULT"><value><![CDATA[ return '1'; ]]></value></ARG>
|
|
|
<ARG name="GHM"><value><![CDATA[ return 'GH' + ROW.GHM_ID; ]]></value></ARG>
|
|
|
<ARG name="GHS"><value><![CDATA[ return 'GS' + ROW.GHS_ID; ]]></value></ARG>
|
|
|
<ARG name="CAS_W"><value><![CDATA[ return '0'; ]]></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>
|
|
|
<VIEWLINK label="C.A. RSS" shortLabel="C.A. RSS" view="PMSI000007.XML">
|
|
|
<ARG name="_OPTION_FORCEDEFAULT"><value><![CDATA[ return '1'; ]]></value></ARG>
|
|
|
<ARG name="GHM"><value><![CDATA[ return 'GH' + ROW.GHM_ID; ]]></value></ARG>
|
|
|
<ARG name="GHS"><value><![CDATA[ return 'GS' + ROW.GHS_ID; ]]></value></ARG>
|
|
|
<ARG name="CAS_W"><value><![CDATA[ return '0'; ]]></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="QEXB"><value><![CDATA[ return 'EXBOUI'; ]]></value></ARG>
|
|
|
<ARG name="T_DUREE_SEJOUR"><value><![CDATA[ return '-1'; ]]></value></ARG>
|
|
|
</VIEWLINK>
|
|
|
</VIEWLINKS>
|
|
|
<ONGLET>
|
|
|
<DATAGRID title="Chiffrier OVALIDE" headerHeight="48" >
|
|
|
|
|
|
|
|
|
<COLUMN dataField="GHS_ID" type="Char" width="100" headerText="GHM id" visible="false" />
|
|
|
<COLUMN dataField="GHS_CODE" type="Char" width="100" headerText="GHS
OVALIDE" />
|
|
|
|
|
|
|
|
|
|
|
|
<COLUMN dataField="GHM_ID" type="Char" width="100" headerText="GHM id" visible="false" />
|
|
|
<COLUMN dataField="GHM_CODE" type="Char" width="100" headerText="GHM
OVALIDE" />
|
|
|
|
|
|
|
|
|
|
|
|
<COLUMN dataField="CTI_NB_SEJ" type="Number" width="120" outputFormat="#" headerText="Séjours/Séances
CTI" textAlign="left">
|
|
|
<HEADERCELLSTYLE name="backgroundColor" value="0xFFD393"/>
|
|
|
<CELLSTYLE name="cellIndicator" value="circle, 5, right middle, 0xFFA500" condition="ROW.CTI_NB_SEJ != ROW.MAT2A_NB_SEJ" />
|
|
|
</COLUMN>
|
|
|
<COLUMN dataField="MAT2A_NB_SEJ" type="Number" width="120" outputFormat="#" headerText="Séjours/Séances
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="" type="Char" width="100" headerText="" />
|
|
|
</DATAGRID>
|
|
|
</ONGLET>
|
|
|
</PRESENTATION>
|
|
|
</VUE>
|