//-----------------------------------------------------------------------------
// scr_Test
//-----------------------------------------------------------------------------
 
function Main()
{ 
AddRecordByWnd('wnd_AccountEdit');
}
 
function AddRecordByWnd(WindowName) {
do
{
var Attributes = GetNewDictionary();
Attributes('RecordID') = GUID_NULL;
 
var DefaultValues = GetNewDictionary();
var EditWindow = Services.GetNewItemByUSI(WindowName);
 
SetAttributesByDictionary(EditWindow, Attributes);
SetAttribute(EditWindow, 'DefaultValues', DefaultValues);
 
EditWindow.Prepare();          
var USI = EditWindow.ComponentsByName('dlData').Dataset.USI;
var count = checkCount(USI);
ModalResult = EditWindow.ShowModal(); 
}
while (checkCount(USI) == count)
if (ModalResult == wmrOK) {
return EditWindow.Attributes.Values('RecordID');
} else {
return null;
}
}
 
function checkCount(USI)
{
var Dataset = Services.GetNewItemByUSI(USI);
Dataset.Open();
var count = Dataset.RecordsCount;
Dataset.Close();
return count;	
}