Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
Refs
&AtServerNoContext
Function Refs(MaxCount = 1000)
Refs = New Array;
For Each CatalogManager In Catalogs Do
Selection = CatalogManager.Select();
While Selection.Next() Do
Refs.Add(Selection.Ref);
If Refs.Count() = MaxCount Then
Break;
EndIf;
EndDo;
If Refs.Count() = MaxCount Then
Break;
EndIf;
EndDo;
Return Refs;
EndFunction // Refs()
@vkostyanetsky
Copy link
Author

vkostyanetsky commented May 16, 2020

Функция перебирает все имеющиеся в информационной базе справочники, пока не наберет нужное количество ссылок.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment