BMS-HOSxP Community
HOSxP => Report Exchange => ข้อความที่เริ่มโดย: k_toedkiets ที่ กันยายน 02, 2011, 15:05:30 PM
-
คือว่าทำไมตอนสรุปว่า ผ่าน หรือ ไม่ผ่าน ถึงไม่ตรงกับความเป็นจริงครับ (บางคนครับ) เวลาที่เก็บรายงานคือ 1 ชั่วโมง 30 นาที ครับ
เช่น เวลาเริ่มต้นให้บริการ เวลาสิ้นสุด ระยะเวลาให้บริการจริง ผลเปรียบเทียบกับระยะเวลามาตรฐาน
14.26.04 14.39.58 0.13.54 ผ่าน
13.21.54 13.57.38 0.35.44 ผ่าน
9.18.33 12.02.57 2.44.24 ไม่ผ่าน (ถูกต้อง)
10.29.07 12.09.09 1.40.02 ผ่าน (ไม่ถูกต้อง...ที่จริงต้องไม่ผ่าน)
แก้คำสั่งให้หน่อยครับ และถ้าครั้งต่อไปผมจะลดเวลาที่เก็บรายงาน คือ 1 ชั่วโมง 20 นาที ต้องแก้ตรงไหนครับ
-
ขอฟอร์มนี้หน่อยครับจะลองไปศึกษาดู
-
คือว่าทำไมตอนสรุปว่า ผ่าน หรือ ไม่ผ่าน ถึงไม่ตรงกับความเป็นจริงครับ (บางคนครับ) เวลาที่เก็บรายงานคือ 1 ชั่วโมง 30 นาที ครับ
เช่น เวลาเริ่มต้นให้บริการ เวลาสิ้นสุด ระยะเวลาให้บริการจริง ผลเปรียบเทียบกับระยะเวลามาตรฐาน
14.26.04 14.39.58 0.13.54 ผ่าน
13.21.54 13.57.38 0.35.44 ผ่าน
9.18.33 12.02.57 2.44.24 ไม่ผ่าน (ถูกต้อง)
10.29.07 12.09.09 1.40.02 ผ่าน (ไม่ถูกต้อง...ที่จริงต้องไม่ผ่าน)
แก้คำสั่งให้หน่อยครับ และถ้าครั้งต่อไปผมจะลดเวลาที่เก็บรายงาน คือ 1 ชั่วโมง 20 นาที ต้องแก้ตรงไหนครับ
จัดฟอร์มมาด่วนนนน...!!!! เลยครับพี่น้อง
-
จัดให้แล้วครับ
-
คือว่าทำไมตอนสรุปว่า ผ่าน หรือ ไม่ผ่าน ถึงไม่ตรงกับความเป็นจริงครับ (บางคนครับ) เวลาที่เก็บรายงานคือ 1 ชั่วโมง 30 นาที ครับ
แก้คำสั่งให้หน่อยครับ และถ้าครั้งต่อไปผมจะลดเวลาที่เก็บรายงาน คือ 1 ชั่วโมง 20 นาที ต้องแก้ตรงไหนครับ
procedure GlobalOnCreate;
begin
stime:='02:30:00';แก้เป็น stime:='01:30:00'
GetDateRangeDialog(date1, date2);
ds1:=formatdatetime('yyyy-mm-dd',date1);
ds2:=formatdatetime('yyyy-mm-dd',date2);
s_main_dep:= GetPickupList('select department from kskdepartment');
main_dep:= GetSQLStringData('select depcode from kskdepartment where department="'+s_main_dep+'" ');
ChangeReportSQL('select o.hn,p.pname,p.fname,p.lname,vs.age_y,k.department,p.moopart,p.tmbpart,op.bpd,op.bps,s.*,spclty.spclty,spclty.name as spclty_name,'+
' sec_to_time(time_to_sec(s.service6)-time_to_sec(o.vsttime)) as totaltime1 '+
' from ovst o '+
' left outer join patient p on p.hn = o.hn '+
' left outer join opdscreen op on op.vn = o.vn '+
' left outer join vn_stat vs on vs.vn = o.vn '+
' left outer join service_time s on s.vn =o.vn '+
{' left outer join kskdepartment k on k.depcode = o.cur_dep '+ }
' left outer join kskdepartment k on k.depcode = o.main_dep '+
' left outer join spclty on spclty.spclty = o.spclty '+
' where o.vstdate between "'+ds1+'" and "'+ds2+'" '+
' and o.main_dep="'+main_dep+'" and s.service6 is not null');
end;
และถ้าครั้งต่อไปผมจะลดเวลาที่เก็บรายงาน คือ 1 ชั่วโมง 20 นาที ต้องแก้ตรงไหนครับ
แก้เป็น stime:='01:20:00'