mirror of
https://github.com/sasjs/core.git
synced 2026-01-08 10:00:04 +00:00
chore: moving files to tidy up docs
This commit is contained in:
76
tests/viyaonly/mv_getjobresult.test.sas
Normal file
76
tests/viyaonly/mv_getjobresult.test.sas
Normal file
@@ -0,0 +1,76 @@
|
||||
/**
|
||||
@file
|
||||
@brief Testing mv_createwebservice macro
|
||||
|
||||
<h4> SAS Macros </h4>
|
||||
@li mp_assertdsobs.sas
|
||||
@li mv_createwebservice.sas
|
||||
@li mv_getjobresult.sas
|
||||
@li mv_jobflow.sas
|
||||
|
||||
**/
|
||||
|
||||
options mprint notes;
|
||||
|
||||
/**
|
||||
* Test Case 1
|
||||
*/
|
||||
|
||||
/* create a service */
|
||||
filename testref temp;
|
||||
data _null_;
|
||||
file testref;
|
||||
put 'data test; set sashelp.class;run;';
|
||||
put '%webout(OPEN)';
|
||||
put '%webout(OBJ,test)';
|
||||
put '%webout(CLOSE)';
|
||||
run;
|
||||
%mv_createwebservice(
|
||||
path=&mcTestAppLoc/services/temp,
|
||||
code=testref,
|
||||
name=testsvc
|
||||
)
|
||||
|
||||
/* trigger and wait for it to finish */
|
||||
data work.inputjobs;
|
||||
_program="&mcTestAppLoc/services/temp/testsvc";
|
||||
run;
|
||||
%mv_jobflow(inds=work.inputjobs
|
||||
,maxconcurrency=4
|
||||
,outds=work.results
|
||||
,outref=myjoblog
|
||||
)
|
||||
/* stream the log */
|
||||
data _null_;
|
||||
infile myjoblog;
|
||||
input;
|
||||
put _infile_;
|
||||
run;
|
||||
|
||||
/* fetch the uri */
|
||||
data _null_;
|
||||
set work.results;
|
||||
call symputx('uri',uri);
|
||||
put (_all_)(=);
|
||||
run;
|
||||
|
||||
/* now get the results */
|
||||
%mv_getjobresult(uri=&uri
|
||||
,result=WEBOUT_JSON
|
||||
,outref=myweb
|
||||
,outlib=myweblib
|
||||
)
|
||||
data _null_;
|
||||
infile myweb;
|
||||
input;
|
||||
putlog _infile_;
|
||||
run;
|
||||
data work.out;
|
||||
set myweblib.test;
|
||||
put (_all_)(=);
|
||||
run;
|
||||
%mp_assertdsobs(work.out,
|
||||
desc=Test1 - 19 obs from sashelp.class in service result,
|
||||
test=EQUALS 19,
|
||||
outds=work.test_results
|
||||
)
|
||||
Reference in New Issue
Block a user