(defun put-data-draw-ramka-planshet (patch-list-dialog list-dialog / list_cell)
  ; запись данных для заполнения граф текущего планшета
  
  (vlax-ldata-put "geo_tools_dictionary" "data-draw-ramka-planshet" patch-list-dialog)
  (foreach x list-dialog
    (setq list_cell (append list_cell (list (convert-list-to-string-be-delimiter x "|"))))
    )
  (file_write_list_to_file patch-list-dialog list_cell)
  )