@@ -13,7 +13,6 @@ codeunit 9108 "SharePoint Operation Response"
13
13
InherentEntitlements = X;
14
14
InherentPermissions = X;
15
15
16
- [NonDebuggable]
17
16
[TryFunction]
18
17
internal procedure GetResultAsText( var Result: Text ) ;
19
18
var
@@ -23,14 +22,12 @@ codeunit 9108 "SharePoint Operation Response"
23
22
ResultInStream. ReadText( Result) ;
24
23
end ;
25
24
26
- [NonDebuggable]
27
25
[TryFunction]
28
26
internal procedure GetResultAsStream( var ResultInStream: InStream )
29
27
begin
30
28
TempBlobContent. CreateInStream( ResultInStream) ;
31
29
end ;
32
30
33
- [NonDebuggable]
34
31
internal procedure SetHttpResponse( HttpResponseMessage : HttpResponseMessage )
35
32
var
36
33
ContentOutStream: OutStream ;
@@ -43,7 +40,6 @@ codeunit 9108 "SharePoint Operation Response"
43
40
SharepointDiagnostics. SetParameters( HttpResponseMessage . IsSuccessStatusCode, HttpResponseMessage . HttpStatusCode, HttpResponseMessage . ReasonPhrase, GetRetryAfterHeaderValue() , GetErrorDescription()) ;
44
41
end ;
45
42
46
- [NonDebuggable]
47
43
internal procedure SetHttpResponse( ResponseContent: Text ; ResponseHttpHeaders: HttpHeaders ; ResponseHttpStatusCode: Integer ; ResponseIsSuccessStatusCode: Boolean ; ResponseReasonPhrase: Text )
48
44
var
49
45
ContentOutStream: OutStream ;
@@ -54,7 +50,6 @@ codeunit 9108 "SharePoint Operation Response"
54
50
SharepointDiagnostics. SetParameters( ResponseIsSuccessStatusCode, ResponseHttpStatusCode, ResponseReasonPhrase, GetRetryAfterHeaderValue() , GetErrorDescription()) ;
55
51
end ;
56
52
57
- [NonDebuggable]
58
53
internal procedure GetHeaderValueFromResponseHeaders( HeaderName: Text ) : Text
59
54
var
60
55
Values: array [100 ] of Text ;
@@ -66,7 +61,6 @@ codeunit 9108 "SharePoint Operation Response"
66
61
exit ( Values[1 ]) ;
67
62
end ;
68
63
69
- [NonDebuggable]
70
64
internal procedure GetRetryAfterHeaderValue() RetryAfter: Integer ;
71
65
var
72
66
HeaderValue: Text ;
@@ -78,7 +72,6 @@ codeunit 9108 "SharePoint Operation Response"
78
72
exit ( 0 ) ;
79
73
end ;
80
74
81
- [NonDebuggable]
82
75
local procedure GetErrorDescription() : Text
83
76
var
84
77
Result: Text ;
@@ -92,7 +85,6 @@ codeunit 9108 "SharePoint Operation Response"
92
85
exit ( JToken. AsValue(). AsText()) ;
93
86
end ;
94
87
95
- [NonDebuggable]
96
88
internal procedure GetDiagnostics() : Interface "HTTP Diagnostics"
97
89
begin
98
90
exit ( SharepointDiagnostics) ;
0 commit comments