Розбіжності
Тут показані розбіжності між вибраною ревізією та поточною версією сторінки.
| Both sides previous revision Попередня ревізія Наступна ревізія | Попередня ревізія | ||
|
smartfox:class:ispr-44 [2023/02/22 06:26] admin |
smartfox:class:ispr-44 [2025/11/18 05:20] (поточний) admin |
||
|---|---|---|---|
| Рядок 12: | Рядок 12: | ||
| EndIf | EndIf | ||
| </code> | | </code> | | ||
| + | ^ Fresh() | | | Примусово оновлює зміст окна довідника<code visualfoxpro>The.Fresh() | ||
| + | =Iif(Seek(loDoc.Header.ID.Value, The.MD.Alias , 'ID'), MessageBox('Успішно додано !',64,lcCaption), 0)</code> | | ||
| ^ OnExit() | | | Викликає та повертає значення функції заданої в конфігураторі в події **OnExit**. Якщо в конфігураторі ця подія не перекривалась - метод повертає **True** | | ^ OnExit() | | | Викликає та повертає значення функції заданої в конфігураторі в події **OnExit**. Якщо в конфігураторі ця подія не перекривалась - метод повертає **True** | | ||
| ^ OnDel() | | | Викликає та повертає значення функції заданої в конфігураторі в події **OnDel**. Якщо в конфігураторі ця подія не перекривалась - метод повертає **True**. Тобто для заборони видалення досить повернути **False**. В відповідній події конфігуратора існує властивість **DelFlag**, яка дозволяє виконати код до видалення (**DelFlag=0**), або після (**DelFlag=1**).<code visualfoxpro> | ^ OnDel() | | | Викликає та повертає значення функції заданої в конфігураторі в події **OnDel**. Якщо в конфігураторі ця подія не перекривалась - метод повертає **True**. Тобто для заборони видалення досить повернути **False**. В відповідній події конфігуратора існує властивість **DelFlag**, яка дозволяє виконати код до видалення (**DelFlag=0**), або після (**DelFlag=1**).<code visualfoxpro> | ||
| Рядок 23: | Рядок 25: | ||
| Select (lcCrsDoc) | Select (lcCrsDoc) | ||
| Locate For ID # Spr._Zob.Gui | Locate For ID # Spr._Zob.Gui | ||
| - | If Found() | + | If Found() && Return .F. - Заборона подальших штатних дій |
| Return MessageBox('На документ існують посилання. Видалення не можливе.',16,'Видалення')<0 | Return MessageBox('На документ існують посилання. Видалення не можливе.',16,'Видалення')<0 | ||
| - | EndIf | + | EndIf |
| + | If The.MD.HF.IsDel=0 And MessageBox('Видалити документ ?',1+32,'Запит')=1 | ||
| + | *---Удаляем Зобов'язання | ||
| + | Select (lcCrsDoc) | ||
| + | Scan For Seek(ID,'_Zob','ID') | ||
| + | Delete In _Zob | ||
| + | EndScan | ||
| + | *---Видаляем документ самостійно | ||
| + | SysLog.Fix('Doc','Del',lcDocID, DocShort(lcDocID),,The.MD.HF.Date) | ||
| + | The.MD.Delete(lcDocID,1) | ||
| + | EndIf | ||
| + | Return .F. && Заборона подальших штатних дій | ||
| EndCase | EndCase | ||
| </code> | | </code> | | ||
| Рядок 46: | Рядок 59: | ||
| ^ MD | [[smartfox:class:tspr-51|TSpr]] | | Посилання на об'єкт метаданих який відображає інтерфейс | | ^ MD | [[smartfox:class:tspr-51|TSpr]] | | Посилання на об'єкт метаданих який відображає інтерфейс | | ||
| ^ ReadOnly | L | | **True** переключає довідник в режим **Тільки читання** (можливість додавання та редагування буде відключена). Використовується, як правило в методі **OnLoad()**. | | ^ ReadOnly | L | | **True** переключає довідник в режим **Тільки читання** (можливість додавання та редагування буде відключена). Використовується, як правило в методі **OnLoad()**. | | ||
| + | |||
Налаштування сторінки
smartfox/class/ispr-44.1677040009.txt.gz · В останнє змінено: 2023/02/22 06:26 by admin
Якщо не вказано інше, вміст цієї Вікі підпадає під дію такої ліцензії: CC Attribution-Share Alike 4.0 International