You're right - all of you, the easy fix to make the queries faster is to put "Value" and "Qty" into the same select statement. However, please focus on how to run queries in parallel rather than why 😉 - it's only an example. I am pretty sure that SAS can do that, and I could like to check how much faster this approach would be - but I really could use some syntax help in this. ... View more

You're right, this could lead to an improvement, but I was thinking of some kind of multi-threading. The trouble is, that my programs don't work out yet (and I would prefer to stick with proc sql when accessing the SQL-server). ... View more

I only thought that if optnet is the successor of netflow, the example on the webpage would be an optnet and not an optmodel version. Because this would mean optmodel is better in some way (and it probably is a bit more flexible). ... View more

And, final question, is there a reason why the netflow version was migrated to optmodel and not to optnet? ... View more

Assuming that the "1" in "1. Listen to music" sufficiently defines Music=1, etc.: Data Have;   Infile Datalines DSD;   Input Text :$200.;   Datalines4; 1. Listen to music; 3. Read novels; 6. Hang-out with friends 2. Watch movies; 3. Read novels; 4. Play games ;;;;; Data Want (Drop=Text i);   Set Have;   ID=Put(_N_,Z2.);   Array Dummy_Vars Music Movie Novel Game Work Friend;   Do i=1 To Dim(Dummy_Vars);     Dummy_Vars=IfN(Find(Text,Put(i,1.)),1,0);   End; Run; ... View more

Data Have;   Infile Datalines Delimiter='09'x;   Input (Parent1-Parent15) (:Best8.);   Datalines; 132 546 3543 23435 2432 46345 3426 548 112 4356 5478 23435 325 325 345 2343 665 132 116 23435 232 132 667 3543 3453 5447654 3324 3543 256 132 435 132 1212 3543 116 456 7987 134 1214 132 547567 3543 435 324 23435 787 980 2324 99 325 565 4352 982 7879 2356 4367 244 3456 214 346 ; Run; Data Want (Drop=i);   Set Have;   Array P{*} P:;   Do i=1 To Dim(P)-2;     O_Code=Max(O_Code,IfN(P{i}=132 & P{i+2}=3543,1,0),0);   End; Run; ... View more

Thanks! I tried it out with a little example and the create-data-for-suffix-step was exactly what I was looking for. Data Costs;   Do Source=1 To 10;     Do Plant=1 To 20;    Costs=Rannor(1)*4+19;       Output;     End;   End; Run; Data Demand;   Do Plant=1 To 20;     Qty=Rannor(1)*20+200; Output;   End; Run; Data Supply;   Do Source=1 To 10;     Qty=Rannor(1)*15+375;     Output;   End; Run; Proc Optmodel;   Set <Num,Num> q_w;   Num Costs{q_w};   Read Data Costs Into q_w=[Source Plant] Costs=Costs;   Set Sources=Setof{<q,w> in q_w} q;   Set Plants=Setof{<q,w> in q_w} w;   Num Demand{Plants};   Num Supply{Sources};   Read Data Demand Into [Plants=Plant] Demand=Qty;   Read Data Supply Into [Sources=Source] Supply=Qty;   Var X{Sources,Plants}>=0;   Con Cns1{q in Sources}:Sum{w in Plants}X[q,w]<=Supply ;   Con Cns2{w in Plants}:Sum{q in Sources}X[q,w]>=Demand ;   Min Obj=Sum{q in Sources,w in Plants}X[q,w]*Costs[q,w];   Solve with LP/Solver=Dual /*Algorithm=Network*/ IIS=On;   create data var_status_data from [Source Plant] name=X.name status=X.status;   create data con_status_data from [Plant] name=Cns1.name status=Cns1.status;   Create Data Con_Status_data_2 From [Source] name=Cns2.name status=Cns2.status;   Run; ... View more

Thanks. I couldn't have done the iterator without help. And (delayed) thanks Xia Keshan for "hash aggregating strings"! ... View more