Installing sis file programmatically

RFile rFile;
RApaLsSession lsSession;
User::LeaveIfError(lsSession.Connect());
CleanupClosePushL(lsSession);
TThreadId threadId;

_LIT(KMyCertFile, "c:\\data\\app.sis");

if(BaflUtils::FileExists(CEikonEnv::Static()->FsSession(), KMyCertFile))
  {
  User::LeaveIfError(rFile.Open(CEikonEnv::Static()->FsSession(), KMyCertFile, EFileRead)); 
  }

lsSession.StartDocument(rFile, threadId, NULL);
lsSession.ClearFsSession();
lsSession.Close();