Функции пользовательские

Плагины, приложения пользователей

Справочник пользователя БЭСТ v 1.3.1 (Бэта-версия)

Тестовая версия нового справочника. Для ознакомления и обсуждения. Содержит часть материала со старого справочника, добавлена справка по XBA, Harbour. Доступен поиск на русском языке.

Настройка модуля импорта файла формата 1С - opt1c01.prg

 // Настройка модуля импорта файла формата 1С

 FUNCTION mymain()
   LOCAL cSchet:=aPars[1]
   LOCAL l1,l2,l3,l4,l5,l6,l7,l8,l9,l10
   LOCAL resalias:=ALIAS()

Загрузка на весы

//Вот используя эту библиотеку, кстати OLE,
//http://www.atol.ru/products/software/dr/dr_ves_print/index.html

Select_Files

 FUNCTION SELECT_FILES( nT, nL, PATH, cMaska, F_Relat )
   /*
   Функция: select_files
   Назначение: Позволяет пользователю выбрать файлы из

RetData

 FUNCTION RetData(xVal, cVal, cFile, lName, cValCh, cFileCh, cOrderCh, cScopeCh)
   /*
   xVal  - значение для поиска в справочнике

SaveTipOper

 FUNCTION SaveTipOper(nnOperProv, nDoc, dDataOper, nVSumma_Doc,;
;//                       5             6             7           8
cSchetAnalit, lAnalitSchet, codeTipOper, typeTipOper,;

ReferGetReader

 /* Функция чтения для одиночного GET-объекта со справочников
 */

 FUNCTION ReferGetReader(GET,cRefer,lSpec,lReturnGet)

RecLock

 FUNCTION RECLOCK(lNoAvtor,lYesLock)
   FIELD USER_INFO
   LOCAL nSeconds:= 30,lRet:=.F., cUserInfo
   lNoAvtor:=!EMPTY(lNoAvtor)
   lYesLock := lYesLock == NIL

RBalans

 PROCEDURE RBalans()
   FIELD Valuta, Schet, Code, Os_Schet, Os_Anal, Kor_Schet, Kor_Anal
   MEMVAR aFileTmp, cBalansCode
   LOCAL aSet, aSetKeys,dSav_Date,lResolve := .F.

QInput

#IFNDEF PPARAMETERS

 FUNCTION QInput(;
   nTop,nLeft,nBottom,nRight,aHeads,;
   nAppp,aRef,aPict,aWhen,aValid,nUnique,bScrInit,bPost,cFltr0,lSpec,;
Ленты новостей