CreateDoc ֆունկցիա
CreateDoc ֆունկցիա
Ստեղծում է Նշված տիպի նոր փաստաթղթի օբյեկտ։
Շարահյուսություն
Function CreateDoc(ByVal sDocType As String, _
Optional ByVal nParentISN As Variant = -1, _
Optional ByVal IncrementISN As Boolean = True) As AsDoc
Բաղադրիչներն են՝
Պարամետր | Նկարագրություն |
---|---|
sDocType | Փաստաթղթի ներքին անուն։ |
nParentISN | Ստեղծվող փաստաթղթի ծնող փաստաթղթի ISN։ Տրված չլինելու դեպքում փաստաթուղթը ստեղծվում է առանց ծնողի։ |
IncrementISN | ՀՆԱՑԱԾ։ Պետք չէ օգտագործել։ |
Նկատառումներ
Oրինակներ
Օրինակում կանչվում է CreateDoc ֆունկցիան, xDoc-ը հղվում է փաստաթուղթ տիպի օբյեկտի վրա, փաստաթղթի բոլոր ֆունկցիաներով և մեթոդներով։
Ստեղծվում է HTN92 տիպի փաստաթղթի նոր օրինակ։
Set mDoc = LoadDoc(CurrentView.Value("fISN"))
Set xDoc = CreateDoc("HTN92", mDoc.ISN)
xDoc("CATEGORY") = xMsgType
xDoc("BMDOCNUM") = nDoc.ISN
xDoc("REFERENC") = mDoc("BMDOCNUM")
xDoc("DATE") = mDoc("BMIODATE")
xDoc("TYPE") = xMsgType
xDoc.State = 0
xDoc.Show()