-
Notifications
You must be signed in to change notification settings - Fork 0
/
date_mistakes_check.do
78 lines (59 loc) · 2.32 KB
/
date_mistakes_check.do
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
clear
set more off
log close _all
/*****************
Description:
Checking whether submit date and date placed by enum are the same
*****************/
global USER "Ryan McWay"
local date `c(current_date)'
local time `c(current_time)'
local home "C:\Users\Ryry\Dropbox\Ryan_Intern\Strong Minds - Mental Health & Adolescent Empowerment"
//***** All paths should be relative so that all you need to change is `home' and $USER in order to run the dofile.
**************************************************************************
cd "`home'"
local input "`home'\input"
local edit "`home'\edit"
local output "`home'\output"
**************************************************************************
display "Analysis run by $USER at `date' and `time'"
//************** LISTING
import delimited "`input'\finalbaseline_listing.csv", clear
//*** Reformat before check
split submissiondate, parse("")
egen date_sub = concat(submissiondate1 submissiondate2 submissiondate3), punct(" ")
split starttime
egen date_start = concat(starttime1 starttime2 starttime3), punct(" ")
order date_sub date_start date
//*** Check date_sub = date_start (tech issues)
gen tech_issue = 0
replace tech_issue = 1 if (date_sub != date_start)
list enum_name date_sub date if (tech_issue == 1)
//*** Check if date_sub = date (enum's fault)
gen enum_fault = 0
replace enum_fault = 1 if (date_sub != date)
list enum_name date_sub date if (enum_fault == 1)
/*
PROBLEM CHILD
*/
list enum_name date_sub date if (enum_fault == 1 & tech_issue == 0)
//************ CR SURVEY
import delimited "`input'\finalbaseline_CRsurvey.csv", clear
//*** Reformat before check
split submissiondate, parse("")
egen date_sub = concat(submissiondate1 submissiondate2 submissiondate3), punct(" ")
split starttime
egen date_start = concat(starttime1 starttime2 starttime3), punct(" ")
order date_sub date_start date
//*** Check date_sub = date_start (tech issues)
gen tech_issue = 0
replace tech_issue = 1 if (date_sub != date_start)
list enum_name date_sub date if (tech_issue == 1)
//*** Check if date_sub = date (enum's fault)
gen enum_fault = 0
replace enum_fault = 1 if (date_sub != date)
list enum_name date_sub date if (enum_fault == 1)
/*
PROBLEM CHILD
*/
list enum_name date_sub date if (enum_fault == 1 & tech_issue == 0)