Розбіжності

Тут показані розбіжності між вибраною ревізією та поточною версією сторінки.

Посилання на цей список змін

Both sides previous revision Попередня ревізія
Наступна ревізія
Попередня ревізія
faq [2025/02/12 05:31]
admin
faq [2026/05/14 16:44] (поточний)
admin
Рядок 100: Рядок 100:
 | Копіюваня з збереженням регістру літер ? | <code visualfoxpro>​loFSO = CreateObject("​Scripting.FileSystemObject"​)  ​ | Копіюваня з збереженням регістру літер ? | <code visualfoxpro>​loFSO = CreateObject("​Scripting.FileSystemObject"​)  ​
 loFSO.CopyFile(lcFile,​ JustPath(lcFile)+'​\'​+Upper(JustStem(lcFile))+'​_'​+tran(lnMesKv)+lcFioDov+'​.xml'​) loFSO.CopyFile(lcFile,​ JustPath(lcFile)+'​\'​+Upper(JustStem(lcFile))+'​_'​+tran(lnMesKv)+lcFioDov+'​.xml'​)
 +</​code>​ |
 +| Додаємо рахунок в разі відсутності | <code visualfoxpro>​loAcc = Acc('​РРМ'​)
 +If Empty(loAcc)
 +   ​BProc.Mod._Util.AddAcc('​РРМ'​)
 +   loAcc = Acc('​РРМ'​)
 +   If Empty(loAcc)
 +      Return MessageBox('​Перед використанням документу,​ додайте в план рахунків рахунок "​РРМ"​.',​16,​The.MD.Descr)<​0
 +   EndIf
 +   ​BProc.Spr._PS.SETRULE(loAcc)
 +   ​WriteAttrSpr(loAcc,'​_SoftSC','​0001'​)
 +EndIf
 </​code>​ | </​code>​ |
 +
  

Налаштування сторінки