Чтение/запись YML

 Чтобы строки начинающиеся с кавычек корректно загружались в python необходимо заключать строку в одинарные кавычки:

yaml.dump({'US':r""""USA""",'GB':r"""'Great Bri'tain"""})

выведет:

GB: '''Great Bri''tain'

US: '"USA'

Таким образом двойные кавычки в начале строки экранируются одинарными, а одинарные - дублированием:

" -> '"' 

" -> '"'

' -> ''''

' -> ''''

Значение = СокрЛП(Элемент.Значение);
Если Лев(Значение, 1) = """" Тогда
  Значение = "'" + Значение +"'";
ИначеЕсли Лев(Значение, 1) = "'" Тогда
  Значение = "'" + СтрЗаменить(Значение, "'", "''") +"'"; // python yaml
КонецЕсли;

ArraysOfArrays:
 - trade1:
     - док1
     - док2
 - trade3:
     - док3
     - док4

&НаСервере
Функция ДесериализоватьYML(Текст)
	ТекущийОбъект = Неопределено;
	
	ТекущийТекст = "";
	Отступ       = "";
	Для Каждого Строка Из СтрРазделить(Текст, Символы.ПС) Цикл
		
		Если СтрНачинаетсяС(СокрЛ(Строка), "#") Тогда
			Продолжить;
		КонецЕсли; 
		
		СтрокаБезОтступа = СокрЛ(Строка);
		Если ПустаяСтрока(СтрокаБезОтступа) Тогда
		     Продолжить;
		КонецЕсли;
		ТекущийОтступ = Сред(Строка, 0, СтрДлина(Строка) - СтрДлина(СтрокаБезОтступа));
		
		Если Отступ = ТекущийОтступ И ЗначениеЗаполнено(ТекущийТекст) Тогда
			Обработать(ТекущийОбъект, ТекущийТекст);
			ТекущийТекст = Строка;
		Иначе 
			ТекущийТекст = ТекущийТекст + ?(ЗначениеЗаполнено(ТекущийТекст), Символы.ПС, "") + Строка;
		КонецЕсли; 
		
	КонецЦикла; 
	
	Если ЗначениеЗаполнено(ТекущийТекст) Тогда
		Обработать(ТекущийОбъект, ТекущийТекст);
	КонецЕсли; 
	
	Возврат ТекущийОбъект;
	
КонецФункции

&НаСервере
Процедура Обработать(ТекущийОбъект, ТекущийТекст)
	
	Если ТекущийОбъект = Неопределено Тогда
		НачинаетсяСДефиса = СтрНачинаетсяС(СокрЛ(ТекущийТекст), "-");
		ТекущийОбъект = ?(НачинаетсяСДефиса, Новый Массив, Новый СписокЗначений);
	КонецЕсли; 
	
	Если ТипЗнч(ТекущийОбъект) = Тип("Массив") Тогда
		
		ПозицияЭлементаМассива = СтрНайти(ТекущийТекст, "-");
		ЗначениеЭлементаМассива = Лев(ТекущийТекст, ПозицияЭлементаМассива - 1) + " " + Сред(ТекущийТекст, ПозицияЭлементаМассива + 1);
		ЗначениеЭлементаМассива = УбратьОбщийОтступ(ЗначениеЭлементаМассива);
		
		Если СтрНайти(ЗначениеЭлементаМассива, Символы.ПС) = 0 И (СтрНайти(ЗначениеЭлементаМассива, ":") = 0 ИЛИ СтрНачинаетсяС(СокрЛ(ЗначениеЭлементаМассива), """")) Тогда
			ТекущийОбъект.Добавить(ЗначениеЭлементаМассива);
		Иначе
			ТекущийОбъект.Добавить(ДесериализоватьYML(ЗначениеЭлементаМассива));
		КонецЕсли; 
		
	Иначе
		
		ПозицияРазделителя = СтрНайти(ТекущийТекст, ":");
		ПозицияПереводаСтроки = СтрНайти(ТекущийТекст, Символы.ПС);
		КлючСтруктуры = Сред(ТекущийТекст, 0, ПозицияРазделителя - 1);
		
		Если ПозицияПереводаСтроки = 0 Тогда
			ТекущийОбъект.Добавить(Сред(ТекущийТекст, ПозицияРазделителя + 2), КлючСтруктуры);
		Иначе
			ТекстБезОтступа = УбратьОбщийОтступ(Сред(ТекущийТекст, ПозицияПереводаСтроки + 1));
			ТекущийОбъект.Добавить(ДесериализоватьYML(ТекстБезОтступа), КлючСтруктуры);
		КонецЕсли; 
		
	КонецЕсли; 
	
КонецПроцедуры

&НаКлиентеНаСервереБезКонтекста
Функция УбратьОбщийОтступ(Текст)
	
	Отступ = СтрДлина(Текст);
	МассивСтрок = СтрРазделить(Текст, Символы.ПС);
	Для Каждого Строка Из МассивСтрок Цикл
		СтрокаБезОтступа = СокрЛ(Строка);
		Отступ = Мин(Отступ, СтрДлина(Строка) - СтрДлина(СтрокаБезОтступа))
	КонецЦикла; 
	
	Для Счетчик = 0 По МассивСтрок.ВГраница() Цикл
		МассивСтрок[Счетчик] = Сред(МассивСтрок[Счетчик], Отступ + 1);
	КонецЦикла; 
	
	Возврат СтрСоединить(МассивСтрок, Символы.ПС);
	
КонецФункции

&НаКлиентеНаСервереБезКонтекста
Функция YMLСериализатор(Структура, Знач КоличествоОтступов = 0)
	
	Ответ = "";
	Разд = "  ";
	
	Для Каждого Элемент Из Структура Цикл
		
		ТипЗначения = ТипЗнч(Элемент.Значение);
		Для Итератор = 1 По КоличествоОтступов Цикл
			Ответ = Ответ + Разд;
		КонецЦикла; 
		
		Если ТипЗначения = Тип("Структура") ИЛИ ТипЗначения = Тип("Соответствие") Тогда
			
			Ответ = Ответ + СтрШаблон("%1: 
			                          |%2", 
			                          Элемент.Ключ, 
			                          YMLСериализатор(Элемент.Значение, КоличествоОтступов + 1));
		ИначеЕсли ТипЗначения = Тип("Массив") Тогда
			Ответ = Ответ + 
			СтрШаблон("%1:
			          |", Элемент.Ключ);

			Для Каждого ЭлементМассива Из Элемент.Значение Цикл
				Для Итератор = 1 По КоличествоОтступов Цикл
					Ответ = Ответ + Разд;
				КонецЦикла; 
				Если ТипЗнч(ЭлементМассива) = Тип("Структура") 
					ИЛИ ТипЗнч(ЭлементМассива) = Тип("Соответствие") 
					ИЛИ ТипЗнч(ЭлементМассива) = Тип("Массив") Тогда
					Ответ = Ответ + СтрШаблон(Разд + "- %1", 
					                          СокрЛ(YMLСериализатор(ЭлементМассива, КоличествоОтступов + 2)));
				Иначе
					Ответ = Ответ + Разд +
					СтрШаблон("- %1
					          |", ЭлементМассива);
				КонецЕсли;
			КонецЦикла;
		Иначе
			
			СтроковоеПредставление = Строка(Элемент.Значение);
			
			Ответ = Ответ + 
			СтрШаблон("%1: %2
			          |", Элемент.Ключ, СтроковоеПредставление);
		КонецЕсли; 
		
	КонецЦикла; 
	
	Возврат Ответ;
	
КонецФункции

Регистры:
  - РегистрНакопления.АвансовыеПлатежиИностранцевПоНДФЛ
Ссылки:
  - "(56d0d36f-306e-11ee-841a-e16e604b2373) Авансовый отчет 0000-000001 от 01.08.2023 16:21:36"
  
doe: "a deer, a female deer"
ray: "a drop of golden sun"
pi: 3.14159
xmas: true
french-hens: 3
calling-birds:
  - huey
  - dewey
  - louie
  - fred
xmas-fifth-day:
  calling-birds: four
  french-hens: 3
  golden-rings: 5
  partridges:
    count: 1
    location: "a pear tree"
  turtle-doves: two
  
foo: bar
pleh: help
stuff:
  foo: bar
  bar: foo
  
name: AWS-CD

on:
  push:
    branches:
      - master
jobs:
  build:
    runs-on: ubuntu-latest
      steps:
        - uses: actions/checkout@v1
        - name: Install Node packages
          run: npm install
        - name: Build the project
          run: npm run build
        - name: Deploy to S3
          run: AWS_ACCESS_KEY_ID=${AWS_ACCESS_KEY}
		  
# This is a comment
title: This is some YAML
publisher: ConvertSimple Books
pages: 250
chapters: 21
time_to_read: 12 hours
descriptors:
  - fun
  - entertaining
  - exciting
contributors:
  author: Mark Templeton
  editor: Cindy Johnson