sasjs/core
1
0
Fork 0
mirror of https://github.com/sasjs/core.git synced 2026-04-14 12:23:14 +00:00
Code Issues Projects Releases Wiki Activity

fix: mp_replace and mv_getjobcode were not ingesting periods correctly

Browse Source
This commit is contained in:
munja
2022-03-07 14:25:05 +00:00
parent 1932c1e138
commit b96df6f14f
5 changed files with 69 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
viya/mv_getjobcode.sas
View File

@@ -45,7 +45,7 @@
);
%local dbg bufsize varcnt fname1 fname2 errmsg;
%if &mdebug=1 %then %do;
%put &sysmacroname entry vars:;
%put &sysmacroname local entry vars:;
%put _local_;
%end;
%else %let dbg=*;
@@ -112,14 +112,21 @@ proc http method='GET' out=&fname1 &oauth_bearer
%end;
;
run;
%if &SYS_PROCHTTP_STATUS_CODE ne 200 and &SYS_PROCHTTP_STATUS_CODE ne 201 %then
%do;
data _null_;infile &fname1;input;putlog _infile_;run;
%mp_abort(mac=&sysmacroname
,msg=%str(&SYS_PROCHTTP_STATUS_CODE &SYS_PROCHTTP_STATUS_PHRASE)
)
%if &mdebug=1 %then %do;
data _null_;
infile &fname1;
input;
putlog _infile_;
run;
%end;
%mp_abort(
iftrue=(&SYS_PROCHTTP_STATUS_CODE ne 200 and &SYS_PROCHTTP_STATUS_CODE ne 201)
,mac=&sysmacroname
,msg=%str(&SYS_PROCHTTP_STATUS_CODE &SYS_PROCHTTP_STATUS_PHRASE)
)
%let fname2=%mf_getuniquefileref();
filename &fname2 temp ;
@@ -128,7 +135,7 @@ filename &fname2 temp ;
data _null_;
file &fname2 recfm=n;
infile &fname1 lrecl=1 recfm=n;
input sourcechar $ 1. @@;
input sourcechar $char1. @@;
format sourcechar hex2.;
retain startwrite 0;
if startwrite=0 and sourcechar='"' then do;