????????最近遇到了這樣一個(gè)問題：有一個(gè)變量?jī)?nèi)容大概是這樣的 “4，2，6，4，1，7，5” 。里面是數(shù)字，然后用分隔符分開。需求是要讓變量里得數(shù)字按順序排列。最開始我在想有沒有什么函數(shù)或者例程，但是似乎并沒有。于是思路變成把這個(gè)變量拆成若干變量然后再用call sort進(jìn)行排序，最后再合并。
? ? ? ? 于是問題變成了，有沒有辦法可以把這個(gè)變量拆開。解決辦法當(dāng)然是現(xiàn)成得，就是通過循環(huán)+array解決。代碼如下：
array abc(100) _TEMPORARY_;
n=countw(VAR,',');
if n >100 then put 'Error: Checking Var!!';
do i=1 to n;
????abc(i)=scan(VAR,i,',');
end;
call sort(of abc(*));
VAR=catx(',',of abc(*));
call missing(of abc(*));
? ? ? ? 首先想到得是用array中的 _TEMPORARY_ ，它可以生成臨時(shí)的變量，這些變量沒有名字（沒指定嘛），只能通過數(shù)組名來確定。而且臨時(shí)變量是不會(huì)隨著PDV被清空的，換句話說這些臨時(shí)變量天生就是retain的。這也是為什么代碼最后要清空這些變量的原因。
? ? ? ? 但這個(gè)問題在于用array必須設(shè)定變量數(shù)量，所以只能用一個(gè)比較大的數(shù)——100來覆蓋。后面put語(yǔ)句也是為了防止錯(cuò)誤才用的。我希望能有個(gè)方法不必設(shè)定變量數(shù)也能達(dá)到同樣的效果，或者有其他更好的拆分變量的方法。
