You are viewing an old version of this page. View the current version.

Compare with Current View Page History

« Previous Version 2 Current »

Private Sub cmdPrintAll_Click()
    ' set department to blank to print all departments
    iRet = LceSetFieldValue(iSession, "DEPTMENT", Chr(0)) 
    If iRet = LceTrue Then
       iRet = LceSubmit(iSession, "PSLSYS", "EMPLIST", "", _
        "DEPTMENT", "", "", "", "")
    End If
End Sub

  • No labels