BMS-HOSxP Community

HOSxP => แจ้งปัญหา / ขอความช่วยเหลือ => ข้อความที่เริ่มโดย: arr_012 ที่ มิถุนายน 10, 2011, 15:15:26 PM

หัวข้อ: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: arr_012 ที่ มิถุนายน 10, 2011, 15:15:26 PM

อยากทำรายงานออกมาตัวหนึ่ง ซึ่งสามารถค้นหาผู้ป่วยเหมือนในโปรแกรม hosxp ครับ แต่ไม่รู้จะเริ่มอย่างไรครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: pop_hosxp ที่ มิถุนายน 10, 2011, 16:43:29 PM

เราสามารถใช้ function SearchOPDPatient หรือ SearchIPDPatient ได้ครับ ลองดูตัวอย่าง จากตัวที่ผมทดสอบเขียนไว้ก็ได้ครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: aphirat ที่ มิถุนายน 10, 2011, 18:54:22 PM

อ้างจาก: pop_hosxp ที่ มิถุนายน 10, 2011, 16:43:29 PM

เราสามารถใช้ function SearchOPDPatient หรือ SearchIPDPatient ได้ครับ ลองดูตัวอย่าง จากตัวที่ผมทดสอบเขียนไว้ก็ได้ครับ

ขอบคุณครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: arr_012 ที่ มิถุนายน 13, 2011, 09:01:52 AM

อ้างจาก: pop_hosxp ที่ มิถุนายน 10, 2011, 16:43:29 PM

เราสามารถใช้ function SearchOPDPatient หรือ SearchIPDPatient ได้ครับ ลองดูตัวอย่าง จากตัวที่ผมทดสอบเขียนไว้ก็ได้ครับ

ขอบคุณ ครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: arr_012 ที่ มิถุนายน 13, 2011, 09:14:48 AM

ถ้าเอาไปใช้กับ ตาราง person โดยใช้ cid เป็นเงื่อนใข เช่น
begin
    cid:=SearchOPDPatient;
    {showmessage(hn);}
   
  changereportsql('select concat(pname,fname," ",lname) as ptname from person where cid="'+cid+'"');
end;

จะได้ไหมครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: pop_hosxp ที่ มิถุนายน 13, 2011, 09:40:29 AM

อ้างจาก: arr_012 ที่ มิถุนายน 13, 2011, 09:14:48 AM

ถ้าเอาไปใช้กับ ตาราง person โดยใช้ cid เป็นเงื่อนใข เช่น
begin
    cid:=SearchOPDPatient;
    {showmessage(hn);}
   
  changereportsql('select concat(pname,fname," ",lname) as ptname from person where cid="'+cid+'"');
end;

จะได้ไหมครับ

function SearchOPDPatient จะรับค่าเป็น hn ครับ เพราะฉะนั้นต้องสร้างตัวแปรเพื่อหา CID อีกตัวหนึ่ง

โค๊ด: Delphi

1. var
2.    hn,cid:string;
3.  
4. begin
5.    hn:=SearchOPDPatient;
6.    cid:=GetSQLStringData('select cid from patient where hn="'+hn+'" ');
7.    showmessage(cid);
8. end;

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: arr_012 ที่ มิถุนายน 13, 2011, 09:49:57 AM

อ้างจาก: pop_hosxp ที่ มิถุนายน 13, 2011, 09:40:29 AM

อ้างจาก: arr_012 ที่ มิถุนายน 13, 2011, 09:14:48 AM

ถ้าเอาไปใช้กับ ตาราง person โดยใช้ cid เป็นเงื่อนใข เช่น
begin
    cid:=SearchOPDPatient;
    {showmessage(hn);}
   
  changereportsql('select concat(pname,fname," ",lname) as ptname from person where cid="'+cid+'"');
end;

จะได้ไหมครับ

function SearchOPDPatient จะรับค่าเป็น hn ครับ เพราะฉะนั้นต้องสร้างตัวแปรเพื่อหา CID อีกตัวหนึ่ง

var
   hn,cid:string;

