[megaloman]

Jeka124, До меня не сразу дошло: у Вас есть бланк, надо преобразовать входные файлы в соответствии с бланком.

Вот вариант, но работать он будет медленно, сохранить в UTF

Код:

@Echo Off
	Set "BoxIn=Z:\Box_In"
	Set "Mask=*.txt"
	Call :KeyWord
	Pushd "%BoxIn%" && FOR /F "usebackq delims=" %%f IN (`2^>nul Dir "%Mask%" /B /A:-D`) DO (
		Echo %%f
		>"%%f.tmp" (FOR /F "usebackq delims==" %%k IN (`Set "@@"`) DO (More "%%f"|Call Find /I "%%%%k%%"))
		>nul Move /Y "%%f.tmp" "%%f"
	)
	Popd
Exit /B

:KeyWord
	Set "@@01=Код ЕГРПОУ:"
	Set "@@02=Полное название:"
	Set "@@03=Сокращенное название:"
	Set "@@04=Тип ЗОСО:"
	Set "@@05=Ступень:"
	Set "@@06=Форма собственности:"
	Set "@@07=Тип местности:"
	Set "@@08=Индекс:"
	Set "@@09=Почтовый адрес:"
	Set "@@10=Код КОАТУУ:"
	Set "@@11=Телефоны:"
	Set "@@12=E-mail:"
	Set "@@13=Директор:"
	Set "@@14=Куратор ЗОСО:"
	Set "@@15=Уполномоченное лицо:"
	Set "@@16=Количество учащихся:"
	Set "@@17=Количество персонала:"
	Set "@@18=Количество классов:"
	Set "@@19=Бюджетирование (основатель):"
Exit /B