Produced by Araxis Merge on 1/17/2019 1:51:43 PM Central Standard 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 | C:\AraxisMergeCompare\Pri_un\ccra\ccra_HSIE_IC\SEOC\Maintenance\Operation | RetrieveSEOC.cls | Thu Jan 10 13:20:18 2019 UTC |
2 | C:\AraxisMergeCompare\Pri_re\ccra\ccra_HSIE_IC\SEOC\Maintenance\Operation | RetrieveSEOC.cls | Thu Jan 10 16:31:30 2019 UTC |
Description | Between Files 1 and 2 |
|
---|---|---|
Text Blocks | Lines | |
Unchanged | 2 | 130 |
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 | Class SEOC .Maintenan ce.Operati on.Retriev eSEOC Exte nds EnsLib .REST.Gene ricOperati on | |
2 | { | |
3 | ||
4 | Parameter INVOCATION = "Queue" ; | |
5 | ||
6 | // Overrid e the OnIn it method in order t o use the DASHTTPReq uest and u pdate head ers as nee ded | |
7 | ||
8 | Method OnI nit() As % Status | |
9 | { | |
10 | // Set ..%Htt pRequest=# #class(SEO C.Maintena nce.Messag e.SEOCHTTP Request).% New() | |
11 | se t ..%HttpR equest = # #class(%Ne t.HttpRequ est).%New( ) | |
12 | ||
13 | Qu it $$$OK | |
14 | } | |
15 | ||
16 | Method OnM essage(pRe quest As S EOC.Mainte nance.Mess age.Retrie veSEOCRequ est, Outpu t pRespons e As EnsLi b.HTTP.Gen ericMessag e) As %Sta tus | |
17 | { | |
18 | ||
19 | #d im tSC As %String = $$$OK | |
20 | #d im tHttpRe sponse As %Net.HttpR esponse = ##class(%N et.HttpRes ponse).%Ne w() | |
21 | ||
22 | tr y{ | |
23 | ||
24 | //Se t custom S EOC header s | |
25 | do . .%HttpRequ est.SetHea der("Accep t", "*/*") | |
26 | ||
27 | //Se t Adapter URL path d epending o n value of SEOC ID i n Request Message | |
28 | //SE OC Id = "" - Retriev e all SEOC s (URL = . ../v1/seoc ) | |
29 | //SE OC Id = <S EOC ID> - Retrieve j ust the on e SEOC (UR L = .../v1 /seoc/{id} | |
30 | ||
31 | set: '(pRequest .SEOCId="" ) ..Adapte r.URL = .. Adapter.UR L _ "/" _ pRequest.S EOCId | |
32 | ||
33 | //Ex ecute the "GET" | |
34 | Set tSC = ..Adapter. SendF
|
|
35 | ||
36 | ||
37 | //Lo g response /error rec eived from DAS | |
38 | If $ IsObject(t HttpRespon se.Data) { | |
39 | ||
40 | set tS tream = ## class(%Str eam.Global Character) .%New() | |
41 | $$$Thr owOnError( tStream.Co pyFrom(tHt tpResponse .Data)) | |
42 | set pR esponse = ##class(En sLib.HTTP. GenericMes sage).%New (tStream) | |
43 | ||
44 | $$$LOG INFO("SEOC Data rece ived from SEOC DB") | |
45 | } | |
46 | Else { $$$LOG ERROR("No response r eceived fr om SEOC DB ") } | |
47 | ||
48 | } | |
49 | catch ex { | |
50 | ||
51 | Set tSC = ex.A sStatus() | |
52 | } | |
53 | ||
54 | quit tSC | |
55 | } | |
56 | ||
57 | XData Mess ageMap | |
58 | { | |
59 | <MapItems> | |
60 | <Map Item Messa geType="SE OC.Mainten ance.Messa ge.Retriev eSEOCReque st"> | |
61 | <Metho d>OnMessag e</Method> | |
62 | </Ma pItem> | |
63 | </ MapItems> | |
64 | } | |
65 | ||
66 | } |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.