/// Этот XML блок описывает содержимое этой страницы.
XData Contents [ XMLNamespace = "http://www.intersystems.com/zen" ]
{
<page xmlns="http://www.intersystems.com/zen" title="">
<dynaGrid id="myGrid" OnCreateDataSet="CreateDS">
</dynaGrid>
</page>
}

Method CreateDS(
	pGrid As %ZEN.Component.dynaGrid,
	pDataSet As %ZEN.Auxiliary.dataSet) As %Status
{
  set rows= 100 
  set cols= 10 
  set pages= 3 

  do pDataSet.%SetDimensions( 3 )	
	
  for i= 1 : 1 :rows {
    Do pDataSet.%SetLabel(i,i, 1 )
  }
  for i= 1 : 1 :cols {
    Do pDataSet.%SetLabel(i,i, 2 )
  }
  for i= 1 : 1 :pages {
    Do pDataSet.%SetLabel(i,i, 3 )
  }
	
  For d= 1 : 1 :pages {
    For r= 1 : 1 :rows {
      For c= 1 : 1 :cols {
        s array(r,c,d)=r+c+d
      }
    }
  }
  
  d pDataSet.%SetArray(.array,rows,cols,pages)
  Quit $$$OK
}