Здравствуйте, гость ( Войти | Зарегистрироваться )
ТекстФайла=СоздатьОбъект("Текст"); ТекстФайла.ДобавитьСтроку("<?xml version=""1.0"" encoding=""windows-1251""?>"); ТекстФайла.ДобавитьСтроку("<DECLAR xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"" xsi:noNamespaceSchemaLocation=""F1203001.XSD"">"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+"<DECLARHEAD>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<TIN>2617415735</TIN>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<C_DOC>F12</C_DOC>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<C_DOC_SUB>030</C_DOC_SUB>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<C_DOC_VER>1</C_DOC_VER>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<C_DOC_TYPE>0</C_DOC_TYPE>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<C_DOC_CNT>41</C_DOC_CNT>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<C_REG>06</C_REG>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<C_RAJ>08</C_RAJ>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<PERIOD_MONTH>4</PERIOD_MONTH>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<PERIOD_TYPE>1</PERIOD_TYPE>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<PERIOD_YEAR>2017</PERIOD_YEAR>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<C_STI_ORIG>0608</C_STI_ORIG>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<C_DOC_STAN>1</C_DOC_STAN>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<LINKED_DOCS xsi:nil=""true""/>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<D_FILL>24042017</D_FILL>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<SOFTWARE>MEDOC</SOFTWARE>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+"</DECLARHEAD>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+"<DECLARBODY>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<HTYPR>0</HTYPR>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<HFILL>03589717</HFILL>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<HNUM>249</HNUM>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<HNUM1 xsi:nil=""true"" />"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<HNAMESEL>ФОП Калачун Григорій Михайлович</HNAMESEL>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<HNAMEBUY>ОГІЕНКО ВАСИЛЬ ВАСИЛЬОВИЧ</HNAMEBUY>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<HKSEL>2617415735</HKSEL>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<HKBUY>2523608675</HKBUY>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<R01G1>2710131894</R01G1>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<R01G2S>товар</R01G2S>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<R01G3>1823.60</R01G3>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<R01G4>2425.00</R01G4>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+СимволТабуляции+"<HBOS>Григорій Михайлович</HBOS>"); ТекстФайла.ДобавитьСтроку(""+СимволТабуляции+"</DECLARBODY>"); ТекстФайла.ДобавитьСтроку("</DECLAR>"); ТекстФайла.Записать("C:\DECLAR.xml"); Предупреждение("Файл записан"); ЗапуститьПриложение("C:\");