อยากได้อยู่ใน system setting version ถัดไปก็ได้ครับ
เราสามารถเขียน sys_vn_pre_script ได้ครับ คล้าย ๆ กับการแจ้งเตือน GFR ครับ
ลองแทรกใน sys_vn_pre_script ดูครับ อย่าลืมแก้ depcode ให้เป็นห้องจ่ายยาด้วยครับโค๊ด: Delphi
var fvn,fdepartment,fhn : string; begin fvn:= GetGlobalValue('VN'); fdepartment := GetGlobalValue('CURRENT_DEPCODE'); fhn:=getsqldata('select hn from ovst where vn = "'+fvn+'"'); if getsqldata('select depcode from kskdepartment where depcode in ("008","028") and depcode="'+fdepartment+'"')=''+fdepartment+'' then if getsqldata('select count(*) from rcpt_arrea '+ ' where hn="'+fhn+'" '+ ' and paid="N" ')>0 then showmessage('มียอดค้างชำระ'); end;