BookmarkSubscribeRSS Feed
🔒 This topic is solved and locked. Need further help from the community? Please sign in and ask a new question.

Hi,

I am trying to fetch FlowDefinition tag in a file having such a structure summarized below.

__________________________


<GetFlowResponse xmlns="?"><FlowDefinition eventName="KKB_Bireysel_Master" lastModifiedBy="sasdemo" modified="2015-04-21T15:27:05.840Z" created="2015-04-21T15:27:05.840Z" displayName="Campaign279:Shared Data\Decision Tree:KKB Business Context" name="Campaign279_1_DFDFEPEM5ZGTUVVA">

                        <Description>Campaign279:Shared Data\Decision Tree:KKB Business Context

</Description>

…………….

…………

</FlowDefinition></GetFlowResponse>

__________________________


After having all lines between "<FlowDefinition" and "</FlowDefinition>", using these lines I want to replace another xml file(as below) which also includes FlowDefinition tag with my new FlowDefinition tag. And finally, I want to add "ns2:" prefix to each tag.

__________________________


<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:rtd="?">

   <soapenv:Header/>

   <soapenv:Body>

      <rtd:SubmitSimulation>

         <rtd:SessionContextId>?</rtd:SessionContextId>

         <rtd:RepositoryName>?</rtd:RepositoryName>

         <!--Zero or more repetitions:-->

         <rtd:FlowDefinition name="?" displayName="" created="?" modified="?" lastModifiedBy="?" activated="?" eventName="?" timeout="0" timeoutEnabled="false">

…………….

…………

</rtd:FlowDefinition>

         <!--Zero or more repetitions:-->

         <rtd:GlobalValue name="?">

            <!--Zero or more repetitions:-->

            <rtd:Value>?</rtd:Value>

         </rtd:GlobalValue>

         <rtd:SimulationDescription eventName="?" inLibraryName="?" inTableName="?" outLibraryName="?" outTableName="?" statsLibraryName="?" statsTableName="?" overwriteOutputTable="?" multiThreaded="?" timeZoneOptions="?" timeZoneColumnOrId="?"/>

      </rtd:SubmitSimulation>

   </soapenv:Body>

</soapenv:Envelope>

__________________________

So 3 things to code:

1. Fetch FlowDefinition tag from one xml files.

2. Replace an old FlowDefinition tag in another xml file with the new FlowDefinition tag.

3. Add prefix(ns2:) to each tag.

What is the best way to code those? Any comment will be appreciated. Thanks a lot!

Regards,

Ozge

1 ACCEPTED SOLUTION

Accepted Solutions
Ksharp
Super User

Code: Program4.sas

data have;
infile cards length=len ;
input x $varying2000. len;
cards;
<GetFlowResponse xmlns="?"><FlowDefinition eventName="KKB_Bireysel_Master" lastModifiedBy="sasdemo" modified="2015-04-21T15:27:05.840Z" created="2015-04-21T15:27:05.840Z" displayName="Campaign279:Shared Data\Decision Tree:KKB Business Context" name="Campaign279_1_DFDFEPEM5ZGTUVVA">
  <Description>Campaign279:Shared Data\Decision Tree:KKB Business Context
</Description>
…………….
…………
</FlowDefinition></GetFlowResponse>
;
run;

data x;
infile cards length=len ;
input x $varying2000. len;
cards;
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:rtd="?">
  <soapenv:Header/>
  <soapenv:Body>
  <rtd:SubmitSimulation>
  <rtd:SessionContextId>?</rtd:SessionContextId>
  <rtd:RepositoryName>?</rtd:RepositoryName>
  <!--Zero or more repetitions:-->
  <rtd:FlowDefinition name="?" displayName="" created="?" modified="?" lastModifiedBy="?" activated="?" eventName="?" timeout="0" timeoutEnabled="false">
…………….
…………
</rtd:FlowDefinition>
  <!--Zero or more repetitions:-->
  <rtd:GlobalValue name="?">
  <!--Zero or more repetitions:-->
  <rtd:Value>?</rtd:Value>
  </rtd:GlobalValue>
  <rtd:SimulationDescription eventName="?" inLibraryName="?" inTableName="?" outLibraryName="?" outTableName="?" statsLibraryName="?" statsTableName="?" overwriteOutputTable="?" multiThreaded="?" timeZoneOptions="?" timeZoneColumnOrId="?"/>
  </rtd:SubmitSimulation>
  </soapenv:Body>
</soapenv:Envelope>
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:rtd="?">
  <soapenv:Header/>
  <soapenv:Body>
  <rtd:SubmitSimulation>
  <rtd:SessionContextId>?</rtd:SessionContextId>
  <rtd:RepositoryName>?</rtd:RepositoryName>
  <!--Zero or more repetitions:-->
  <rtd:FlowDefinition name="?" displayName="" created="?" modified="?" lastModifiedBy="?" activated="?" eventName="?" timeout="0" timeoutEnabled="false">
