1016. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 10/3/2017 11:16:08 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.

1016.1 Files compared

#	Location	File	Last Modified
1	ehmp.zip\ehmp\ehmp\product\tests\vistarpc4r\examples	add_problems.rb	Tue Jan 10 16:20:50 2017 UTC
2	ehmp.zip\ehmp\ehmp\product\tests\vistarpc4r\examples	add_problems.rb	Tue Oct 3 14:53:37 2017 UTC

1016.2 Comparison summary

Description	Between Files 1 and 2
Description	Text Blocks	Lines
Unchanged	3	136
Changed	2	6
Inserted	0	0
Removed	0	0

1016.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

1016.4 Active regular expressions

No regular expressions were active.

1016.5 Comparison detail

	1	# require 'rubygems'
	2	#
	3	# require './../lib/ vistarpc4r /rpc_respo nse'
	4	# require './../lib/ vistarpc4r /vista_rpc '
	5	# require './../lib/ vistarpc4r /rpc_broke r_connecti on'
	6	#
	7	# broker = VistaRPC4 r::RPCBrok erConnecti on.new(' IP ', PORT , ' REDACT ', ' REDACTED ', false)
	8	#
	9	# broker.c onnect
	10	# p "The R PC Broker Connection status is #{broker. isConnecte d}"
	11	#
	12	# #broker = RPCBroke rConnectio n.new('192 .168.1.20' , PORT , ' REDACTED ', ' REDACTED ')
	13	# # broker = RPCBrok erConnecti on.new(' IP ', PORT , ' REDACT ', ' REDACTED ', false)
	14	#
	15	# # broker .connect
	16	# broker.s etContext( 'OR CPRS G UI CHART')
	17	#
	18	# dfn = "3 " # inter nal id of the patien t, CLINICA L, Male
	19	# provider ="42" #i nternal id of care p rovider Ph ysican, Us er
	20	# # Proble m list
	21	# puts "Pr oblem list ---------- ---------- ---------- -------"
	22	# vrpc = V istaRPC4r: :VistaRPC. new("ORQQP L LIST", V istaRPC4r: :RPCRespon se::ARRAY)
	23	# vrpc.par ams[0]=dfn #patient ien
	24	# vrpc.par ams[1]="A"
	25	# resp = b roker.exec ute(vrpc)
	26	# resp.val ue.each do \|d\|
	27	# puts d
	28	# end
	29	#
	30	# # Get Ba sic patien t informat ion that i s used for problem l ist modifi cation RPC s
	31	# vrpc = V istaRPC4r: :VistaRPC. new("ORQQP L INIT PT" , VistaRPC 4r::RPCRes ponse::ARR AY)
	32	# vrpc.par ams[0]=dfn
	33	# resp = b roker.exec ute(vrpc)
	34	# ptVAMC=r esp.value[ 0] # := copy(Alis t[i],1,999 );
	35	# ptDead=r esp.value[ 1] # := AList[i];
	36	# ptBID=re sp.value[6 ] # := Alist[i];
	37	# ptname=" "
	38	# gmpdfn = dfn + "^" + ptname + "^" + pt BID + "^" + ptDead
	39	# puts gmp dfn
	40	#
	41	# # Add a new probl em
	42	# vrpc = V istaRPC4r: :VistaRPC. new("ORQQP L ADD SAVE ", VistaRP C4r::RPCRe sponse::AR RAY)
	43	# vrpc.par ams[0]=gmp dfn
	44	# vrpc.par ams[1]= pr ovider
	45	# vrpc.par ams[2]= pt VAMC
	46	# vrpc.par ams[3] = [
	47	# ["1", "GMP FLD(.01)=\ "\"\"819.0 1\"\"\""], # Diagno sis
	48	# ["2", "GMP FLD(.05)=\ "\"\"^add- problem--t est\"\"\"" ], # Narra tive
	49	# ["3", "GMP FLD(.12)=\ "\"\"A\"\" \""], # st atus A?
	50	# ["4", "GMP FLD(.13)=\ "\"\"\"\"\ ""], # Dat e of onset
	51	# ["5", "GMP FLD(1.01)= \"\"\"\"\" \""], # Pr oblem
	52	# ["6", "GMP FLD(10,0)= \"\"\"\"\" \""] # Not e
	53	# ]
	54	# resp=bro ker.execut e(vrpc)
	55	# puts res p
	56	#
	57	# vrpc = V istaRPC4r: :VistaRPC. new("ORQQP L LIST", V istaRPC4r: :RPCRespon se::ARRAY)
	58	# vrpc.par ams[0]=dfn #patient ien
	59	# vrpc.par ams[1]="A"
	60	# resp = b roker.exec ute(vrpc)
	61	# resp.val ue.each do \|d\|
	62	# puts d
	63	# end
	64	#
	65	# #vrpc = VistaRPC.n ew("ORQQPL DELETE", RPCRespons e::SINGLE_ VALUE)
	66	# #vrpc.pa rams[0]="3 4"
	67	# #vrpc.pa rams[1]=pr ovider
	68	# #vrpc.pa rams[2]=pt VAMC
	69	# #vrpc.pa rams[3]="B ecause"
	70	# #resp=br oker.execu te(vrpc)
	71	# #puts re sp