|
Joined: 15 Jun 2009
Posts: 7
|
Dear all,
I would like to write a macro of an IF-construct with multiple lines (see below). How may I acomplish that task?
Thanks
Christof
"# Example #"
FOR i = 1...NOTRAITS
REML [PRINT=*; PSE=alldifferences;\
FMETHOD=automatic;METHOD=AI; MAXCYCLE=20] SUBY; EXIT = remlex
IF remlex > 0
TXCONSTRUCT [TEXT = reml_error; SEPARATOR = '']\
'REML 1 not converged for: ',TraitName$[i], '; Error code: ', remlex
PRINT [IPRINT=*;SQUASH=yes]reml_error; SKIP = 0
APPEND[NEWVECTOR=failed_traits] OLDVECTOR failed_traits, TraitName$[i]
EXIT [CONTROL = for; REPEAT = yes]
ENDIF
ENDFOR |
|
|