retrieve="PBSELECT( VERSION(400) TABLE(NAME=~"quot_stockist~" ) COLUMN(NAME=~"quot_stockist.quot_no~") COLUMN(NAME=~"quot_stockist.line_no~") COLUMN(NAME=~"quot_stockist.cust_code~") COLUMN(NAME=~"quot_stockist.cust_code__stk~") COLUMN(NAME=~"quot_stockist.cust_code__dist~") COMPUTE(NAME=~"(select cust_name from customer where cust_code = quot_stockist.CUST_CODE__STK) as stockist_name~") COMPUTE(NAME=~"(select city from customer where cust_code = quot_stockist.CUST_CODE) as city_name~") COMPUTE(NAME=~"(select cust_name from customer where cust_code = quot_stockist.CUST_CODE__DIST) as distributor_name~") COMPUTE(NAME=~"(select SITE_CODE__PBUS from customer where cust_code = quot_stockist.CUST_CODE__DIST) as site_code~") COMPUTE(NAME=~"(select cust_name from customer where cust_code = quot_stockist.CUST_CODE) as hospital_name~")WHERE( EXP1 =~"quot_stockist.quot_no~" OP =~"=~" EXP2 =~":quot_no~" ) ) ARG(NAME = ~"quot_no~" TYPE = string) " update="quot_stockist" updatewhere=0 updatekeyinplace=no arguments=(("quot_no", string)) )