begin
   hn:=SearchOPDPatient;
   cid:=GetSQLStringData('select cid from patient where hn="'+hn+'" ');
   showmessage(cid);
end;

งั้นแสดงว่า function SearchOPDPatient จะไม่สามารถใช้กับ ตาราง person ได้ใช่ไหมครับ คือผมจะเขียนรายงานให้ ส.อ โดยค้นหาชื่อ แบบนี้ อ่ะครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: pop_hosxp ที่ มิถุนายน 13, 2011, 10:06:24 AM

อ้างจาก: arr_012 ที่ มิถุนายน 13, 2011, 09:49:57 AM

งั้นแสดงว่า function SearchOPDPatient จะไม่สามารถใช้กับ ตาราง person ได้ใช่ไหมครับ คือผมจะเขียนรายงานให้ ส.อ โดยค้นหาชื่อ แบบนี้ อ่ะครับ

ได้สิครับ เอา HN ที่ได้ไปหาจากตาราง person ได้ จากคำสั่ง

select cid from person where patient_hn="'+hn+'" ครับ แต่ต้องทำ patient link ไว้ให้หมดทุกคนนะครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: pijit_w ที่ มิถุนายน 13, 2011, 10:17:06 AM

ขอบคุณมากๆ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: arr_012 ที่ มิถุนายน 13, 2011, 10:30:09 AM

อ้างจาก: pop_hosxp ที่ มิถุนายน 13, 2011, 10:06:24 AM

อ้างจาก: arr_012 ที่ มิถุนายน 13, 2011, 09:49:57 AM

งั้นแสดงว่า function SearchOPDPatient จะไม่สามารถใช้กับ ตาราง person ได้ใช่ไหมครับ คือผมจะเขียนรายงานให้ ส.อ โดยค้นหาชื่อ แบบนี้ อ่ะครับ

ได้สิครับ เอา HN ที่ได้ไปหาจากตาราง person ได้ จากคำสั่ง

select cid from person where patient_hn="'+hn+'" ครับ แต่ต้องทำ patient link ไว้ให้หมดทุกคนนะครับ

เข้าใจแล้วครับ  ขอบคุณครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: arr_012 ที่ มิถุนายน 13, 2011, 10:42:29 AM

พอ Preview แล้ว มันเป็นแบบนี้อ่ะครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: pop_hosxp ที่ มิถุนายน 13, 2011, 10:44:45 AM

อ้างจาก: arr_012 ที่ มิถุนายน 13, 2011, 10:42:29 AM

พอ Preview แล้ว มันเป็นแบบนี้อ่ะครับ

เปิดโปรแกรม HOSxP ด้วยครับ

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: arr_012 ที่ มิถุนายน 13, 2011, 10:46:08 AM

อ้างจาก: pop_hosxp ที่ มิถุนายน 13, 2011, 10:44:45 AM

อ้างจาก: arr_012 ที่ มิถุนายน 13, 2011, 10:42:29 AM

พอ Preview แล้ว มันเป็นแบบนี้อ่ะครับ

เปิดโปรแกรม HOSxP ด้วยครับ

เปิด แล้วครับ  ก็เป็น

หัวข้อ: Re: อยากได้คำสั่งค้นหา คนไข้ครับ
เริ่มหัวข้อโดย: arr_012 ที่ มิถุนายน 13, 2011, 10:49:12 AM

อ้างจาก: arr_012 ที่ มิถุนายน 13, 2011, 10:46:08 AM

อ้างจาก: pop_hosxp ที่ มิถุนายน 13, 2011, 10:44:45 AM

อ้างจาก: arr_012 ที่ มิถุนายน 13, 2011, 10:42:29 AM

พอ Preview แล้ว มันเป็นแบบนี้อ่ะครับ

เปิดโปรแกรม HOSxP ด้วยครับ

เปิด แล้วครับ  ก็เป็น

หายแล้วครับ  ต้องเริ่ม ReportBuilder ใหม่ พร้อมกับเปิดโปรแกรม hosxp ด้วยครับ