anchor.diff:              else
               begin
                 SetLength(arrVal, AJsonArray.Size);
  -             { lCurrentProp := nil;
  -              lGetEnumMethod := TSvRttiInfo.GetBasicMethod('GetEnumerator', AType);
  -              lGetCurrentMethod := TSvRttiInfo.GetBasicMethod('GetCurrent', AType);
  -              if Assigned(lGetEnumMethod) then
  -              begin
  -                //enumerator exists
  -                lEnumerator := lGetEnumMethod.Invoke(AValue,[]);
  -                lEnumType :=  TSvRttiInfo.GetType(lEnumerator.TypeInfo);
  -                lCurrentProp := lEnumType.GetProperty('Current');
  -              end;   }
  -
  -
  -
   
                 for i := 0 to Length(arrVal)-1 do
                 begin
  
positive.code:               if Assigned(obj) then
                begin
                  AValue := obj;
  
                //  Result := AValue;
  
                  bCreated := True;
                end;
              end;
  
negative.code: 
          if Assigned(AJsonVal) and (AJsonVal is TJSONObject) then
          begin
            FMainObj := TJSONObject(AJsonVal);          
          end;
        end;
        
  