พิมพ์ใบสั่งยาแล้วไม่ต้องการให้ชื่อผู้ป่วยปกปิด (ผู้ป่วยเอดส์) พิมพ์ออกมาด้วย

[Toptech สวนทองพันธุ์ไม้สุโขทัย]

พิมพ์ใบสั่งยาแล้วไม่ต้องการให้ชื่อผู้ป่วยปกปิด (ผู้ป่วยเอดส์) พิมพ์ออกมาด้วยต้องเซ็ทตรงไหนครับ
คือให้แสดงเฉพาะรายการยา ไม่ต้องให้แสดงชื่อ-สกุล ออกมาครับ
ขอความช่วยเหลือด้วยครับ

[เกื้อกูล ครับ..]

join  กับตาราง  โรคประจำตัว  หรือ  join  diag  ที่ไม่เท่ากับ  รหัส  icd ของกลุ่มโรคติดเชื้อ hiv  ก็น่าจะได้แล้วครับ...แต่คงต้องแสดง  hn  อยู่ดีครับ....โดยเลือก where  pdx or  dx0  or dx1  ordx2 ordx3<>'HIV?"

[James011]

    ใช้ Variable แทน Pipeline ชื่อผู้ป่วยแทนของเดิม   หลักการการเขียนเป็นแบบนี้

             if  DBPipeline['diag']='HIV'  then
                   begin
                     Value:='-';
                   end 
               else 
                 begin
                     Value:=DBPipeline['name'];
                 end;   


** HIV  คือ icd10 HIV           

[udomchok]

พิมพ์ใบสั่งยาแล้วไม่ต้องการให้ชื่อผู้ป่วยปกปิด (ผู้ป่วยเอดส์) พิมพ์ออกมาด้วยต้องเซ็ทตรงไหนครับ
คือให้แสดงเฉพาะรายการยา ไม่ต้องให้แสดงชื่อ-สกุล ออกมาครับ
ขอความช่วยเหลือด้วยครับ

ไปถึงที่..แต่ไม่เห็นเจอหน้าแบบนี้เลยครับ หรือว่าผมจำคุณ Toptech ไม่ได้ ....

join  กับตาราง  โรคประจำตัว  หรือ  join  diag  ที่ไม่เท่ากับ  รหัส  icd ของกลุ่มโรคติดเชื้อ hiv  ก็น่าจะได้แล้วครับ...แต่คงต้องแสดง  hn  อยู่ดีครับ....โดยเลือก where  pdx or  dx0  or dx1  ordx2 ordx3<>'HIV?"

ถ้าใช้แบบนี้ แปลว่าต้องลงทะเบียนผู้ป่วยเข้า clinic โรคเรื้อรังด้วย เหมือนกับผู้่ปวยเบาหวาน ความดันครับ

  ใช้ Variable แทน Pipeline ชื่อผู้ป่วยแทนของเดิม   หลักการการเขียนเป็นแบบนี้

             if  DBPipeline['diag']='HIV'  then
                   begin
                     Value:='-';
                   end 
               else 
                 begin
                     Value:=DBPipeline['name'];
                 end;   


** HIV  คือ icd10 HIV           

ส่วนอันนี้ก็เป็น idea ที่ดีครับ ก็ check ว่ามี ovstdiag.icd10 เป็น B20-B24 หรือไม่ ถ้ามีก็ "ปกปิด" ได้
icd10 ที่เกี่ยวข้องอาจมี Z ด้วย แต่ผมจำไม่ได้ว่า Z ตัวไหน

[Toptech สวนทองพันธุ์ไม้สุโขทัย]

ขอบคุณพี่ๆ ทุกท่านมากเลยครับ
ตอนแล้วนึกว่ามีฟังก์ชั่นให้เลือกใน Hosxp ครับ

[Toptech สวนทองพันธุ์ไม้สุโขทัย]

ถึง พี่ Udomchoke
        พอดีช่วงนั้น ผมไปฝึกปฏิบัติเรื่องการจัดการระบบฐานข้อมูลที่ กทม.ครับ
เลยไม่เจอพี่ แต่ทราบครับว่าพี่จะมาตรวจ อยากอยู่ดูว่าพี่ Udomchoke จาสวยเหมือนในรูปรึป่าวคับ
แฮะๆๆ

[udomchok]

ถึง พี่ Udomchoke
        พอดีช่วงนั้น ผมไปฝึกปฏิบัติเรื่องการจัดการระบบฐานข้อมูลที่ กทม.ครับ
เลยไม่เจอพี่ แต่ทราบครับว่าพี่จะมาตรวจ อยากอยู่ดูว่าพี่ Udomchoke จาสวยเหมือนในรูปรึป่าวคับ
แฮะๆๆ

