Hi, you could also use a SUM statement and make use of the automatic retain of variables created in that statement (plus initialization at zero, not missing).  The following makes use of the value of FIRST.STORE_ID ...   data temp; input store_id total_amount @@; datalines; 1 10 1 30 1 50 2 40 2 70 2 90 3 10 3 20 ;   data temp1;   set temp;   by store_id;   total + total_amount - (first.store_id * total); run;   data set TEMP1 ...                    total_ Obs    store_id    amount    total  1         1         10        10  2         1         30        40  3         1         50        90  4         2         40        40  5         2         70       110  6         2         90       200  7         3         10        10  8         3         20        30     Tips:Between and Within Group Counters http://www.sascommunity.org/wiki/Tips:Between_and_Within_Group_Counters ... View more

Hi.  In the second data step, you are giving the variable X a length of 4.  That means you would use a Z3. format ...   data want (keep=x name sex); length x $4.; set sashelp.class; x = catt('T',put(_n_,z3.)); run;   If you really want  to figure out whether the format should be Z2., Z3., etc., you could use (less overkill, but still overkill) ... data want (keep=x name sex); length x $4.; set sashelp.class nobs=obs; x = catt('T',putn(_n_,catt('Z',length(cat(obs)),'.'))); run; ... View more

Hi, is this what you mean (use a LENGTH statement) ...   data want (keep=x name sex); length x $4.; set sashelp.class; x = catt('T',_n_); run;   data set WANT ... Obs x Name Sex 1 T1 Alfred M 2 T2 Alice F 3 T3 Barbara F 4 T4 Carol F 5 T5 Henry M 6 T6 James M 7 T7 Jane F 8 T8 Janet F 9 T9 Jeffrey M 10 T10 John M 11 T11 Joyce F 12 T12 Judy F 13 T13 Louise F 14 T14 Mary F 15 T15 Philip M 16 T16 Robert M 17 T17 Ronald M 18 T18 Thomas M 19 T19 William M ... View more

Hi, if you mean that T1, T2, etc. are variable values, try this (creates 100 observations, value T1 through T100) ...   data want; length x $4.; do _n_=1 to 100;    x = catt('T',_n_);    output; end; run;   ps  CAT functions work fine with numeric variables.  The LOG (no nasty messages).  Also, always use a LENGTH statement when creating variables with CATT functions.  Otherwise you get the default length of 200.   133 data want; 134 length x $4.; 135 do _n_=1 to 100; 136 x = catt('T',_n_); 137 output; 138 end; 139 run; NOTE: The data set WORK.WANT has 100 observations and 1 variables. ... View more

Hi, you can also get a list of "bad" characters in an ERROR data set without resorting to PRX functions (for those of us who have never "gotten the hang of PRX") ... that smiley face in data set WANT is an HTML thing ...   * make variable X length 20 to increase the chance of 2+ bad characters; data have; length x $20; do i=1 to 20; x=' '; do j=1 to 20; y = ceil(100*ranuni(99)) + 32; x = catt(x,byte(y)); end; output; end; keep x; run;   data error (keep=rec pos character ascii) want(keep=x ok); set have; ok = length(x) eq length(compress(x,collate(128,255))); output want; rec=_n_; start=1; do j=1 to length(x);    pos = findc(x,collate(128,255),start);    if pos then do;       character=char(x,pos); ascii=rank(character); start+pos; output error;    end; end; run;   the ERROR data set ... Obs rec pos character ascii 1    1   6    €       128 2    1  17    ƒ       131 3    2  14    ƒ       131 4    4   2    „       132 5    8   8    €       128 6   10   4    €       128 7   10  12    „       132 8   11  17    „       132 9   18  10            129 10  19   4    ‚       130 11  19   8    €       128 12  19  13    ƒ       131 13  20   2    €       128   the WANT data set ... Obs       x            ok 1  @$[e8€l`}\,wQbkKƒ?fK 0 2  .w>L+brMdA+04ƒFKhn<a 0 3  Q8[U/?{K_yLt(Bzl{+Wy 1 4  h„9Zm0kZ7C_xb+RLpa_k 0 5  4C6Qs&M^#]q3$ypchlqC 1 6  4SrN>?Xspajvr|1_X}fT 1 7  {1|Q}DWQ0i~f]>Yjz7Gm 1 8  86K08O*€g1H/sE6ITbSi 0 9  +b_8J5I?=vO4~vtC3ZPw 1 10 MFr€-CuAeIh„D24xiM}i 0 11 n>n$/_a[|.1oK!78„sMx 0 12 S?m-{2]|&6'i$oI{3#T  1 13 X$4Cq#igu&'*eJIgqLw# 1 14 ]5ewe:ppE3't$}DsII0$ 1 15 U;N=cO*iy}xQ_%uICg^` 1 16 Vw.H\=Y?rI[]u^4g/M)O 1 17 M<pLy)%3wg\?bef`76"^ 1 18 +aJFURsNc_/|HMvDsL   0 19 t1q‚C@S€WCq7ƒK]ƒi3\" 0 20 T€S3sWm">P,!*k1NC08C 0 ... View more

Hi, just one added idea ... you could increment "i" in the loop rather than initializing and incrementing in separate statements ...   do i=1 by 1 until(missing(line));    input line &;    if i <= 5 then l{i} = line; end; ... View more

Hi, here's another idea.  First data step creates a data set with one variable that might contain one or more ASCII characters with a value of more than 127.  Next data step checks the length of the string to the length after removibg all characters ASCII value 128+.   data have; length x $10; do i=1 to 20; x=' '; do j=1 to 10;    y = ceil(100*ranuni(99)) + 32;    x = catt(x,byte(y)); end; output; end; keep x; run;   * check for characters with ASCII value 128+ ... OK = 1 means there are none; data want; set have; ok = length(x) eq length(compress(x,collate(128,255))); run;   data set WANT ... Obs        x         ok   1    @$[e8€l`}\     0   2    ,wQbkKƒ?fK     0   3    .w>L+brMdA     1   4    +04ƒFKhn<a     0   5    Q8[U/?{K_y     1   6    Lt(Bzl{+Wy     1   7    h„9Zm0kZ7C     0   8    _xb+RLpa_k     1   9    4C6Qs&M^#]     1  10    q3$ypchlqC     1  11    4SrN>?Xspa     1  12    jvr|1_X}fT     1  13    {1|Q}DWQ0i     1  14    ~f]>Yjz7Gm     1  15    86K08O*€g1     0  16    H/sE6ITbSi     1  17    +b_8J5I?=v     1  18    O4~vtC3ZPw     1  19    MFr€-CuAeI     0  20    h„D24xiM}i     0   If you want the data step to just stop when characters 128+ are encountered, you could just use ...   if length(x) ne length(compress(x,collate(128,255))) then stop;   If you are reading raw data rather than a data set, you could use ...   data want; infile 'z:\ascii.txt'; input; if length(_infile_) ne length(compress(_infile_,collate(128,255))) then stop; run;     ... View more

Hi, the SUM statement also ignores mising values.   data x; input student :$1. grade @@; datalines; A 50 B 60 C . D 33 ; data y; set x; grade + 10*(student in ('A' 'B' 'C')); run;   data set Y .. Obs student grade 1    A      60 2    B      70 3    C      10 4    D      33   ... View more