anchor.diff:      %% io:format("Res3 = ~p~n",[Res3]),
       {reject, 500} /= Res3.
   
  -    
  +
   %% test creation of time_switch__cond_5 record
  - test16() ->  
  -     %% create cpl graph
  -     ScriptStr = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
  +test16() ->
  +    %% create cpl graph
  +    ScriptStr = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
        <cpl xmlns=\"urn:ietf:params:xml:ns:cpl\"
          xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\"
          xsi:schemaLocation=\"urn:ietf:params:xml:ns:cpl cpl.xsd \">
  
positive.code:     Request1 = sippacket:parse(RequestStr1, none),
      %% io:format("Request1 = ~p~n",[Request1]),
  
      %% additional process_cpl_script values 
      BranchBase = "foobar",     
      User = "foobar@su.se", 
      Backend = test_backend, 
      STHandler = dummy_sthandler, 
      Direction = incoming,
  
      %% io:format("1. ~n",[]),
  
negative.code: 
  
  
  %% test creation of time_switch__cond_5 record, until = COS DATE
  test18() ->
      %% create cpl graph
      %% dtstart = 2003-07-03 -> day = th
      ScriptStr = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
  