ชื่อผมไม่มี e นะครับ 

[เข้ม]

ถึง พี่ Udomchoke
        พอดีช่วงนั้น ผมไปฝึกปฏิบัติเรื่องการจัดการระบบฐานข้อมูลที่ กทม.ครับ
เลยไม่เจอพี่ แต่ทราบครับว่าพี่จะมาตรวจ อยากอยู่ดูว่าพี่ Udomchoke จาสวยเหมือนในรูปรึป่าวคับ
แฮะๆๆ

สวยกว่าในรูป อีกครับ 

[เกื้อกูล ครับ..]

แล้วพี่อุดมโชคน่ะ มีขนที่ขาด้วยเปล่าเนี่ย...แบบว่าเห็นรูปแล้วนึกไม่ออกครับ

ถึง พี่ Udomchoke
        พอดีช่วงนั้น ผมไปฝึกปฏิบัติเรื่องการจัดการระบบฐานข้อมูลที่ กทม.ครับ
เลยไม่เจอพี่ แต่ทราบครับว่าพี่จะมาตรวจ อยากอยู่ดูว่าพี่ Udomchoke จาสวยเหมือนในรูปรึป่าวคับ
แฮะๆๆ

สวยกว่าในรูป อีกครับ 

[thannawe]

 

[Toptech สวนทองพันธุ์ไม้สุโขทัย]

  ใช้ Variable แทน Pipeline ชื่อผู้ป่วยแทนของเดิม   หลักการการเขียนเป็นแบบนี้

             if  DBPipeline['diag']='HIV'  then
                   begin
                     Value:='-';
                   end 
               else 
                 begin
                     Value:=DBPipeline['name'];
                 end;   


** HIV  คือ icd10 HIV           

ขอบคุณครับคุณเจมส์
                 ผมลองเอาไอเดียของคุณเจมส์ไปแก้ไขรีพอร์ทใบสั่งยาแล้ว ใช้ได้ครับ พิมพ์ออกมาแล้วถ้าเป็น vn ที่มีการ diag แล้วว่าอยู่ในกลุ่มโรค hiv ก็จะไม่แสดงชื่อออกมา
                 แต่ถ้าเป็นผู้ป่วย hiv ที่เคยมี diag เก่า แล้วเข้ามาใหม่วันนี้ ได้ vn ใหม่ ถ้าต้องการไม่ให้แสดงชื่อตั้งแต่พิมพ์ใบสั่งยาที่ห้องบัตรเลย จะใช้คำสั่งยังไงดีครับ

[atit]

แล้วพี่อุดมโชคน่ะ มีขนที่ขาด้วยเปล่าเนี่ย...แบบว่าเห็นรูปแล้วนึกไม่ออกครับ

ตอนที่เจอพี่แกใส่กางเกงขายาวเลยไม่ได้สังเกตุครับ แต่ที่แน่ๆ ขนอย่างอื่นเยอะครับ

[James011]

  ใช้ Variable แทน Pipeline ชื่อผู้ป่วยแทนของเดิม   หลักการการเขียนเป็นแบบนี้

             if  DBPipeline['diag']='HIV'  then
                   begin
                     Value:='-';
                   end 
               else 
                 begin
                     Value:=DBPipeline['name'];
                 end;   


** HIV  คือ icd10 HIV           

ขอบคุณครับคุณเจมส์
                 ผมลองเอาไอเดียของคุณเจมส์ไปแก้ไขรีพอร์ทใบสั่งยาแล้ว ใช้ได้ครับ พิมพ์ออกมาแล้วถ้าเป็น vn ที่มีการ diag แล้วว่าอยู่ในกลุ่มโรค hiv ก็จะไม่แสดงชื่อออกมา
                 แต่ถ้าเป็นผู้ป่วย hiv ที่เคยมี diag เก่า แล้วเข้ามาใหม่วันนี้ ได้ vn ใหม่ ถ้าต้องการไม่ให้แสดงชื่อตั้งแต่พิมพ์ใบสั่งยาที่ห้องบัตรเลย จะใช้คำสั่งยังไงดีครับ

 


HIV_Count:=GetSQLIntegerData('select count(icd10)as BB from ovstdiag
where icd10 in (select code from icd101 where name like "%hiv%")
and hn="'+DBPipelin['hn']+'"');

   if  HIV_Count > 0  then
                   begin
                     Value:='-';
                   end 
               else 
                 begin
                     Value:=DBPipeline['name'];
                 end;   

[atit]

แหม ท่านเจมนี่เป็นคนที่เข้าท่า(If = ถ้า,คำพ้องเสียง)เหมือนพี่โก้เลยนะครับ