SAVELOG "================== start test f or l oop ================"


	If HaveKok = "" Then
	
	Else
		SAVELOG " NO KOK NO COMMIT "
	EndIf 


	

	For idx_test < 10 Loop
		DEBUGVAR idx_test
		Var idx_test = idx_test + 1
		If idx_test = 5 Then
			SAVELOG "================ test fo r lo op depth 1 with i f"
		Else
			SAVELOG "Hurr Hurr Hurr Hurr"
			
		EndIf

		Var TestroopArray[idx_test] = idx_test + 10

		Var idx2 = 0
		For idx2 < 30 Loop
			Var idx2 = idx2 + 1
			DEBUGVAR idx2
			If idx2  <  15 Then
				SAVELOG "###### TTTTTT ######"
			Else
				SAVELOG "++++++ TTTTTT ++++++"
			EndIf
		EndFor

		
	EndFor

	Var idx = 0
	For idx < 10 Loop
		Var idx = idx + 1
		DEBUGVAR TestroopArray[idx]

		
	EndFor
	SAVELOG "================== end test f or l oop ================"