Json в 1С 7.7

[trad]

[
    {
        "set_code": "001",
        "items": [
            {
                "marketplace": "W",
                "article": 1223423,
                "article_post": "3243243",
                "barcode": 3242354435
            },
            {
                "marketplace": "O",
                "article": 234324324,
                "article_post": "КОД-Н2",
                "barcode": 3243234
            }
        ]
    },
    {
        "set_code": "002",
        "items": [
            {
                "marketplace": "W",
                "article": 1223423,
                "article_post": "3243243",
                "barcode": 3242354435
            },
            {
                "marketplace": "O",
                "article": 234324324,
                "article_post": "КОД-Н2",
                "barcode": 3243234
            }
        ]
    }
]

[SnakePlisskin]

[
    {
        "set_code": "001",
        "items": [
            {
                "marketplace": "W",
                "article": 1223423,
                "article_post": "3243243",
                "barcode": 3242354435
            },
            {
                "marketplace": "O",
                "article": 234324324,
                "article_post": "КОД-Н2",
                "barcode": 3243234
            }
        ]
    },
    {
        "set_code": "002",
        "items": [
            {
                "marketplace": "W",
                "article": 1223423,
                "article_post": "3243243",
                "barcode": 3242354435
            },
            {
                "marketplace": "O",
                "article": 234324324,
                "article_post": "КОД-Н2",
                "barcode": 3243234
            }
        ]
    }
]

Да, именно то что хотел, но почему такой код тогда не срабатывает ?

   СЗ = СоздатьОбъект("СписокЗначений");       
    тзНоменклатур.ВыбратьСтроки();
    Пока тзНоменклатур.ПолучитьСтроку() = 1 Цикл
        текЗначКода = СокрП(тзНоменклатур.Код_Номенеклатуры);
        Данные = СоздатьОбъект("Структура");
        Данные.Вставить("Code",текЗначКода);
        Данные.Вставить("Items",СоздатьОбъект("СписокЗначений"));
        сзКлюч = СоздатьОбъект("СписокЗначений");
        сзКлюч.ДобавитьЗначение(текЗначКода);
        итзВыборка.Подмножество(сзКлюч,1,"ИндексПоле");
        итзВыборка.ВыбратьСтроки("ИндексПоле");
        Пока итзВыборка.ПолучитьСтроку("ИндексПоле") = 1 Цикл           
            Элемент = СоздатьОбъект("Структура");
            Элемент.Вставить("Маркетплейс",Строка(итзВыборка.Маркетплейс));
            Элемент.Вставить("Артикул",итзВыборка.Артикул);
            Элемент.Вставить("АртикулПОставщика",итзВыборка.АртикулПОставщика);
            Элемент.Вставить("Штрихкод",итзВыборка.Штрихкод);
            Данные.items.ДобавитьЗначение(Элемент);
        КонецЦикла;
        СЗ.ДобавитьЗначение(Данные);
    КонецЦикла;

Обошелся, пока "линейным файлом" но хотелось бы понять где ошибка ?

[trad]

но почему такой код тогда не срабатывает

подробнее про "не срабатывает"