🚀 go-pugleaf

Well, here's a functional script. It actually selects each graphic or text box that is bad until there are none left, but it works otherwise. I ended up using a more reliable method to find graphic boxes (ie, ones that are ovals or polygons or whatnot). That's all I have time to do for now. Best of luck!



tell application "Adobe InDesign CS2" 
	tell active document 
		--Make layer names 
		set graphLayerName to "GraphLayer" 
		set txtLayerName to "TxtLayer"

		--Retrieve bad text boxes  
		try 
			set txtOnGraphLayer to (every text frame whose name of item layer = graphLayerName) 
		on error 
			set txtOnGraphLayer to {} 
		end try

		--Retrieve bad graphics  
		try 
			set graphOnTxtLayer to (parent of every item of all graphics whose name of item layer of parent = txtLayerName) 
		on error 
			set graphOnTxtLayer to {} 
		end try

		--Count and display bad text boxes  
		if (count every item of txtOnGraphLayer) > 0 then 
			repeat with thisItem in txtOnGraphLayer 
				select thisItem 
				display dialog "Error: Selected text box appears to be on GraphLayer" buttons "Cancel" default button 1 
			end repeat 
		end if

		--Count and display bad graphic boxes  
		if (count every item of graphOnTxtLayer) > 0 then 
			repeat with thisItem in graphOnTxtLayer 
				select thisItem 
				display dialog "Error: Selected graphic appears to be on TxtLayer" buttons "Cancel" default button 1 
			end repeat 
		end if

		display dialog "No bad text or graphic layering found." buttons "Huzzah!" default button 1 
	end tell 
end tell