986. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 10/3/2017 11:16:07 AM Central Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

986.1 Files compared

#	Location	File	Last Modified
1	ehmp.zip\ehmp\ehmp\product\tests\data_load_scripts\domain_loaders	visit.rb	Tue Jan 10 16:20:50 2017 UTC
2	ehmp.zip\ehmp\ehmp\product\tests\data_load_scripts\domain_loaders	visit.rb	Mon Oct 2 20:10:23 2017 UTC

986.2 Comparison summary

Description	Between Files 1 and 2
Description	Text Blocks	Lines
Unchanged	2	172
Changed	1	2
Inserted	0	0
Removed	0	0

986.3 Comparison options

Whitespace
Character case	Differences in character case are significant
Line endings	Differences in line endings (`CR` and `LF` characters) are ignored
CR/LF characters	Not shown in the comparison detail

986.4 Active regular expressions

No regular expressions were active.

986.5 Comparison detail

	1	require 'v istarpc4r'
	2
	3
	4	# options
	5	#--------- ---------- ---------- -------
	6	serve_ip = " IP "
	7	visit_amou nt = 207 # up to 62
	8	patient_id = "100841 " # alpha test
	9	#--------- ---------- ---------- -------
	10
	11
	12	@broker = VistaRPC4r ::RPCBroke rConnectio n.new(serv e_ip, 9210 , "pr12345 ", "pr1234 5!!", fals e)
	13	@broker.co nnect
	14	@broker.se tContext(' OR CPRS GU I CHART')
	15
	16	count = 0
	17
	18	while coun t < visit_ amount
	19
	20	lo ad_time = Time.now
	21
	22	ti me = load _time - (6 0 * 15 * c ount)
	23
	24	fo rmated_tim e = time.s trftime "3 %y%m%d.%H% M"
	25
	26	vr pc = Vista RPC4r::Vis taRPC.new( "TIU CREAT E RECORD", VistaRPC4 r::RPCResp onse::SING LE_VALUE)
	27	vr pc.params = [
	28	pati ent_id, #p atient id
	29	"16" , # note t ype
	30	"",
	31	"",
	32	"",
	33	[
	34	["1202 ","991"], #provider id
	35	["1301 ","#{forma ted_time}" ], # time
	36	["1205 ","195"], #location
	37	["1701 ",""]
	38	],
	39	"195 ;#{formate d_time};A" , # time a nd locatio n
	40	"1"
	41	]
	42
	43	re sp = @brok er.execute (vrpc)
	44	no te_id = re sp.value
	45
	46	vr pc = Vista RPC4r::Vis taRPC.new( "TIU SET D OCUMENT TE XT", Vista RPC4r::RPC Response:: SINGLE_VAL UE)
	47	vr pc.params = [
	48	"#{n ote_id}",
	49	[
	50	["\"TE XT\",1,0", "visit not e"],
	51	["\"HD R\"","1^1" ]
	52	],
	53	"0"
	54	]
	55
	56	re sp = @brok er.execute (vrpc)
	57
	58	vr pc = Vista RPC4r::Vis taRPC.new( "ORWPCE SA VE", Vista RPC4r::RPC Response:: SINGLE_VAL UE)
	59
	60	in put_array =[
	61	["1" ,"HDR^0^^3 2;#{format ed_time};A "], # time = 3150416 .15135
	62	["2" ,"VST^DT^# {formated_ time}"], # visit tim e
	63	["3" ,"VST^PT^1 00841"], # patient i cn
	64	["4" ,"VST^HL^3 2"], # loc ation, pri mary care
	65	["5" ,"VST^VC^A "], # ????
	66	["6" ,"PRV^991^ ^^PROVIDER ,EIGHT^1"] , # provid er
	67	]
	68	vr pc.params = [
	69	inpu t_array,
	70	"#{n ote_id}",
	71	"32"
	72	]
	73
	74	re sp = @brok er.execute (vrpc)
	75
	76	vr pc = Vista RPC4r::Vis taRPC.new( "TIU SIGN RECORD", V istaRPC4r: :RPCRespon se::SINGLE _VALUE)
	77	vr pc.params = [
	78	"#{n ote_id}",
	79	"%Kp V7x&*p0"
	80	]
	81
	82	re sp = @brok er.execute (vrpc)
	83
	84	co unt = coun t + 1
	85	end
	86
	87	@broker.cl ose