anchor.diff:        col
       );END progn
     );END if
  -)
  -(defun NL_GetTextFormatted ( infoString infoStringSize / txt s )
  +
  +  ; v0.1 - 2017.09.18 - refactoring
  +  ; v0.0 - 2016.??.?? - First issue
  +  ; Author: David Torralba
  +  ; Last revision: 2017.09.18
  +)
  +(defun DT:NL_GetTextFormatted ( infoString infoStringSize / txt s )
     ; Format text correctly and concatenate it
     (setq txt "\n")
     (mapcar
  
positive.code:     infoString
    );END mapcar
    txt
  )
  (defun c:Convert3DpolyTo2Dpoly ( / old_error old_sysvars iSuccess iFail )
    ; Convert multiple 3Dpolylines to 2Dpolylines
  
negative.code:     );END if
      nil
    );END if
  
    ; v0.1 - 2017.09.18 - refactoring
    ; v0.0 - 2016.??.?? - First issue
    ; Author: David Torralba
    ; Last revision: 2017.09.18
  )
  (defun DT:NestedEntityNames ( ename / i info )
    ; Returns a list with nested entity names, being the parent first one and deepest child last one
    (if (DT:Arg 'DT:NestedEntityNames '((ename 'list)))
      (progn
        (setq
          i 0
          info (list (list "Level" "Type" "Block name" "Object layer") (DT:EntityInfo (car ename)) )
        )
        (if (nth 3 ename) ; if any nested entity
          (progn
            (setq nestedLevels (length (nth 3 ename)) )
            (foreach x (nth 3 ename)
              (setq
                i (+ i 1)
                info (append info (list (DT:EntityInfo x)))
              )
            );END foreach
          );END progn
        );END if
        info
      );END progn
    );END if
  
    ; v0.1 - 2017.09.18 - refactoring
    ; v0.0 - 2016.??.?? - First issue
    ; Author: David Torralba
    ; Last revision: 2017.09.18
  )
  (defun DT:ChangeEnameForLevel ( info / i x )
    ; Return info replacing ename for level
    (if (= 'list (type info))
      (progn
  