m.cCondit = '.T.' SELECT DISTINCT ; E.nType ,; R.lassimille , ; CAST( ICASE( INLIST( .F. , E.ltransfert , M.lcondit ) , E.ltransfert ,; ICASE( D.ddate <= m.dlimit , .T. , .F. )) AS L ) AS ltransfert ,; NVL( SUM( ICASE( E.nPosCat = 1 , 1 , 0 ) ) , 0 ) AS nCat_O,; NVL( SUM( ICASE( E.nPosCat = 2 , 1 , 0 ) ) , 0 ) AS nCat_A,; NVL( SUM( ICASE( E.nPosCat = 3 , 1 , 0 ) ) , 0 ) AS nCat_B,; NVL( SUM( ICASE( E.nPosCat = 4 , 1 , 0 ) ) , 0 ) AS nCat_C,; NVL( SUM( ICASE( E.nPosCat = 5 , 1 , 0 ) ) , 0 ) AS nCat_Cd; FROM amline!Etats E; INNER JOIN DatesFiltred D ON D.ddate BETW E.ddebut AND EVL( E.dfin , m.dfin ) ; INNER JOIN amline!Resident R ON R.iid = E.iresidentid ; WHERE R.iid = 3065 GROUP BY 1,2,3 INTO CURSOR Categ READWRITEBut This code code give bad result
m.cCondit = "R.iid=" + TRANSF( 3065 ) SELECT DISTINCT ; E.nType ,; R.lassimille , ; CAST( ICASE( INLIST( .F. , E.ltransfert , M.lcondit ) , E.ltransfert ,; ICASE( D.ddate <= m.dlimit , .T. , .F. )) AS L ) AS ltransfert ,; NVL( SUM( ICASE( E.nPosCat = 1 , 1 , 0 ) ) , 0 ) AS nCat_O,; NVL( SUM( ICASE( E.nPosCat = 2 , 1 , 0 ) ) , 0 ) AS nCat_A,; NVL( SUM( ICASE( E.nPosCat = 3 , 1 , 0 ) ) , 0 ) AS nCat_B,; NVL( SUM( ICASE( E.nPosCat = 4 , 1 , 0 ) ) , 0 ) AS nCat_C,; NVL( SUM( ICASE( E.nPosCat = 5 , 1 , 0 ) ) , 0 ) AS nCat_Cd; FROM amline!Etats E; INNER JOIN DatesFiltred D ON D.ddate BETW E.ddebut AND EVL( E.dfin , m.dfin ) ; INNER JOIN amline!Resident R ON R.iid = E.iresidentid ; WHERE EVAL( m.cCondit )=.T. GROUP BY 1,2,3 INTO CURSOR Categ READWRITEI don't know the reason....