| |
319 |
319 |
set message "No Get Document implementation" |
| |
320 |
320 |
} elseif { $authority(process_doc_impl_id) eq "" } { |
| |
321 |
321 |
set message "No Process Document implementation" |
| |
322 |
322 |
} else { |
| |
323 |
323 |
auth::sync::job::start_get_document -job_id $job_id |
| |
324 |
324 |
|
| |
325 |
325 |
array set doc_result { |
| |
326 |
326 |
doc_status failed_to_connect |
| |
327 |
327 |
doc_message {} |
| |
328 |
328 |
document {} |
| |
329 |
329 |
snapshot_p f |
| |
330 |
330 |
} |
| |
331 |
331 |
ad_try { |
| |
332 |
332 |
array set doc_result [auth::sync::GetDocument -authority_id $authority_id] |
| |
333 |
333 |
} on error {errorMsg} { |
| |
334 |
334 |
ad_log Error "Error getting sync document: errorMsg" |
| |
335 |
335 |
set doc_result(doc_status) failed_to_connect |
| |
336 |
336 |
set doc_result(doc_message) $errorMsg |
| |
337 |
337 |
} |
| |
338 |
338 |
|
| |
339 |
|
set snapshot_p [template::util::is_true $doc_result(snapshot_p)] |
| |
|
339 |
set snapshot_p [string is true -strict $doc_result(snapshot_p)] |
| |
340 |
340 |
|
| |
341 |
341 |
auth::sync::job::end_get_document \ |
| |
342 |
342 |
-job_id $job_id \ |
| |
343 |
343 |
-doc_status $doc_result(doc_status) \ |
| |
344 |
344 |
-doc_message $doc_result(doc_message) \ |
| |
345 |
345 |
-document $doc_result(document) \ |
| |
346 |
346 |
-snapshot=$snapshot_p |
| |
347 |
347 |
|
| |
348 |
348 |
if { $doc_result(doc_status) eq "ok" && $doc_result(document) ne "" } { |
| |
349 |
349 |
ad_try { |
| |
350 |
350 |
auth::sync::ProcessDocument \ |
| |
351 |
351 |
-authority_id $authority_id \ |
| |
352 |
352 |
-job_id $job_id \ |
| |
353 |
353 |
-document $doc_result(document) |
| |
354 |
354 |
|
| |
355 |
355 |
set ack_doc [auth::sync::GetAcknowledgementDocument \ |
| |
356 |
356 |
-authority_id $authority_id \ |
| |
357 |
357 |
-job_id $job_id \ |
| |
358 |
358 |
-document $doc_result(document)] |
| |
359 |
359 |
|
