From d8829a3c460e79191b732a76549685c63c88e05b Mon Sep 17 00:00:00 2001
From: chaopower <chao.zhang@jmdna.com>
Date: Wed, 21 Feb 2024 11:26:35 +0800
Subject: [PATCH] =?UTF-8?q?=E6=B7=BB=E5=8A=A01=E5=88=97=E4=B9=8B=E5=90=8E?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 codes/target_therapy_cnv.pl       | 2 +-
 codes/target_therapy_fusion.pl    | 2 +-
 codes/target_therapy_longindel.pl | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/codes/target_therapy_cnv.pl b/codes/target_therapy_cnv.pl
index 2bafe53..884d801 100755
--- a/codes/target_therapy_cnv.pl
+++ b/codes/target_therapy_cnv.pl
@@ -91,7 +91,7 @@ open IN, "$input";
 my $h2 = <IN>;
 chomp $h2;
 
-my $h = $h2 . "\tcn\tfun_change\t" . join("\t", (split("\t", $h1))[0 .. 9, 14]) . "\tLabel\tDrugCn\tIndication";
+my $h = $h2 . "\tcn\tfun_change\t" . join("\t", (split("\t", $h1))[0 .. 9, 14]) . "\tLabel\tDrugCn\tIndication\treport_need_note";
 print POS "$h\n";
 print VUS "$h\n";;
 
diff --git a/codes/target_therapy_fusion.pl b/codes/target_therapy_fusion.pl
index 544fb76..618276e 100755
--- a/codes/target_therapy_fusion.pl
+++ b/codes/target_therapy_fusion.pl
@@ -96,7 +96,7 @@ open VUS, ">$output.vus.txt";
 my $h2 = <IN>;
 chomp $h2;
 
-print POS $h2 . "\tOncogenic\t" . join("\t", (split("\t", $h1))[0 .. 9, 14]) . "\tLabel\tDrugCn\tIndication\n";
+print POS $h2 . "\tOncogenic\t" . join("\t", (split("\t", $h1))[0 .. 9, 14]) . "\tLabel\tDrugCn\tIndication\treport_need_note\n";
 print NEG $h2 . "\tOncogenic\n";
 print VUS $h2 . "\tOncogenic\n";
 
diff --git a/codes/target_therapy_longindel.pl b/codes/target_therapy_longindel.pl
index feeb7a6..dbdcedb 100755
--- a/codes/target_therapy_longindel.pl
+++ b/codes/target_therapy_longindel.pl
@@ -98,7 +98,7 @@ open POS, ">$output.pos.txt";
 my $h2 = <IN>;
 chomp $h2;
 
-print POS $h2 . "\t" . join("\t", (split("\t", $h1))[0 .. 9, 14]) . "\tLabel\tDrugCn\tIndication\n";
+print POS $h2 . "\t" . join("\t", (split("\t", $h1))[0 .. 9, 14]) . "\tLabel\tDrugCn\tIndication\treport_need_note\n";
 
 my @pos;
 while (<IN>) {