******************************************************************** * Description.......: MapRefStr * Calling Samples...: * Parameter List....: tcOperationType * Created by........: Nadya Nosonovsky 04/02/2001 04:21:34 PM * Modified by.......: Nadya Nosonovsky 04/04/2001 11:34:54 AM ******************************************************************** lparameter tcOperationType local lcRetStr, lcJoinCondition, lcAdditions, lcWhere lcRetStr='space(1) as ModiType, '+ ; 'AssrID, Apn, ParcelID, '+ ; 'MapNum, WardNum, BlockNum, LotNum, UnitNum, MapData, MapRef, '+ ; '.f. as Posted, ctot([]) as PostTime, 0 as Error, ' if !empty(m.tcOperationType) and m.tcOperationType="MAPREF" lcAdditions='PropMstr.ccode, PropMstr.FY, PropMstr.town, '+; 'AssrMstr.ModiDate, [ASSRMSTR] as ModiTble, space(1) as APNed, '+ ; 'space(1) as Parsed, space(1) as PclIDEd' else lcAdditions='PropMstr.*, space(25) as NewMapref, space(1) as MapRefEd, '+ ; 'space(8) as ModiTble, "P" as Source, [ ] as Matched' endif lcJoinCondition = ' FROM PropMstr INNER JOIN ASSRMSTR ON PropMstr.PropID=AssrMstr.PropID' lcWhere=[ where Complevl='P' and PropMstr.town=']+ojc.Town + ; [']+iif(!empty(oJC.FY),[ and PropMstr.FY=']+oJC.FY+['],"")+" and InActvFl<>'A'" return m.lcRetStr+m.lcAdditions+m.lcJoinCondition+m.lcWhereAnd I put MaprefStr() in SelectCmd1Exp. Now the code does:
selectCMD1 = evaluate(SelectCMD1Exp), so this long string would be produced select &SelectCMD1 ; &SelectCMD2 ; &Into