*ДЛЯ ВЕДУЩЕГО GRID
	PROCEDURE grdcatex.Init
		THIS.ADDPROPERTY("OBNOW",.F.)
		THIS.ADDPROPERTY("MATC", 0 )
		THIS.SetAll("dynamicbackcolor","IIF(CATEX.CMAT=THIS.MATC, RGB(128,255,128), RGB(255,255,255))", "Column")
	ENDPROC


	PROCEDURE grdcatex.AfterRowColChange
		LPARAMETERS nColIndex
		THIS.MATC=CATEX.CMAT && ПАРАМЕТР ДЛЯ catxsk
		THIS.OBNOW=.F.
		THIS.REFRESH
		This.parent.grdCatxsk.OBNOW=.T.
		This.parent.grdCatxsk.REFRESH
	ENDPROC


*ДЛЯ ВЕДОМОГО GRIDA-CURSORADAPTER-catxsk.SELECTCMD=
SELECT MS.Cmat,MS.nmat,MS.prvs,EDS.iedi EIS  FROM  (SELECT *  FROM   LIDA.NSI_MAT WHERE id_mat_teh=?CATEX.CMAT)  MS  LEFT JOIN LIDA.NSI_SEI EDS  ON EDS.kedi      = MS.kedi


	PROCEDURE grdcatxsk.Init
		THIS.ADDPROPERTY("OBNOW",.T.)
	ENDPROC


	PROCEDURE grdcatxsk.Refresh
		IF THIS.OBNOW
			This.RecordSource=""
			ThisForm.DataENVIRONMENT.CATXSK.CURSORFILL()
			This.RecordSource="CATXSK"
		ELSE
			DODEFAULT()
		ENDIF
		THIS.OBNOW=.T.
	ENDPROC