Crop Region of Elevation cannot update

I have created a python script in Dynamo to create elevation and resize the crop region. The crop region is updated but I can see nothing in the extended area.How can I show the element disappeared?

I use SetCropRegionShape to do the job. Part of my script as below:

	eleMarker = ElevationMarker.CreateElevationMarker(doc, viewType.Id, elevationPT, scale)
	ele = eleMarker.CreateElevation(doc, doc.ActiveView.Id , 0)
	ele1 = eleMarker.CreateElevation(doc, doc.ActiveView.Id , 1)
	ele2 = eleMarker.CreateElevation(doc, doc.ActiveView.Id , 2)
	ele3 = eleMarker.CreateElevation(doc, doc.ActiveView.Id , 3)
	
	crManager = ele.GetCropRegionShapeManager()
	crManager2 = ele2.GetCropRegionShapeManager()
	newCurveLoop = []
	newCurveLoop.Add(l1)
	newCurveLoop.Add(l2)
	newCurveLoop.Add(l3)
	newCurveLoop.Add(l4)
	
	crManager1 = ele1.GetCropRegionShapeManager()
	crManager3 = ele3.GetCropRegionShapeManager()
	newCurveLoop2 = []
	newCurveLoop2.Add(l5)
	newCurveLoop2.Add(l6)
	newCurveLoop2.Add(l7)
	newCurveLoop2.Add(l8)
		
	cLoop = CurveLoop.Create(newCurveLoop)
	cLoop2 = CurveLoop.Create(newCurveLoop2)
	
	ele.CropBoxActive = True
	
	try:			
		crManager.SetCropRegionShape(cLoop)
		crManager1.SetCropRegionShape(cLoop2)
		crManager2.SetCropRegionShape(cLoop)
		crManager3.SetCropRegionShape(cLoop2)
		
		lst.append("Elevation Created")
		viewlist = []
		viewlist.Add(ele)
		viewlist.Add(ele1)
		viewlist.Add(ele2)
		viewlist.Add(ele3)
		lst2.append(viewlist)
	
	except:
		pass
		lst.append("Missed Elevation")
		lst2.append("Null")