topic Re: Find Dlm Postion in SAS Programming

Find Dlm Postion

R_Win — Thu, 12 Apr 2012 13:02:26 GMT

I wnat to find the 7 th positon of delimter '?' as (i am having 120 delimiters in a line as i have given below as example) data a; input id$ 1-10; i=findc(id,'?'); do until i=32; cards; 1?2?3445??6?7?8?9?10 ; run;

Re: Find Dlm Postion

Haikuo — Thu, 12 Apr 2012 13:50:01 GMT

You probably need to use PRX;

data a;

input id$20.;

cards;

1?2?3445??6?7?8?9?10

; run;

data want (keep=position);

set a;

start=1;

if _n_=1 then

pattern=prxparse("/\?/");

do _n_=1 to 7;

call prxnext(pattern,start,-1,id,position,len);

end;

run;

proc print;run;

Haikuo

Re: Find Dlm Postion

Linlin — Thu, 12 Apr 2012 13:57:12 GMT

another approach:

options nocenter;

data a;

id="1?2?3445??6?7?8?9?10";

output;

id="???????";

output;

run;

data want(keep=id position);

set a;position=0;

start= 1;

do n=1 to 7;

i=findc(substr(id,start),'?');

position+i;

start+i;

end;

run;

proc print;run;

Obs id position

1 1?2?3445??6?7?8?9?10 16

2 ??????? 7

Message was edited by: Linlin

Re: Find Dlm Postion

R_Win — Thu, 12 Apr 2012 13:57:50 GMT

actually my DLM was '^' but when i changed it pattern=prxparse("/\^/"); iam getting warnings ERROR: Argument 1 to the function PRXNEXT must be a positive integer returned by PRXPARSE for a vali d pattern.

Re: Find Dlm Postion

Linlin — Thu, 12 Apr 2012 14:05:49 GMT

options nocenter;

data a;

id="1^2^3445^^6^7^8^9^10";

output;

id="^^^^^^^";

output;

run;

data want(keep=id position);

set a;position=0;

start= 1;

do n=1 to 7;

i=findc(substr(id,start),'^');

position+i;

start+i;

end;

run;

proc print;run;

Re: Find Dlm Postion

Haikuo — Thu, 12 Apr 2012 14:16:43 GMT

That is odd. it works for me:

data a;

input id$20.;

cards;

1^2^3445^^6^7^8^9^10

; run;

data want (keep=position);

set a;

start=1;

if _n_=1 then

pattern=prxparse("/\^/");

do _n_=1 to 7;

call prxnext(pattern,start,-1,id,position,len);

end;

run;

Obs position

1 16

What version of SAS you are using, on what platform?

Haikuo

Re: Find Dlm Postion

Haikuo — Thu, 12 Apr 2012 14:18:13 GMT

Very good, LinLin. Why I haven't thought about it.

Re: Find Dlm Postion

art297 — Thu, 12 Apr 2012 14:45:41 GMT

Here is another alternative:

data a;

informat id $30.;

input id;

CALL SCAN(id, 7, i, l,'?','M');

i=i+l;

cards;

1?2?3445??6?7??8??9?10?

;

Re: Find Dlm Postion

Haikuo — Thu, 12 Apr 2012 14:57:22 GMT

Liked. Art's solution makes PRX solution of mine looks like a chunky hamburger from Macdonald's.