ESTRAZIONE DATI PER COMPILAZIONE SCHEDE FRAGILITA'

Caro Peppe Admin,
in qualità di tuo amico, ti chiedo di creare una query che estrae, onde evitare di aprire e chiudere più volte la scheda di fragilità dello scorso anno, per ogni paz. ultra65enne:
cognome e nome del paz.- indirizzo - n. telefono - nome del familiare - altezza, peso e BMI - fumo e alcool.
Sarebbe opportuno di ordinare l'estrazione in ordine alfabetico come sono allineate sul portale dell'ASL 
per evitare perdite di tempo alla ricerca del singolo pz.
Certo di un tuo rapido riscontro (sai che bisogna completarle entro il 31 gennaio 2015) ti consiglio di rendere partecipi tutti gli altri colleghi del distretto per e-mail della tua realizzazione in quanto più di uno mi ha chiesto se esisteva la possibilità di facilitarci la compilazione.
Spero non ci deluderai (per te è una sciocchezza) in quanto conosciamo bene le Tue capacità di web ... MAST!!
(elisione di mastro per i non campani).
Ciao. Per gli auguri natalizi è ancora presto.

Vabbè ? Il resto avanza ...

Select distinct p.cognome, p.nome, CAST(p.Codice_Fiscale as CHAR (22)) Codice_Fiscale,  p.nascita D_Nascita, p.Comune_Di_Nascita, p.Provincia_Nascita PR, CAST(Years(p.nascita, Today()) As CHAR (4)) eta, p.sesso, n.pa_ind+' '+n.domi_civico+' '+n.pa_cit as indirizzo , pa_tel, Tel_Cell, Refer_1_Nome_Cogn, Refer_1_Indirizzo, Refer_1_Telefono,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1935' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1935' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Altezza_,
(select Cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1946' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1946' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Peso_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '2609' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _BMI_,
(Select Max(a.data_open) From cart_accert a Where (a.codice = p.codice And a.ac_code Like '2609' And ac_val Is Not Null) And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Data_BMI_ ,
(select MAX(a.ac_val) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2835' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2835' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Attivita_Fisica_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '3560' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '3560' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Circonferenza_Vita_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2904' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2904' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) ___Consumo_Alcool___, '    '_,
(Select
CAST((case a.ac_val
WHEN 'O' THEN 'fumatore occasionale'
WHEN 'V' THEN 'fumatore passivo'
WHEN '1' THEN 'meno di 10 sigarette al giorno'
WHEN '2' THEN 'tra 10 e 20 sigarette al giorno'
WHEN '3' THEN 'oltre 20 sigarette al giorno'
WHEN 'X' THEN 'mai fumato e mai fumerà'
WHEN 'N' THEN 'mai fumato'
WHEN 'E' THEN 'ex fumatore da oltre 1 anno'
WHEN 'M' THEN 'ex fumatore'
WHEN 'F' THEN 'ex forte fumatore da oltre 10 anni'
WHEN 'Z' THEN 'ex forte fumatore da oltre 1 anno'
WHEN 'U' THEN 'ex forte fumatore'
WHEN 'P' THEN 'fumatore di pipa'
WHEN 'S' THEN 'fumatore di sigaro'
ELSE 'Non_Registrato' END) as char(31)) Tipo_fumatore
FROM cart_accert a
WHERE a.codice=p.codice AND a.ac_code like '2832' and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2832' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _________Fumo_______,
(Select a.p_max From cart_press a Where (a.codice = p.codice And a.p_max is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_max Is Not Null) ) AS pas,
(Select a.p_min From cart_press a Where (a.codice = p.codice And a.p_min is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_min Is Not Null) ) AS pad
FROM PAZIENTI p, NOS_002 n
WHERE p.codice=n.codice
AND (n.pa_drevoca IS NULL or n.pa_drevoca >TODAY()) AND (p.decesso IS NULL)
AND p.pa_convenzione='S'
AND n.pa_medi like '%'
AND eta>65
order by 1,2,4

Admin ha scritto:Vabbè ? Il resto avanza ...

Select distinct p.cognome, p.nome, CAST(p.Codice_Fiscale as CHAR (22)) Codice_Fiscale,  p.nascita D_Nascita, p.Comune_Di_Nascita, p.Provincia_Nascita PR, CAST(Years(p.nascita, Today()) As CHAR (4)) eta, p.sesso, n.pa_ind+' '+n.domi_civico+' '+n.pa_cit as indirizzo , pa_tel, Tel_Cell, Refer_1_Nome_Cogn, Refer_1_Indirizzo, Refer_1_Telefono,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1935' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1935' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Altezza_,
(select Cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1946' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1946' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Peso_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '2609' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _BMI_,
(Select Max(a.data_open) From cart_accert a Where (a.codice = p.codice And a.ac_code Like '2609' And ac_val Is Not Null) And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Data_BMI_ ,
(select MAX(a.ac_val) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2835' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2835' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Attivita_Fisica_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '3560' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '3560' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Circonferenza_Vita_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2904' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2904' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) ___Consumo_Alcool___, '    '_,
(Select
CAST((case a.ac_val
WHEN 'O' THEN 'fumatore occasionale'
WHEN 'V' THEN 'fumatore passivo'
WHEN '1' THEN 'meno di 10 sigarette al giorno'
WHEN '2' THEN 'tra 10 e 20 sigarette al giorno'
WHEN '3' THEN 'oltre 20 sigarette al giorno'
WHEN 'X' THEN 'mai fumato e mai fumerà'
WHEN 'N' THEN 'mai fumato'
WHEN 'E' THEN 'ex fumatore da oltre 1 anno'
WHEN 'M' THEN 'ex fumatore'
WHEN 'F' THEN 'ex forte fumatore da oltre 10 anni'
WHEN 'Z' THEN 'ex forte fumatore da oltre 1 anno'
WHEN 'U' THEN 'ex forte fumatore'
WHEN 'P' THEN 'fumatore di pipa'
WHEN 'S' THEN 'fumatore di sigaro'
ELSE 'Non_Registrato' END) as char(31)) Tipo_fumatore
FROM cart_accert a
WHERE a.codice=p.codice AND a.ac_code like '2832' and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2832' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _________Fumo_______,
(Select a.p_max From cart_press a Where (a.codice = p.codice And a.p_max is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_max Is Not Null) ) AS pas,
(Select a.p_min From cart_press a Where (a.codice = p.codice And a.p_min is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_min Is Not Null) ) AS pad
FROM PAZIENTI p, NOS_002 n
WHERE p.codice=n.codice
AND (n.pa_drevoca IS NULL or n.pa_drevoca >TODAY()) AND (p.decesso IS NULL)
AND p.pa_convenzione='S'
AND n.pa_medi like '%'
AND eta>65
order by 1,2,4

Grazieeeeeeeeeeeeeeeeeee!
come al solito sei andato abbondantemente oltre le migliori aspettative oltre che essere stato velocissimo nella risposta.
Funziona  benissimo ed estrae anche il C.Fiscale che in questo caso non serve!
L'unica cosa che ho dimenticato di chiederti era di farla con il codice personale per la medicina di gruppo.
Per il mio pc personale funziona perfettamente, ma sai benissimo che per il gruppo di cui faccio parte ci vuole il rigo "jolly" che usi sempre %xxxxxx%.
Non dirmi che rompo .... Ciao e buona domenica.
P.S. da lunedì parto con la demat! Che Dio me la mandi buona ....

Guarda bene al terzultimo rigo.

Per la demat aspetta qualche giorno perché solo poche farmacie si sono adeguate, pare che la loro partenza è per il 1° gennaio 2015.

Admin ha scritto:Guarda bene al terzultimo rigo.

Bisogna mettere il proprio codice tra '%%%%%'  vero?

amico di Giuseppe ha scritto:

Admin ha scritto:Guarda bene al terzultimo rigo.

Bisogna mettere il proprio codice tra '%%%%%'  vero?

Basta mettere anche solo qualche cifra iniziale prima di %

Ciao Giuseppe ti ha portato i miei saluti il "Tuo Amico"? 

drtulino ha scritto:Ciao Giuseppe ti ha portato i miei saluti il "Tuo Amico"? 

Certo Renato, il "Mio Caro Amico" spesso si reca a Firenze agli incontri con i sig.ri della Millennium e poi mi riferisce dei suoi incontri con tanti amici del forum. Tu sei sempre in capo nota.

Admin ha scritto:Vabbè ? Il resto avanza ...

Select distinct p.cognome, p.nome, CAST(p.Codice_Fiscale as CHAR (22)) Codice_Fiscale,  p.nascita D_Nascita, p.Comune_Di_Nascita, p.Provincia_Nascita PR, CAST(Years(p.nascita, Today()) As CHAR (4)) eta, p.sesso, n.pa_ind+' '+n.domi_civico+' '+n.pa_cit as indirizzo , pa_tel, Tel_Cell, Refer_1_Nome_Cogn, Refer_1_Indirizzo, Refer_1_Telefono,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1935' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1935' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Altezza_,
(select Cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1946' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1946' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Peso_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '2609' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _BMI_,
(Select Max(a.data_open) From cart_accert a Where (a.codice = p.codice And a.ac_code Like '2609' And ac_val Is Not Null) And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Data_BMI_ ,
(select MAX(a.ac_val) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2835' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2835' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Attivita_Fisica_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '3560' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '3560' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Circonferenza_Vita_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2904' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2904' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) ___Consumo_Alcool___, '    '_,
(Select
CAST((case a.ac_val
WHEN 'O' THEN 'fumatore occasionale'
WHEN 'V' THEN 'fumatore passivo'
WHEN '1' THEN 'meno di 10 sigarette al giorno'
WHEN '2' THEN 'tra 10 e 20 sigarette al giorno'
WHEN '3' THEN 'oltre 20 sigarette al giorno'
WHEN 'X' THEN 'mai fumato e mai fumerà'
WHEN 'N' THEN 'mai fumato'
WHEN 'E' THEN 'ex fumatore da oltre 1 anno'
WHEN 'M' THEN 'ex fumatore'
WHEN 'F' THEN 'ex forte fumatore da oltre 10 anni'
WHEN 'Z' THEN 'ex forte fumatore da oltre 1 anno'
WHEN 'U' THEN 'ex forte fumatore'
WHEN 'P' THEN 'fumatore di pipa'
WHEN 'S' THEN 'fumatore di sigaro'
ELSE 'Non_Registrato' END) as char(31)) Tipo_fumatore
FROM cart_accert a
WHERE a.codice=p.codice AND a.ac_code like '2832' and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2832' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _________Fumo_______,
(Select a.p_max From cart_press a Where (a.codice = p.codice And a.p_max is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_max Is Not Null) ) AS pas,
(Select a.p_min From cart_press a Where (a.codice = p.codice And a.p_min is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_min Is Not Null) ) AS pad
FROM PAZIENTI p, NOS_002 n
WHERE p.codice=n.codice
AND (n.pa_drevoca IS NULL or n.pa_drevoca >TODAY()) AND (p.decesso IS NULL)
AND p.pa_convenzione='S'
AND n.pa_medi like '%'
AND eta>65
order by 1,2,4

Gentili colleghi, ho utilizzato la query per estrarre le schede di fragilità, ma non riesco ad inviarle al portale intranet dell'ASL NA1 Centro, perché non le accetta: esce l'avviso "Trasferimento duplicato".
Qualcuno mi può dare una mano? Dove pensate possa essere l'errore?
Grazie.

Girolamo della Valle
ASL NA1 Centro

G. della Valle ha scritto:

Admin ha scritto:Vabbè ? Il resto avanza ...

Select distinct p.cognome, p.nome, CAST(p.Codice_Fiscale as CHAR (22)) Codice_Fiscale,  p.nascita D_Nascita, p.Comune_Di_Nascita, p.Provincia_Nascita PR, CAST(Years(p.nascita, Today()) As CHAR (4)) eta, p.sesso, n.pa_ind+' '+n.domi_civico+' '+n.pa_cit as indirizzo , pa_tel, Tel_Cell, Refer_1_Nome_Cogn, Refer_1_Indirizzo, Refer_1_Telefono,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1935' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1935' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Altezza_,
(select Cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1946' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1946' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Peso_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '2609' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _BMI_,
(Select Max(a.data_open) From cart_accert a Where (a.codice = p.codice And a.ac_code Like '2609' And ac_val Is Not Null) And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Data_BMI_ ,
(select MAX(a.ac_val) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2835' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2835' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Attivita_Fisica_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '3560' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '3560' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Circonferenza_Vita_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2904' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2904' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) ___Consumo_Alcool___, '    '_,
(Select
CAST((case a.ac_val
WHEN 'O' THEN 'fumatore occasionale'
WHEN 'V' THEN 'fumatore passivo'
WHEN '1' THEN 'meno di 10 sigarette al giorno'
WHEN '2' THEN 'tra 10 e 20 sigarette al giorno'
WHEN '3' THEN 'oltre 20 sigarette al giorno'
WHEN 'X' THEN 'mai fumato e mai fumerà'
WHEN 'N' THEN 'mai fumato'
WHEN 'E' THEN 'ex fumatore da oltre 1 anno'
WHEN 'M' THEN 'ex fumatore'
WHEN 'F' THEN 'ex forte fumatore da oltre 10 anni'
WHEN 'Z' THEN 'ex forte fumatore da oltre 1 anno'
WHEN 'U' THEN 'ex forte fumatore'
WHEN 'P' THEN 'fumatore di pipa'
WHEN 'S' THEN 'fumatore di sigaro'
ELSE 'Non_Registrato' END) as char(31)) Tipo_fumatore
FROM cart_accert a
WHERE a.codice=p.codice AND a.ac_code like '2832' and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2832' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _________Fumo_______,
(Select a.p_max From cart_press a Where (a.codice = p.codice And a.p_max is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_max Is Not Null) ) AS pas,
(Select a.p_min From cart_press a Where (a.codice = p.codice And a.p_min is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_min Is Not Null) ) AS pad
FROM PAZIENTI p, NOS_002 n
WHERE p.codice=n.codice
AND (n.pa_drevoca IS NULL or n.pa_drevoca >TODAY()) AND (p.decesso IS NULL)
AND p.pa_convenzione='S'
AND n.pa_medi like '%'
AND eta>65
order by 1,2,4

Gentili colleghi, ho utilizzato la query per estrarre le schede di fragilità, ma non riesco ad inviarle al portale intranet dell'ASL NA1 Centro, perché non le accetta: esce l'avviso "Trasferimento duplicato".
Qualcuno mi può dare una mano? Dove pensate possa essere l'errore?
Grazie.

Girolamo della Valle
ASL NA1 Centro

Caro collega, il file da inviare all'Asl per le schede di fragilità non lo devi estrarre con questa query, ma da Mille utilità -> AUSL -> schede di fragilità -> export schede di fragilità. Spero di essere stato chiaro.
Purtroppo a Caserta invece dobbiamo compilarle sul portale dell'Asl e non attraverso MW. Per tale motivo ho chiesto all'Admin una query per estrarre i dati per evitare di aprire e chiudere MW per ogni singolo pz e poi riportarli sul portale Asl.
Antonio Menna
Asl CE

amico di Giuseppe ha scritto:

G. della Valle ha scritto:

Admin ha scritto:Vabbè ? Il resto avanza ...

Select distinct p.cognome, p.nome, CAST(p.Codice_Fiscale as CHAR (22)) Codice_Fiscale,  p.nascita D_Nascita, p.Comune_Di_Nascita, p.Provincia_Nascita PR, CAST(Years(p.nascita, Today()) As CHAR (4)) eta, p.sesso, n.pa_ind+' '+n.domi_civico+' '+n.pa_cit as indirizzo , pa_tel, Tel_Cell, Refer_1_Nome_Cogn, Refer_1_Indirizzo, Refer_1_Telefono,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1935' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1935' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Altezza_,
(select Cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1946' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1946' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Peso_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '2609' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _BMI_,
(Select Max(a.data_open) From cart_accert a Where (a.codice = p.codice And a.ac_code Like '2609' And ac_val Is Not Null) And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Data_BMI_ ,
(select MAX(a.ac_val) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2835' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2835' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Attivita_Fisica_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '3560' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '3560' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Circonferenza_Vita_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2904' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2904' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) ___Consumo_Alcool___, '    '_,
(Select
CAST((case a.ac_val
WHEN 'O' THEN 'fumatore occasionale'
WHEN 'V' THEN 'fumatore passivo'
WHEN '1' THEN 'meno di 10 sigarette al giorno'
WHEN '2' THEN 'tra 10 e 20 sigarette al giorno'
WHEN '3' THEN 'oltre 20 sigarette al giorno'
WHEN 'X' THEN 'mai fumato e mai fumerà'
WHEN 'N' THEN 'mai fumato'
WHEN 'E' THEN 'ex fumatore da oltre 1 anno'
WHEN 'M' THEN 'ex fumatore'
WHEN 'F' THEN 'ex forte fumatore da oltre 10 anni'
WHEN 'Z' THEN 'ex forte fumatore da oltre 1 anno'
WHEN 'U' THEN 'ex forte fumatore'
WHEN 'P' THEN 'fumatore di pipa'
WHEN 'S' THEN 'fumatore di sigaro'
ELSE 'Non_Registrato' END) as char(31)) Tipo_fumatore
FROM cart_accert a
WHERE a.codice=p.codice AND a.ac_code like '2832' and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2832' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _________Fumo_______,
(Select a.p_max From cart_press a Where (a.codice = p.codice And a.p_max is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_max Is Not Null) ) AS pas,
(Select a.p_min From cart_press a Where (a.codice = p.codice And a.p_min is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_min Is Not Null) ) AS pad
FROM PAZIENTI p, NOS_002 n
WHERE p.codice=n.codice
AND (n.pa_drevoca IS NULL or n.pa_drevoca >TODAY()) AND (p.decesso IS NULL)
AND p.pa_convenzione='S'
AND n.pa_medi like '%'
AND eta>65
order by 1,2,4

Gentili colleghi, ho utilizzato la query per estrarre le schede di fragilità, ma non riesco ad inviarle al portale intranet dell'ASL NA1 Centro, perché non le accetta: esce l'avviso "Trasferimento duplicato".
Qualcuno mi può dare una mano? Dove pensate possa essere l'errore?
Grazie.

Girolamo della Valle
ASL NA1 Centro

Caro collega, il file da inviare all'Asl per le schede di fragilità non lo devi estrarre con questa query, ma da Mille utilità -> AUSL -> schede di fragilità -> export schede di fragilità. Spero di essere stato chiaro.
Purtroppo a Caserta invece dobbiamo compilarle sul portale dell'Asl e non attraverso MW. Per tale motivo ho chiesto all'Admin una query per estrarre i dati per evitare di aprire e chiudere MW per ogni singolo pz e poi riportarli sul portale Asl.
Antonio Menna
Asl CE

Hai ragione, non sono stato sufficientemente chiaro. Dopo aver lanciato questa query da Mille utilità, ho effettuato la procedura da te descritta (Mille utilità-> AUSL -> schede di fragilità -> export schede di fragilità), e vengono creati due file in formato .zip da inviare al portale della ASL. Purtroppo questi file non vengono accettati.
Probabilmente questa query non è quella corretta.
Per le vecchie schede gerontologiche il "nostro" Amministratore elaborava una query che consentiva di estrarre le schede compilate l'anno precedente "aggiornate" all'anno in corso. In effetti avrei bisogno di questa query e quindi, poiché tu sei "amico di Giuseppe", ti chiedo di mettere una buona parola presso il nostro "Deus ex Machina".
Grazie ancora.

Girolamo della Valle
ASL NA1 Centro

G. della Valle ha scritto:

amico di Giuseppe ha scritto:

G. della Valle ha scritto:

Admin ha scritto:Vabbè ? Il resto avanza ...

Select distinct p.cognome, p.nome, CAST(p.Codice_Fiscale as CHAR (22)) Codice_Fiscale,  p.nascita D_Nascita, p.Comune_Di_Nascita, p.Provincia_Nascita PR, CAST(Years(p.nascita, Today()) As CHAR (4)) eta, p.sesso, n.pa_ind+' '+n.domi_civico+' '+n.pa_cit as indirizzo , pa_tel, Tel_Cell, Refer_1_Nome_Cogn, Refer_1_Indirizzo, Refer_1_Telefono,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1935' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1935' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Altezza_,
(select Cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '1946' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '1946' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Peso_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where a.codice=p.codice and a.ac_code like '2609' And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _BMI_,
(Select Max(a.data_open) From cart_accert a Where (a.codice = p.codice And a.ac_code Like '2609' And ac_val Is Not Null) And Not Exists (Select a1.codice From cart_accert a1 Where a1.codice = a.codice And a1.ac_code Like '2609' And (a1.data_open > a.data_open Or (a1.data_open = a.data_open And a1.rowid > a.rowid)) And a1.ac_val Is Not Null)) _Data_BMI_ ,
(select MAX(a.ac_val) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2835' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2835' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Attivita_Fisica_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '3560' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '3560' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _Circonferenza_Vita_,
(select cast(a.ac_val+0 as dec(4,1)) from cart_accert a where ( a.codice=p.codice and a.ac_code Like '2904' and a.ac_val is not null ) and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2904' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) ___Consumo_Alcool___, '    '_,
(Select
CAST((case a.ac_val
WHEN 'O' THEN 'fumatore occasionale'
WHEN 'V' THEN 'fumatore passivo'
WHEN '1' THEN 'meno di 10 sigarette al giorno'
WHEN '2' THEN 'tra 10 e 20 sigarette al giorno'
WHEN '3' THEN 'oltre 20 sigarette al giorno'
WHEN 'X' THEN 'mai fumato e mai fumerà'
WHEN 'N' THEN 'mai fumato'
WHEN 'E' THEN 'ex fumatore da oltre 1 anno'
WHEN 'M' THEN 'ex fumatore'
WHEN 'F' THEN 'ex forte fumatore da oltre 10 anni'
WHEN 'Z' THEN 'ex forte fumatore da oltre 1 anno'
WHEN 'U' THEN 'ex forte fumatore'
WHEN 'P' THEN 'fumatore di pipa'
WHEN 'S' THEN 'fumatore di sigaro'
ELSE 'Non_Registrato' END) as char(31)) Tipo_fumatore
FROM cart_accert a
WHERE a.codice=p.codice AND a.ac_code like '2832' and not exists (select b.codice from cart_accert b where a.codice = b.codice and b.ac_code Like '2832' and (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.ac_val is not null)) _________Fumo_______,
(Select a.p_max From cart_press a Where (a.codice = p.codice And a.p_max is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_max Is Not Null) ) AS pas,
(Select a.p_min From cart_press a Where (a.codice = p.codice And a.p_min is Not Null) And Not Exists (Select b.codice From cart_press b Where a.codice = b.codice And (b.data_open>a.data_open or (b.data_open=a.data_open and b.rowid>a.rowid)) and b.p_min Is Not Null) ) AS pad
FROM PAZIENTI p, NOS_002 n
WHERE p.codice=n.codice
AND (n.pa_drevoca IS NULL or n.pa_drevoca >TODAY()) AND (p.decesso IS NULL)
AND p.pa_convenzione='S'
AND n.pa_medi like '%'
AND eta>65
order by 1,2,4

Gentili colleghi, ho utilizzato la query per estrarre le schede di fragilità, ma non riesco ad inviarle al portale intranet dell'ASL NA1 Centro, perché non le accetta: esce l'avviso "Trasferimento duplicato".
Qualcuno mi può dare una mano? Dove pensate possa essere l'errore?
Grazie.

Girolamo della Valle
ASL NA1 Centro

Caro collega, il file da inviare all'Asl per le schede di fragilità non lo devi estrarre con questa query, ma da Mille utilità -> AUSL -> schede di fragilità -> export schede di fragilità. Spero di essere stato chiaro.
Purtroppo a Caserta invece dobbiamo compilarle sul portale dell'Asl e non attraverso MW. Per tale motivo ho chiesto all'Admin una query per estrarre i dati per evitare di aprire e chiudere MW per ogni singolo pz e poi riportarli sul portale Asl.
Antonio Menna
Asl CE

Hai ragione, non sono stato sufficientemente chiaro. Dopo aver lanciato questa query da Mille utilità, ho effettuato la procedura da te descritta (Mille utilità-> AUSL -> schede di fragilità -> export schede di fragilità), e vengono creati due file in formato .zip da inviare al portale della ASL. Purtroppo questi file non vengono accettati.
Probabilmente questa query non è quella corretta.
Per le vecchie schede gerontologiche il "nostro" Amministratore elaborava una query che consentiva di estrarre le schede compilate l'anno precedente "aggiornate" all'anno in corso. In effetti avrei bisogno di questa query e quindi, poiché tu sei "amico di Giuseppe", ti chiedo di mettere una buona parola presso il nostro "Deus ex Machina".
Grazie ancora.

Girolamo della Valle
ASL NA1 Centro

Anch'io avrei bisogno di una query che consenta di estrarre le schede compilate in Millewin l'anno precedente aggiornate all'anno in corso.