' print report on Active Jobs in the IBM i
     strComm = "SNDMSG MSG('Hello') TOUSR(QSYSOPR)"
     IF NOT LceExecute400(iSession, strComm)
              / return error /