Hi
I have code as below. It is working fine in English / Chinese RPC environment. However, I hit error "pa_rptaccs is not an array" if I switch OS to Thai. Any ideas?

Thank you

PRIVATE pa_rptaccs
	DIMENSION pa_rptaccs[1]
	STORE "" TO pa_rptaccs
	IF NOT EMPTY(userdbf.crptgrp)
		lcAlias = ALIAS()
		*** new added by Liew 10/12/2009 ***
		*USE shrmsrg IN 0
		IF NOT USED('shrmsrg')
			USE shrmsrg IN 0		
		ENDIF
		************************************
		SELECT shrmsrg
		LOCATE FOR ccode = userdbf.crptgrp
		IF FOUND() AND NOT EMPTY(mreport)
			RESTORE FROM MEMO shrmsrg.mreport ADDITIVE
		ENDIF
		USE IN shrmsrg
		SELECT (lcAlias) 
	ELSE
		IF NOT EMPTY(userdbf.mreport)
			RESTORE FROM MEMO userdbf.mreport ADDITIVE
		ENDIF
	ENDIF
	DIMENSION _SCREEN.oApp.areports[ALEN(pa_rptaccs)]       *** ERROR