…………….
…………
</rtd:FlowDefinition>
  <!--Zero or more repetitions:-->
  <rtd:GlobalValue name="?">
  <!--Zero or more repetitions:-->
  <rtd:Value>?</rtd:Value>
  </rtd:GlobalValue>
  <rtd:SimulationDescription eventName="?" inLibraryName="?" inTableName="?" outLibraryName="?" outTableName="?" statsLibraryName="?" statsTableName="?" overwriteOutputTable="?" multiThreaded="?" timeZoneOptions="?" timeZoneColumnOrId="?"/>
  </rtd:SubmitSimulation>
  </soapenv:Body>
</soapenv:Envelope>
;
run;



data tag;
set have;
retain found;
p=find(x,'<FlowDefinition');
if p then do;
  found=1;
  x=cats('<ns2:',substr(x,p+1));
end;
p=find(x,'</FlowDefinition>');
if p then do;
  x=cats('</ns2:',substr(x,p+2,15));
end;
if find(lag(x),'</FlowDefinition>') then found=0;
if found;
keep x;
run;

data temp;
set x;
retain found;
if find(x,'<rtd:FlowDefinition') then found=1;
if find(lag(x),'</rtd:FlowDefinition>') then found=0;
if not found or (not lag(found) and found);
run;
data want;
set temp;
if not found then output;
   else do;
   do i=1 to nobs;
   set tag point=i nobs=nobs;
   output;
   end;
   end;
run;

View solution in original post

5 REPLIES 5
RW9
Diamond | Level 26 RW9
Diamond | Level 26

Well, my honest opinion?  I would suggest you either use a proper XML tool - Oxyen/XML Spy (which is free), or maybe if you need to code it, then .net and XPath.  You can then operate on nodes very simply:

- set document a, set document b

- parse document a, set document b

- set node<xyz> from file b to node<xyz> from file a

- write out document b

Now you could do this in SAS, i.e. create a map file, import both data, process that data, then output the files.  Personally I find SAS interaction with XML is not very good, mainly as it is a different technology, so best to use the tools built to deal with that technology.

You could, if textually speaking, find that string, i.e. if line read in ="<Flowdefinition>...", then you could just do a:

data _null_;

     infile "xyz.xml";

     file "xyz2.xml";

     input buffer $2000.;

     if index(buffer)="<FlowDefinition" then do;

          write out your extra bits here...

     end;

     else put buffer;

run;

However you have to be sure you know whats coming in and what your changing as its just plain text, you can't access "nodes".

ozgegroove
SAS Employee

Hi RW9,

Thanks for your quick response. Unfortunately I am supposed to maintain it with SAS coding. So, I have to assume it as a text file. I have tried your code sample as below. However, the result is not as expected. I want to get the all lines between FlowDefinition but can get the following results. Do you have any comments?

___________________

FILENAME response '/sas/MPayment_Project/XML_Files/getFlow_resp.xml';

FILENAME flowdef2 '/sas/MPayment_Project/XML_Files/flowdef2.xml';

data _null_;

     infile response;

     file flowdef2;

     input buffer $20000.;

     if (index(buffer,"<FlowDefinition")>0) then do;

    

     end;

  else; put buffer;

run;

_____________________

RESULT:

TableColumnsAdd(_G_IO_READ_COLUMNS_TO_READ, { { 'TID', 'STRING' }, { 'TCKN_VKN', 'STRING' }, { 'RESULT', 'STRING' }, { 'RESULT_TYPE', 'STRING' }, { 'RESULT_CODE', 'STRING' }, { 'RESULT_DATETIME', 'DATETIME' } });</Expression></CodeNode><CodeNode displayNam

TableRowsAdd(_G_IO_INSERT_TABLE_VALUES, { { _RQST_TCKN_1J2FM_C, _TODAYS_DATETIME } });</Expression></CodeNode><CodeNode displayName="Cell" name="DGEHRLGYPJCAU3HN"><Transition name="ToReply"><Rule>true</Rule><DestinationNodeName>BEFCQDTZUJGITU1X</Destinatio

_CELL_DESC=.;

_RESPONSE_TRACKING_CODE="10380201";

_TOTAL_TREATMENTS = 0;

</Expression></CodeNode><CodeNode displayName="" name="standardReplyContext"><Description/><Transition name="TostandardReplyContext_3"><Rule>true</Rule><DestinationNodeName>standardReplyContext_3</DestinationNodeName></Transition><Expression>_CELL_NAME="";

_CELL_DESC="";

_REPLY_PACK_CODE="1039";

</Expression></CodeNode></FlowDefinition></GetFlowResponse>

RW9
Diamond | Level 26 RW9
Diamond | Level 26

The first way I thought about was to have a trigger on/off e.g.:

