Allow CHECK keyword in begin of routines

[alezhu]

Resolve #1095

[larshp]

git keeps the history

you can choose to contribute under the license terms, I dont want to add multiple license parts

[alezhu]

Excuse me, but I do not understand. Do you mean that I should remove those 3 lines?

[pcf0]

This test is certainly very subjective.
In my opinion, CHECK should not be allowed after the marked commands.

The exception states that CHECK may only check the precondition of the procedure. But these commands already "do" something and are not preconditions?

[pcf0]

Suggested change

	WHEN 'CLEAR'
	OR 'FREE'
	OR 'REFRESH'.

[alezhu]

We usually clear the exporting parameters anyway and then check the importing parameters .

[pcf0]

Suggested change

	WHEN 'DESCRIBE'
	OR 'GET'
	OR 'INCLUDE'
	OR 'ASSIGN'.

[alezhu]

'DESCRIBE' - for describe lines or get field type and then check it
'GET' - for GET PARAMETER for example and then check it
'ASSIGN' - for assign importing parameter of generic type and cast them to concret type or dereference ref and then check assigned structure field or check assigned table lines or some thing
'INCLUDE' - sometimes common checks in common include

[ConjuringCoffee]

I agree with pcf0: In my opinion this goes against the spirit of only allowing CHECK at the start of routines. If you need to do things before you CHECK, then it's not the start of the routine anymore.