FORUM PER UTENTI MILLEWIN
Attenzione !
Per intervenire sul forum è necessario essere registrati e connessi.

L'Amministratore

****************************************************
“Se tu hai una mela ed io ho una mela, e ce la scambiamo, alla fine tu ed io avremo sempre una mela ciascuno.
Ma se tu hai un’idea ed io ho un’idea, e ce la scambiamo, allora avremo entrambi due idee”.

George Bernard Shaw
****************************************************

Richiesta query per prestazioni indotte

Andare in basso

Richiesta query per prestazioni indotte

Messaggio  alfstone il Mer 2 Mar 2011 - 23:16

Here I am again

Dunque, ragazzi. già ormai da qualche mese la regione Sicilia ha imposto una cosa a parer mio giustissima: in caso di prestazioni indotte da altri specialisti, è necessario trascrivere nelle caselline al centro-dx della ricetta il n. di iscrizione all'ordine del medico induttore.

Naturalmente queste prescrizioni (parliamo esclusivamente di "Accertamenti" e "Richieste") vengono salvate in Millewin come "suggerite". Così è finalmente più chiaro "chi prescrive cosa", e non tutto va a finire come prescrizione dell'elemento ultimo della catena, cioè il MMG.

Ora, richiesta per i maghi della query: Very Happy

sarebbe possibile avere una query che riesca a distinguere (sia numericamente che come spesa) queste prescrizioni indotte ripstto a quelle "farina del nostro sacco"?

Non basta ringraziare! Very Happy

Alfredo
alfstone
alfstone
Nuovo Membro
Nuovo Membro

Messaggi : 39
Punti : 3010
Voti per importanza dei messaggi : 0
Data d'iscrizione : 21.02.11
Età : 63
Località : Palermo

Visualizza il profilo

Torna in alto Andare in basso

Richiesta query per prestazioni indotte

Messaggio  Admin il Mer 2 Mar 2011 - 23:56

Puoi provare la seguente query:

/* Accertamenti */
Select (Case tipo When 'A' Then 'Allergologia ' When 'ANE' Then 'Anestesia' When 'ANG' Then 'Angiologia' When 'P' Then 'Anatomia Patologica' When 'C' Then 'Cardiologia' When 'CH' Then 'Chirurgia' When 'CP' Then 'Chirugia Plastica' When 'D' Then 'Dermatologia' When 'DI' Then 'Endocrinologia' When 'ECO' Then 'Ecografia' When 'G' Then 'Gastroenterologia' When 'GE' Then 'Genetica' When 'L' Then 'Laboratorio' When 'MN' Then 'Medicna Nucleare' When 'N' Then 'Neurologia' When 'NCH' Then 'Neurochirurgia' When 'NEF' Then 'Nefrologia' When 'O' Then 'Oculistica' When 'OG' Then 'Osterticia/Ginecologia' When 'ONC' Then 'Oncologia' When 'OR' Then 'Ortopedia' When 'OT' Then 'Otorino' When 'P' Then 'Pneumologia' When 'PS' Then 'Psichiatria' When 'R' Then 'Riabilitazione' When 'RAD' Then 'Radiodiagnostica' When 'RD' Then 'Radioterapia' When 'RIC' Then 'Ricoveri' When 'RM' Then 'Risonanza magnetica' When 'Rx' Then 'Radiologia' When 'U' Then 'Urologia' When 'VIS' Then 'Visite' When 'V' Then 'Varie' END) tipo,
(Case indotto When 'D' Then '02_Accertamenti Donazione' When 'E' Then '03_Accertamenti Pronto Soccorso' When 'H' Then '04_Accertamenti Ricovero' When 'L' Then '05_Accertamenti Lavoro/ Prevenz' When 'O' Then '06_Accertamenti Test in Office' When 'P' Then '07_Accertamenti Carico Paziente' When 'S' Then '08_Accertamenti Suggeriti' When 'T' Then '09_Accertamenti Altro ' Else '01_Accertamenti MdMG' End)
As Origine_spesa, SUM(quantita) numero, SUM(CAST(quantita*prezzo as dec(9,2))) spesa
FROM v_accertamenti
Where tipo Not In ( '00' , '_MW' , '_SG' , 'EO', 'FAM' , 'NEG' , 'STI' , 'TST', 'AN', 'ED', 'IO')
GROUP BY tipo, quantita, indotto
UNION ALL
/* FARMACI */
SELECT (Case fascia WHEN 'A' THEN 'Farmaci Fascia A' End),
(Case indotto When 'D' Then '11_Terapia Donazione' When 'E' Then '12_Terapia Pronto Soccorso ' When '2' Then '13_Terapia Doppia via distr' When 'H' Then '14_Terapia Ricovero' When 'L' Then '15_Terapia Lavoro/ Prevenz' When 'O' Then '16_Terapia Campione gratuito' When 'P' Then '17_Terapia Carico Paziente' When 'S' Then '18_Terapia Suggerita' When 'X' Then '19_Terapia Non concessa SSN' When 'T' Then 'T20_erapia Altro ' Else '10_Terapia_MdMG' End) As Origine_spesa, sum(quantita) pezzi, sum(Cast (prezzo*quantita AS DEC (9,2))) spesa
FROM v_terapie
WHERE fascia='A'
GROUP by fascia, indotto
UNION ALL
/* Fisiokinesiterapie */
SELECT (Case tipo when 'R' then 'FISIOKINESITERAPIA' end) FKT,
(Case indotto When 'D' Then '22_FKT Donazione' When 'E' Then '23_FKT Pronto Soccorso '
When 'H' Then '24_FKT Ricovero' When 'L' Then '25_FKT Lavoro/ Prevenz' When 'O' Then '26_FKT Test in Office' When 'P' Then '27_FKT Carico Paziente' When 'S' Then '28_FKT Suggerito' When 'T' Then '29_FKT Altro ' Else '21_FKT MdMG' End) As Origine_spesa, SUM(quantita) numero, SUM(CAST(quantita*prezzo as dec(9,2))) spesa
FROM v_richieste
WHERE tipo='R'
GROUP by tipo, indotto
ORDER by 2,1,4 desc

_________________
L'Amministratore
Giuseppe Blasio
Admin
Admin
Admin
Admin

Messaggi : 525
Punti : 3605
Voti per importanza dei messaggi : 85
Data d'iscrizione : 20.02.11
Località : CASERTA

Visualizza il profilo http://utentimillewin.forumattivo.it

Torna in alto Andare in basso

Re: Richiesta query per prestazioni indotte

Messaggio  alfstone il Gio 3 Mar 2011 - 23:56

Perfetto, grazie Giuseppe! Smile

Alfredo
alfstone
alfstone
Nuovo Membro
Nuovo Membro

Messaggi : 39
Punti : 3010
Voti per importanza dei messaggi : 0
Data d'iscrizione : 21.02.11
Età : 63
Località : Palermo

Visualizza il profilo

Torna in alto Andare in basso

Re: Richiesta query per prestazioni indotte

Messaggio  Contenuto sponsorizzato


Contenuto sponsorizzato


Torna in alto Andare in basso

Torna in alto


 
Permessi di questa sezione del forum:
Non puoi rispondere agli argomenti in questo forum