Execute Immediate : Can't run ...Please help

Hi,

Can anybody tell me what's the wrong with the EXECUTE IMMEDIATE. I am just pasting the code. The problem is in the EXECUTE IMMEDIATE strSql;

Thanks in Advance
Zahir

---

AS 
PROCEDURE GET_LOOKUP (  	  pILOOKUP_LANGUAGECODE	   	  IN NUMBER,
                  pSLOOKUP_GROUP   IN VARCHAR2,   
   							  IO_CURSOR    IN OUT T_CURSOR)
   IS
        V_CURSOR T_CURSOR;
         strSql   VARCHAR2(1000);
    BEGIN
        
        strSql := 'SELECT DISTINCT LOOKUP.SLOOKUP_VALUE,
                    LOOKUP.SLOOKUP_LABEL FROM SFIS.LOOKUP';
        
        strSql := strSql || ' WHERE SLOOKUP_GROUP = ' ||
pSLOOKUP_GROUP;
        strSql := strSql || ' AND ILOOKUP_LANGUAGECODE = ' ||
pILOOKUP_LANGUAGECODE;
        
        
        IF (pSLOOKUP_GROUP='FacStatusEntryType') OR
(pSLOOKUP_GROUP='FacOwner') THEN
        
        OPEN V_CURSOR FOR
             strSql := strSql || ' ORDER BY LOOKUP.SLOOKUP_VALUE';
             
             EXECUTE IMMEDIATE strSql; 

             IO_CURSOR := V_CURSOR;
        ELSE
             OPEN V_CURSOR FOR
             
             strSql := strSql;
             
             EXECUTE IMMEDIATE strSql; 

             IO_CURSOR := V_CURSOR;
        
        END IF; 
        
  END GET_LOOKUP_VALUE_LABEL;

END PAC_LOOKUP;