• Created by user-2c621, last updated on Jul 14, 2022 1 minute read

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 cmdPrintDepartment_Click()
    ' ask the host to print a list of the department's 
    ' employees 
    ' set department to print 
    iRet = LceSetFieldValue(iSession, "DEPTMENT", DeptKey(cmbDepartment.ListIndex))
    If iRet = LceTrue Then
        iRet = LceLansaCall(iSession, "PSLSYS", "EMPLIST", "", "DEPTMENT")
    End If
End Sub

  • No labels