Tbrd Options

Основной класс настроек для подсистемы птицеводства. Используется для кеширования настроек и данных справочников.

class Tbrd_Options
 
' Группы ТМЦ из настроек
  public property get GoodGroupEggKey
  public property get GoodGroupBirdKey
  public property get GoodGroupWasteKey
 
' ТМЦ из настроек
  public property get GoodEggArray
  public property get GoodBirthWasteArray
 
 
' Возвращает массив ключей подразделений для переданного типа
  public function GetDeptArray(ByVal InDeptType)
 
' Возвращает строку с ключами всех подразделений входящих в переданный тип (в том числе и вложенных)
  public function GetFullDeptList(ByVal InDeptType)
 
' Возвращает ТМЦ-особь мужского пола по переданному виду животных
  public function GetMaleGoodKey(ByVal InAnimalKindKey)
' Возвращает ТМЦ-особь женского пола по переданному виду животных
  public function GetFemaleGoodKey(ByVal InAnimalKindKey)
' Возвращает ТМЦ-особь детеныш по переданному виду животных
  public function GetChildGoodKey(ByVal InAnimalKindKey)
 
' Возвращает строку с ключами всех ТМЦ птиц указанных в переданном виде животных
'  При передаче -1, будут возвращены все ТМЦ из всех видов животных
  public function GetBirdGoodList(ByVal InAnimalKindKey)
 
' Возвращает строку с ключами всех ТМЦ яиц указанных в настройках
  public function GetEggGoodList
 
' Возвращает строку с ключами всех ТМЦ отходов вывода указанных в настройках
  public function GetWasteGoodList
 
' Возвращает тип подразделения из справочника USR$BRD_DEPTTYPE, или -1 если тип не найден
  public function GetDeptGroupKey(ByVal InDeptKey)
 
 
' Проверка входимости подразделения в определенный тип подразделения
  public function TestDeptInGroup(ByVal InDeptType, ByVal InDeptKey)
 
' Проверка входимости ТМЦ в определенную группу ТМЦ
  public function TestGoodInGroup(ByVal InGroupKey, ByVal InGoodKey)
 
' Проверка является ли ТМЦ птицей, выбранной в одном из видов животных
  public function TestGoodIsBird(ByVal InGoodKey)
 
' Проверка является ли ТМЦ яйцом, выбранным в настройках
  public function TestGoodIsEgg(ByVal InGoodKey)
 
' Проверка является ли ТМЦ отходом производства, выбранным в настройках
  public function TestGoodIsWaste(ByVal InGoodKey)
 
 
' Вызывает форму редактирования настроек
  public function ShowOptions
 
' Обновление закешированных в памяти данных по типам подразделений
  public sub RefreshDeptInfo
 
' Обновление закешированных в памяти данных по ТМЦ
  public sub RefreshGoodInfo
 
end class