...

     retain flag;

     if _n_=1 then flag=0;

     if index(buffer,"<FlowDefinition")>0 then flag=1;

     if flag=1 then do;

          do you processing here

     end;

     if index(buffer,"/FlowDefinition>")>0 then flag=0;

...

Ksharp
Super User

Code: Program4.sas

data have;
infile cards length=len ;
input x $varying2000. len;
cards;
<GetFlowResponse xmlns="?"><FlowDefinition eventName="KKB_Bireysel_Master" lastModifiedBy="sasdemo" modified="2015-04-21T15:27:05.840Z" created="2015-04-21T15:27:05.840Z" displayName="Campaign279:Shared Data\Decision Tree:KKB Business Context" name="Campaign279_1_DFDFEPEM5ZGTUVVA">
  <Description>Campaign279:Shared Data\Decision Tree:KKB Business Context
</Description>
…………….
…………
</FlowDefinition></GetFlowResponse>
;
run;

data x;
infile cards length=len ;
input x $varying2000. len;
cards;
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:rtd="?">
  <soapenv:Header/>
  <soapenv:Body>
  <rtd:SubmitSimulation>
  <rtd:SessionContextId>?</rtd:SessionContextId>
  <rtd:RepositoryName>?</rtd:RepositoryName>
  <!--Zero or more repetitions:-->
  <rtd:FlowDefinition name="?" displayName="" created="?" modified="?" lastModifiedBy="?" activated="?" eventName="?" timeout="0" timeoutEnabled="false">
…………….
…………
</rtd:FlowDefinition>
  <!--Zero or more repetitions:-->
  <rtd:GlobalValue name="?">
  <!--Zero or more repetitions:-->
  <rtd:Value>?</rtd:Value>
  </rtd:GlobalValue>
  <rtd:SimulationDescription eventName="?" inLibraryName="?" inTableName="?" outLibraryName="?" outTableName="?" statsLibraryName="?" statsTableName="?" overwriteOutputTable="?" multiThreaded="?" timeZoneOptions="?" timeZoneColumnOrId="?"/>
  </rtd:SubmitSimulation>
  </soapenv:Body>
</soapenv:Envelope>
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:rtd="?">
  <soapenv:Header/>
  <soapenv:Body>
  <rtd:SubmitSimulation>
  <rtd:SessionContextId>?</rtd:SessionContextId>
  <rtd:RepositoryName>?</rtd:RepositoryName>
  <!--Zero or more repetitions:-->
  <rtd:FlowDefinition name="?" displayName="" created="?" modified="?" lastModifiedBy="?" activated="?" eventName="?" timeout="0" timeoutEnabled="false">
…………….
…………
</rtd:FlowDefinition>
  <!--Zero or more repetitions:-->
  <rtd:GlobalValue name="?">
  <!--Zero or more repetitions:-->
  <rtd:Value>?</rtd:Value>
  </rtd:GlobalValue>
  <rtd:SimulationDescription eventName="?" inLibraryName="?" inTableName="?" outLibraryName="?" outTableName="?" statsLibraryName="?" statsTableName="?" overwriteOutputTable="?" multiThreaded="?" timeZoneOptions="?" timeZoneColumnOrId="?"/>
  </rtd:SubmitSimulation>
  </soapenv:Body>
</soapenv:Envelope>
;
run;



data tag;
set have;
retain found;
p=find(x,'<FlowDefinition');
if p then do;
  found=1;
  x=cats('<ns2:',substr(x,p+1));
end;
p=find(x,'</FlowDefinition>');
if p then do;
  x=cats('</ns2:',substr(x,p+2,15));
end;
if find(lag(x),'</FlowDefinition>') then found=0;
if found;
keep x;
run;

data temp;
set x;
retain found;
if find(x,'<rtd:FlowDefinition') then found=1;
if find(lag(x),'</rtd:FlowDefinition>') then found=0;
if not found or (not lag(found) and found);
run;
data want;
set temp;
if not found then output;
   else do;
   do i=1 to nobs;
   set tag point=i nobs=nobs;
   output;
   end;
   end;
run;

sas-innovate-2024.png

Join us for SAS Innovate April 16-19 at the Aria in Las Vegas. Bring the team and save big with our group pricing for a limited time only.

Pre-conference courses and tutorials are filling up fast and are always a sellout. Register today to reserve your seat.

 

Register now!

What is Bayesian Analysis?

Learn the difference between classical and Bayesian statistical approaches and see a few PROC examples to perform Bayesian analysis in this video.

Find more tutorials on the SAS Users YouTube channel.

Click image to register for webinarClick image to register for webinar

Classroom Training Available!

Select SAS Training centers are offering in-person courses. View upcoming courses for:

View all other training opportunities.

Discussion stats
  • 5 replies
  • 1140 views
  • 1 like
  • 3 in conversation