sasjs/core
1
0
Fork 0
mirror of https://github.com/sasjs/core.git synced 2026-01-16 04:50:05 +00:00
Code Issues Projects Releases Wiki Activity

fix: refactor xml

Browse Source
This commit is contained in:
Allan Bowe
2022-06-17 17:47:34 +00:00
parent 767ddd7add
commit 4752bfbb05
2 changed files with 36 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
all.sas
View File

@@ -17807,7 +17807,6 @@ libname _XML_ clear;
)/*/STORE SOURCE*/; )/*/STORE SOURCE*/;
filename response temp; filename response temp;
%if %superq(&user)=0 %then %do; %if %superq(&user)=0 %then %do;
proc metadata in= '<GetMetadataObjects> proc metadata in= '<GetMetadataObjects>
<Reposid>$METAREPOSITORY</Reposid> <Reposid>$METAREPOSITORY</Reposid>
@@ -17824,20 +17823,24 @@ filename response temp;
run; run;
%end; %end;
%else %do; %else %do;
proc metadata in= "<GetMetadataObjects> filename inref temp;
<Reposid>$METAREPOSITORY</Reposid> data _null_;
<Type>Person</Type> file inref;
<NS>SAS</NS> put "<GetMetadataObjects>";
<!-- Specify the OMI_XMLSELECT (128) flag --> put "<Reposid>$METAREPOSITORY</Reposid>";
<Flags>128</Flags> put "<Type>Person</Type>";
<Options> put "<NS>SAS</NS>";
<Templates> put "<!-- Specify the OMI_XMLSELECT (128) flag -->";
<Person Name=""/> put "<Flags>128</Flags>";
</Templates> put "<Options>";
<XMLSELECT search=""Person[@Name='&user']""/> put "<Templates>";
</Options> put "<Person Name=""/>";
</GetMetadataObjects>" put "</Templates>";
out=response; put '<XMLSELECT search="Person[@Name='!!"'&user'"!!']"/>';
put "</Options>";
put "</GetMetadataObjects>";
run;
proc metadata in=inref out=response;
run; run;
%end; %end;

33
meta/mm_getusers.sas
View File

@@ -32,7 +32,6 @@
)/*/STORE SOURCE*/; )/*/STORE SOURCE*/;
filename response temp; filename response temp;
%if %superq(&user)=0 %then %do; %if %superq(&user)=0 %then %do;
proc metadata in= '<GetMetadataObjects> proc metadata in= '<GetMetadataObjects>
<Reposid>$METAREPOSITORY</Reposid> <Reposid>$METAREPOSITORY</Reposid>
@@ -49,20 +48,24 @@ filename response temp;
run; run;
%end; %end;
%else %do; %else %do;
proc metadata in= "<GetMetadataObjects> filename inref temp;
<Reposid>$METAREPOSITORY</Reposid> data _null_;
<Type>Person</Type> file inref;
<NS>SAS</NS> put "<GetMetadataObjects>";
<!-- Specify the OMI_XMLSELECT (128) flag --> put "<Reposid>$METAREPOSITORY</Reposid>";
<Flags>128</Flags> put "<Type>Person</Type>";
<Options> put "<NS>SAS</NS>";
<Templates> put "<!-- Specify the OMI_XMLSELECT (128) flag -->";
<Person Name=""/> put "<Flags>128</Flags>";
</Templates> put "<Options>";
<XMLSELECT search=""Person[@Name='&user']""/> put "<Templates>";
</Options> put "<Person Name=""/>";
</GetMetadataObjects>" put "</Templates>";
out=response; put '<XMLSELECT search="Person[@Name='!!"'&user'"!!']"/>';
put "</Options>";
put "</GetMetadataObjects>";
run;
proc metadata in=inref out=response;
run; run;
%end; %end;