ของแพทย์ผมใช้คำสั่งแบบนี้ครับ
doctor_list := getpickuplist('select name from doctor '+
'where licenseno > "0" order by name ');
doctor := getsqlstringdata('select code from doctor where name = "'+doctor_list+'" ');
ส่วนของพยาบาลผมใช้
doctor_list := getpickuplist('select name from opduser '+
'where loginname in ("pah") order by loginname ');
doctor := getsqlstringdata('select loginname from opduser where name = "'+doctor_list+'" ');
ต้องไปเพิ่มที่ loginname in ("pah",".....") order by ......
ด้วยครับ