AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

EDMI: Checkin/out

Browse Source
This commit is contained in:
Jonathan Jenne
2022-03-29 16:35:24 +02:00
parent abff7fa745
commit 809b4dafc3
14 changed files with 315 additions and 204 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Service.EDMIService/Methods/IDB/CheckInOutFile/CheckInOutFileMethod.vb
View File

@@ -101,7 +101,9 @@ Namespace Methods.IDB.CheckInOutFile
VALUES ({pObjectId}, GETDATE(), '{pComment}', '{pUsername}')"
If DatabaseIDB.ExecuteNonQuery(oSQL) = True Then
Helpers.SetObjectState(pObjectId, FileStore.OBJECT_STATE_FILE_CHECKED_OUT, pUsername)
Logger.Info("File [{0}] checked out successfully!", pObjectId)
Return CheckOutResult.CheckoutSuccessful
Else
Logger.Warn("File [{0}] could not be checked out because of an internal error!", pObjectId)
@@ -134,7 +136,9 @@ Namespace Methods.IDB.CheckInOutFile
WHERE IDB_OBJ_ID = {pObjectId} AND ADDED_WHO = '{pUsername}' AND CHECKED_IN_WHEN IS NULL"
If DatabaseIDB.ExecuteNonQuery(oSQL) = True Then
Helpers.SetObjectState(pObjectId, FileStore.OBJECT_STATE_FILE_CHECKED_IN, pUsername)
Logger.Info("File [{0}] checked in successfully!", pObjectId)
Return CheckInResult.CheckinSuccessful
Else
Logger.Warn("File [{0}] could not be checked in because of an internal error!", pObjectId)