From 693934bf4f64a64f12e8f5853f8061f792b75e97 Mon Sep 17 00:00:00 2001
From: andrew-phillips-1 <39617310+andrew-phillips-1@users.noreply.github.com>
Date: Fri, 29 Nov 2024 08:46:35 +0000
Subject: [PATCH 1/2] need to recognise that self testing introduced about 2018

---
 hiv_synthesis.sas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hiv_synthesis.sas b/hiv_synthesis.sas
index 7abcf6d9..d1ed46c5 100644
--- a/hiv_synthesis.sas
+++ b/hiv_synthesis.sas
@@ -4662,7 +4662,7 @@ end;
 	eff_self_test_targeting = self_test_targeting;
 
 	w = rand('uniform');	
-	if hard_reach=0 or (hard_reach = 1 and w < prob_self_test_hard_reach) then do;
+	if caldate{t} ge 2018 and (hard_reach=0 or (hard_reach = 1 and w < prob_self_test_hard_reach)) then do;
 
 		u_self_test=rand('uniform');
  		if . < np_lasttest <= 0 then u_self_test = u_self_test * eff_self_test_targeting;  

From 83455be7e1cea9e18abeabe600e08a9a93ba688f Mon Sep 17 00:00:00 2001
From: andrew-phillips-1 <39617310+andrew-phillips-1@users.noreply.github.com>
Date: Fri, 29 Nov 2024 09:11:38 +0000
Subject: [PATCH 2/2] .

---
 hiv_synthesis.sas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hiv_synthesis.sas b/hiv_synthesis.sas
index d1ed46c5..c87d0d25 100644
--- a/hiv_synthesis.sas
+++ b/hiv_synthesis.sas
@@ -16083,7 +16083,7 @@ if newp_this_per=1 then do;
 	if hiv ne 1 then newp_this_per_hivneg=1;
 	if hiv ne 1 and 15 <= age < 50 then newp_this_per_hivneg_1549=1;
 	if 15 <= age < 50 then newp_this_per_1549=1;
-	if gender=1 and  hiv ne 1 then newp_this_per_hivneg_m = 1;	if msm= and hiv ne 1 then newp_this_per_hivneg_msm = 1;
+	if gender=1 and  hiv ne 1 then newp_this_per_hivneg_m = 1;	if msm=1 and hiv ne 1 then newp_this_per_hivneg_msm = 1;
 	if gender=2 and  hiv ne 1 then newp_this_per_hivneg_w = 1;
 	if gender=2 and  hiv ne 1 and 15 <= age < 25 then newp_this_per_hivneg_age1524w = 1;
 	if sw=1 and  hiv ne 1 then newp_this_per_hivneg_sw = 1;