|
37 | 37 | ВсеТесты.Добавить("ТестДолжен_ЗаписатьТекущий_КонецЭлемента"); |
38 | 38 | ВсеТесты.Добавить("ТестДолжен_ЗаписатьТекущий_Текст"); |
39 | 39 | ВсеТесты.Добавить("ТестДолжен_ЗаписатьТекущий_CDATA"); |
| 40 | + ВсеТесты.Добавить("ТестДолжен_ЗаписатьТекущий_Комментарий"); |
| 41 | + ВсеТесты.Добавить("ТестДолжен_ЗаписатьТекущий_ПолноеКопирование"); |
40 | 42 |
|
41 | 43 | ВсеТесты.Добавить("ТестДолжен_ЗаписатьТекущий_ОбъявлениеИТипДокумента"); |
42 | 44 |
|
|
526 | 528 |
|
527 | 529 | КонецПроцедуры |
528 | 530 |
|
| 531 | +Процедура ТестДолжен_ЗаписатьТекущий_Комментарий() Экспорт |
| 532 | + |
| 533 | + Перем ЧтениеXML, ЗаписьXML; |
| 534 | + |
| 535 | + ПодготовитьТестовыеДанныеДляЗаписиТекущего(ЧтениеXML, ЗаписьXML); |
| 536 | + ДойтиДоИмени(ЧтениеXML, "БлокСКомментарием"); |
| 537 | + |
| 538 | + ЗаписьXML.ЗаписатьНачалоЭлемента("эл"); |
| 539 | + |
| 540 | + ПрочитатьИПроверитьТип(ЧтениеXML, ТипУзлаXML.ПробельныеСимволы); |
| 541 | + ЗаписьXML.ЗаписатьТекущий(ЧтениеXML); |
| 542 | + |
| 543 | + ПрочитатьИПроверитьТип(ЧтениеXML, ТипУзлаXML.Комментарий); |
| 544 | + ЗаписьXML.ЗаписатьТекущий(ЧтениеXML); |
| 545 | + |
| 546 | + ЗаписьXML.ЗаписатьТекст("Текст"); |
| 547 | + ЗаписьXML.ЗаписатьТекущий(ЧтениеXML); // можем записать ещё раз |
| 548 | + ЗаписьXML.ЗаписатьКонецЭлемента(); |
| 549 | + |
| 550 | + ПолученныйТекст = ЗаписьXML.Закрыть(); |
| 551 | + юТест.ПроверитьРавенство("<эл> <!-- Комментарий -->Текст<!-- Комментарий --></эл>", |
| 552 | + ПолученныйТекст, |
| 553 | + "Комментарий"); |
| 554 | + |
| 555 | +КонецПроцедуры |
| 556 | + |
| 557 | +Процедура ТестДолжен_ЗаписатьТекущий_ПолноеКопирование() Экспорт |
| 558 | + |
| 559 | + Перем ЧтениеXML, ЗаписьXML; |
| 560 | + |
| 561 | + ПодготовитьТестовыеДанныеДляЗаписиТекущего(ЧтениеXML, ЗаписьXML); |
| 562 | + |
| 563 | + Пока ЧтениеXML.Прочитать() Цикл |
| 564 | + ЗаписьXML.ЗаписатьТекущий(ЧтениеXML); |
| 565 | + КонецЦикла; |
| 566 | + |
| 567 | + ЗаписьXML.Закрыть(); |
| 568 | + |
| 569 | +КонецПроцедуры |
| 570 | + |
529 | 571 | Процедура ТестДолжен_ЗаписатьТекущий_ОбъявлениеИТипДокумента() Экспорт |
530 | 572 |
|
531 | 573 | Перем ЧтениеXML, ЗаписьXML; |
|
558 | 600 | | <ns:data inner=""123"" inner2=""456"" inner3=""789"">Some Text</ns:data> |
559 | 601 | | <ins:data xmlns:ins=""inner namespace mapping"" ins:attr=""1""></ins:data> |
560 | 602 | | <cdata><![CDATA[Некоторый текст]]></cdata> |
| 603 | + | <БлокСКомментарием> <!-- Комментарий --> </БлокСКомментарием> |
561 | 604 | |</xml>" |
562 | 605 | ; |
563 | 606 |
|
|
0 commit comments