รบกวนช่วยดู Scripts ด้วยครับ

[yokyai]

  i1:=getsqlstringdata('select icd10 from ovstdiag '+
  ' where vn="'+DBPipeline['vn']+'" '+
  ' and icd10 in ("b200","b201","b202","b203","b204","b205","b206","b207","b208","b209" '+
  ' ,"b21","b210","b211","b212","b213","b217","b218","b219" '+
  ' ,"b22","b221","b222","b227","b213","b23","b230","b231","b233","b238","b24")');

  if Value=i1 then
  Value:='---'
  else
  Value:=DBPipeline['diagnosis_name'];
  end;

ถ้าเป็นรหัสทีกำหนดไม่ให้แสดงชื่อ แต่ถ้ารหัสอื่นๆนอกเหนือจากนี้ให้แสดงชื่อตามปกติครับ ลองมาหลายแบบแล้วครับ เลยย้อนกลับมาแบบ basic สุดๆ ก็ยังไม่ได้อีกครับ ขอบคุณครับ

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

 i1:=getsqlstringdata('select icd10 from ovstdiag '+
  ' where vn="'+DBPipeline['vn']+'" '+
  ' and icd10 like "B2%"');

  if Value=i1 then
  Value:='---'
  else
  Value:=DBPipeline['diagnosis_name'];
  end;


ได้ไหมครับ

[yokyai]

  Value:=DBPipeline['pdx'];

  if Value='B24' then
  begin
  Value:='---'
  end else
  Value:=DBPipeline['diagnosis_name'];
  end;
 แบบนี้ได้ครับ สงสัย ต้องใส่ว่า or ..... or ..... หรือเปล่าครับ

[yokyai]

i1:=getsqlstringdata('select icd10 from ovstdiag '+
  ' where vn="'+DBPipeline['vn']+'" '+
  ' and icd10 like "B2%"');

  if Value=i1 then
  Value:='---'
  else
  Value:=DBPipeline['diagnosis_name'];
  end;


ได้ไหมครับ

จะทดลองดูครับ แต่ B2% ทั้งหมดไม่ได้เป็น HIV ครับผม

[yokyai]

  Value:=DBPipeline['pdx'];
  if (Value='B24') or (Value='B238') or (Value='B237') or (Value='B233') then
  begin
  Value:='---'
  end else
  Value:=DBPipeline['diagnosis_name'];
  end;

[yokyai]

  Value:=DBPipeline['pdx'];
  if (Value='B20') or (Value='B200') or (Value='B201') or (Value='B202') or (Value='B203') or (Value='B204') or (Value='B205') or (Value='B206') or (Value='B207') or (Value='B208') or (Value='B209')
  or (Value='B21') or (Value='B210') or (Value='B211') or (Value='B212') or (Value='B213') or (Value='B217') or (Value='B218') or (Value='B219')
  or (Value='B22') or (Value='B220') or (Value='B221') or (Value='B222') or (Value='B227')
  or (Value='B23') or (Value='B230') or (Value='B231') or (Value='B232') or (Value='B233') or (Value='B238') or (Value='B24')
  or (Value='F024') or (Value='F0240') or (Value='F0241') or (Value='F0242') or (Value='F0243') or (Value='F0244')
  or (Value='O987') or (Value='R75') or (Value='Z114') or (Value='Z206') or (Value='Z21') or (Value='Z717') or (Value='Z830')
  then
  begin
  Value:='---'
  end else
  Value:=DBPipeline['diagnosis_name'];
  end;

ตามนี้ได้นะครับ แต่พอทำไปทำมา ได้บ้างไม่ได้บ้าง โชว์บ้างไม่โชว์บ้าง งงเลยครับ

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

  Value:=DBPipeline['pdx'];
  if (Value='B20') or (Value='B200') or (Value='B201') or (Value='B202') or (Value='B203') or (Value='B204') or (Value='B205') or (Value='B206') or (Value='B207') or (Value='B208') or (Value='B209')
  or (Value='B21') or (Value='B210') or (Value='B211') or (Value='B212') or (Value='B213') or (Value='B217') or (Value='B218') or (Value='B219')
  or (Value='B22') or (Value='B220') or (Value='B221') or (Value='B222') or (Value='B227')
  or (Value='B23') or (Value='B230') or (Value='B231') or (Value='B232') or (Value='B233') or (Value='B238') or (Value='B24')
  or (Value='F024') or (Value='F0240') or (Value='F0241') or (Value='F0242') or (Value='F0243') or (Value='F0244')
  or (Value='O987') or (Value='R75') or (Value='Z114') or (Value='Z206') or (Value='Z21') or (Value='Z717') or (Value='Z830')
  then
  begin
  Value:='---'
  end else
  Value:=DBPipeline['diagnosis_name'];
  end;

ตามนี้ได้นะครับ แต่พอทำไปทำมา ได้บ้างไม่ได้บ้าง โชว์บ้างไม่โชว์บ้าง งงเลยครับ

งั้นลองเปลี่ยนเป็น ทำคอลัมน์ tname ของ B%   กลุ่มที่ใช่ HIV      เป็นคำว่า  HIV  แล้วปิดการแสดงผลได้แน่นอน ด้วย where tname="HIV"  ไม่ต้องแสดงชื่อโรคและรหัส..ครับ...

[BBT Hospital]

  Value:=DBPipeline['pdx'];
  if (Value='B20') or (Value='B200') or (Value='B201') or (Value='B202') or (Value='B203') or (Value='B204') or (Value='B205') or (Value='B206') or (Value='B207') or (Value='B208') or (Value='B209')
  or (Value='B21') or (Value='B210') or (Value='B211') or (Value='B212') or (Value='B213') or (Value='B217') or (Value='B218') or (Value='B219')
  or (Value='B22') or (Value='B220') or (Value='B221') or (Value='B222') or (Value='B227')
  or (Value='B23') or (Value='B230') or (Value='B231') or (Value='B232') or (Value='B233') or (Value='B238') or (Value='B24')
  or (Value='F024') or (Value='F0240') or (Value='F0241') or (Value='F0242') or (Value='F0243') or (Value='F0244')
  or (Value='O987') or (Value='R75') or (Value='Z114') or (Value='Z206') or (Value='Z21') or (Value='Z717') or (Value='Z830')
  then
  begin
  Value:='---'
  end else
  Value:=DBPipeline['diagnosis_name'];
  end;

ตามนี้ได้นะครับ แต่พอทำไปทำมา ได้บ้างไม่ได้บ้าง โชว์บ้างไม่โชว์บ้าง งงเลยครับ

ขอลองดูตัวรายงานหน่อยได้ไหมครับ

[C H O K E]

ผมใช้วิธีคล้ายๆ พี่เกื้อครับ แต่ผมใช้เติมตัวอักษร H ในคอลัมน์ code5 แทน(ตอนนี้ไม่รู้ว่า code5 เอาไว้ทำอะไร) อย่างในรูป แล้วเอาคอมลัมน์นี้มาใช้เป็นเงื่อนไขใน script ครับ

ปล.เป็นวิธีแบบบ้านๆ แต่ได้ผลมานานแล้ว