Strathege pour MedyCS

Calcul du score de thrombophilie pendant la grossesse et conduite à tenir Adapté au programme MedyCS par Alain GODARD.

 

@@_strathege1 :=
SI((SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39866 /* >1 ATCD TEV per */ ));12;0)+
SI((SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39867 /* 1 ATCD TEV perso prox ou EP */ ));5;0)+
SI((SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39868 /* 1 ATCD TEV perso distal + Gr, OP, post-IVG, PP */ ));3;0)+
SI((SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39869 /* 1 ATCD TEV perso + autre F décl : plâtre, voyage */ ));0;0)+
SI((SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39870 /* ATCD fam 1° V idioP, multiples ou pc vital */ ));2;0)+
SI((SEL( {C14572@:Thrombophilie} ; `39873 /* Déficit en antithrombine III */ ));10;0)+
SI((SEL( {C14572@:Thrombophilie} ; `39874 /* Déficit en prot C */ ))||
   (SEL( {C14572(-9)@:Thrombophilie} ; `39875 /* Déficit en prot S */ ));4;0)+
SI((SEL( {C14572@:Thrombophilie} ; `39876 /* Mutation fact V hétéroZ */ ))||
   (SEL( {C14572@:Thrombophilie} ; `39877 /* Mutation fact II hétérzyG */ ));3;0)+
SI((SEL( {C14572@:Thrombophilie} ; `39878 /* Mutation facteur V homozygote */ ))||
   (SEL( {C14572@:Thrombophilie} ; `39879 /* Mutation facteur II homozygote */ ));5;0)+
SI((SEL( {C14572@:Thrombophilie} ; `39876 /* Mutation fact V hétéroZ */ ))&&
   (SEL( {C14572@:Thrombophilie} ; `39877 /* Mutation fact II hétérzyG */ ));4;0)+
SI((SEL( {C14572@:Thrombophilie} ; `39880 /* Elevation du fact VIII */ ))||
   (SEL( {C14572@:Thrombophilie} ; `39881 /* Hyperhomocystéi */ ));0;0)+
SI((SEL( {C14572@:Thrombophilie} ; `39882 /* ACC */ ))||
   (SEL( {C14572@:Thrombophilie} ; `39883 /* Antiphospholipi */ ));
   SI((
        (SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39866 /* >1 ATCD TEV per */ )) ||
        (SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39867 /* 1 ATCD TEV pers */ )) ||
        (SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39868 /* 1 ATCD TEV pers */ )) ||
        (SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39869 /* 1 ATCD TEV pers */ )) ||
        (SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39872 /* ATCD AVC ou aut */ ))
    );12;9)
   ;0)+
@@_strathege :=
SI({V:_strathege1}>12;
{V:_strathege1}+
SI(/*WIZ:SI01^REF:-1^  QRM:14573:0:-1:39884:39885^  LNK:3^*/
    (
        (SEL( {C14573@:Pathologie vasculaire placentaire } ; `39884 /* MFIU vasculaire */ )) ||
        (SEL( {C14573@:Pathologie vasculaire placentaire } ; `39885 /* RCIU vasculaire */ ))
    )
/*FIN:SI*/;2;0)+
SI(/*WIZ:SI01^REF:-1^  QRM:14573:0:-1:39886:39887:39888^  LNK:3^*/
    (
        (SEL( {C14573@:Pathologie vasculaire placentaire } ; `39886 /* >3 Fausses Couc */ )) ||
        (SEL( {C14573@:Pathologie vasculaire placentaire } ; `39887 /* FCS > ou =9 SA */ )) ||
        (SEL( {C14573@:Pathologie vasculaire placentaire } ; `39888 /* HRP */ ))
    )
/*FIN:SI*/;0;0)+
SI(/*WIZ:SI01^REF:-1^  QRM:14573:0:-1:39889:39890:39891^  LNK:3^*/
    (
        (SEL( {C14573@:Pathologie vasculaire placentaire } ; `39889 /* Prééclampsie */ )) ||
        (SEL( {C14573@:Pathologie vasculaire placentaire } ; `39890 /* Eclampsie */ )) ||
        (SEL( {C14573@:Pathologie vasculaire placentaire } ; `39891 /* HELPP */ ))
    )
/*FIN:SI*/;1;0)
;{V:_strathege1})
@@_aspirine :=
SI(({V:_strathege}<12)&&
(   (
        (SEL( {C14571@:Antécédents d'événements TE V ou artériel} ; `39872 /* ATCD AVC ou aut */ ))
    )  ||
     (
        (SEL( {C14572@:Thrombophilie} ; `39882 /* Anticoagulant c */  )) ||
        (SEL( {C14572@:Thrombophilie} ; `39883 /* Antiphospholipi */  ))
     ) ||
    (
        ( ISNR({C14573@:Pathologie vasculaire placentaire }) = 0 /* Faux */ )
    )
)
;-1;0)
@@_ :="Score strathege : "+{V:_strathege}+nl()+
SI({V:_strathege}>=12;"Traitement curatif (0,1mg/Kg) "+
    SI((ISNR( {Q423.98:poids habituel (kg)}) = VRAI);"";"soit "+({Q423(60):poids habituel (kg)}*0,1)+"mg/j");
SI({V:_strathege}>=5;"Traitement prophylactique toute la grossesse et PP 6 semaines.";
SI({V:_strathege}>=4;"Traitement prophylactique 3° trimestre et PP 6 semaines.";
SI({V:_strathege}>=1;"Traitement prophylactique PP 6 semaines.";
;"Pas de traitement héparinémique."))))+
SI({V:_aspirine}=-1;" Aspirine";"")



 

1

 

2

Laisser un commentaire