`TProcedureBody`
		FreeChildren
		ForEachCall

`TPasDeclarations`
		Create
		Destroy
		FreeChildren
		ElementTypeName
		ForEachCall

`TPasElement`
pt		ProcessHints
pt		SetParent
		Create
		Destroy
		IsKeyWord
		EscapeKeyWord
		FreeChild
		FreeChildList
		FreeChildArray
		FreeChildren
		ForEachCall
		ForEachChildCall
		SafeName
		FullPath
		ParentPath
		FullName
		PathName
		GetModule
		ElementTypeName
		HintsString
		GetDeclaration
		Accept
		ClearTypeReferences
		HasParent

`TPasElementBase`
pt		Accept