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.
| # | Location | File | Last Modified |
|---|---|---|---|
| 1 | ehmp.zip\ehmp\ehmp\product\tests\data_load_scripts | notes_loader.rb | Tue Jan 10 16:20:50 2017 UTC |
| 2 | ehmp.zip\ehmp\ehmp\product\tests\data_load_scripts | notes_loader.rb | Tue Oct 3 14:32:24 2017 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 2 | 164 |
| Changed | 1 | 2 |
| Inserted | 0 | 0 |
| Removed | 0 | 0 |
| 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 |
No regular expressions were active.
| 1 | require 'v istarpc4r' | |
| 2 | require 'c sv' | |
| 3 | ||
| 4 | @broker = VistaRPC4r ::RPCBroke rConnectio n.new(" IP ", PORT , " REDACTED ", " REDACTED ", false) | |
| 5 | @broker.co nnect | |
| 6 | @broker.se tContext(' OR CPRS GU I CHART') | |
| 7 | ||
| 8 | ||
| 9 | def save_n ote(patien t, type, t ext, locat ion, date) | |
| 10 | ||
| 11 | ||
| 12 | vr pc = Vista RPC4r::Vis taRPC.new( "TIU CREAT E RECORD", VistaRPC4 r::RPCResp onse::SING LE_VALUE) | |
| 13 | vr pc.params = [ | |
| 14 | pati ent, #pati ent id | |
| 15 | type , # note t ype | |
| 16 | "", | |
| 17 | "", | |
| 18 | "", | |
| 19 | [ | |
| 20 | ["1202 ","991"], #provider id | |
| 21 | ["1301 ",date], # time | |
| 22 | ["1205 ",location ], #locati on | |
| 23 | ["1701 ",""] | |
| 24 | ], | |
| 25 | "#{l ocation};# {date};A", # time an d location | |
| 26 | "1" | |
| 27 | ] | |
| 28 | ||
| 29 | re sp = @brok er.execute (vrpc) | |
| 30 | no te_id = re sp.value | |
| 31 | pu ts resp | |
| 32 | ||
| 33 | # save some text to th e note | |
| 34 | ||
| 35 | ||
| 36 | vr pc = Vista RPC4r::Vis taRPC.new( "TIU SET D OCUMENT TE XT", Vista RPC4r::RPC Response:: SINGLE_VAL UE) | |
| 37 | vr pc.params = [ | |
| 38 | "#{n ote_id}", | |
| 39 | [ | |
| 40 | ["\"TE XT\",1,0", text], | |
| 41 | ["\"HD R\"","1^1" ] | |
| 42 | ], | |
| 43 | "0" | |
| 44 | ] | |
| 45 | ||
| 46 | re sp = @brok er.execute (vrpc) | |
| 47 | no te_id = re sp.value.s plit('^'). first | |
| 48 | pu ts resp | |
| 49 | ||
| 50 | vr pc = Vista RPC4r::Vis taRPC.new( "TIU SIGN RECORD", V istaRPC4r: :RPCRespon se::SINGLE _VALUE) | |
| 51 | vr pc.params = [ | |
| 52 | "#{n ote_id}", | |
| 53 | "%Kp V7x&*p0" | |
| 54 | ] | |
| 55 | ||
| 56 | re sp = @brok er.execute (vrpc) | |
| 57 | pu ts resp | |
| 58 | ||
| 59 | end | |
| 60 | ||
| 61 | ||
| 62 | CSV.foreac h("./alpha _note_load .csv") do |row| | |
| 63 | # puts r ow | |
| 64 | unless r ow[0] == " Patient Na me" | |
| 65 | pa t = row[0] .split(" - ")[1] | |
| 66 | ||
| 67 | ty pe = row[1 ].split(" - ")[1] | |
| 68 | ||
| 69 | te xt = row[2 ] | |
| 70 | ||
| 71 | lo cation = r ow[3].spli t(" - ")[1 ] | |
| 72 | ||
| 73 | ||
| 74 | da te = DateT ime.strpti me(row[4], "%m/%d/%Y %H:%M") | |
| 75 | pr e_value = 1 + (date. year / 100 0) | |
| 76 | da te_string = date.st rftime('%y %m%d.%H%M' ) | |
| 77 | da te_string = "#{pre_v alue}" + d ate_string | |
| 78 | ||
| 79 | sa ve_note(pa t, type, t ext, locat ion, date_ string) | |
| 80 | end | |
| 81 | end | |
| 82 | ||
| 83 | @broker.cl ose |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.