Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M Новый топик    Ответить
 Открыть файл  [new]
Valeriu
Member

Откуда: Chisinau
Сообщений: 2042
Доброго дня !

Как открыть файл (Линукс) командами
Каше и записать в нем.
например:

s file="/tmp/log"
u file w "Записать" c file

Спасибо.
25 янв 19, 16:04    [21794411]     Ответить | Цитировать Сообщить модератору
 Re: Открыть файл  [new]
Блок А.Н.
Member

Откуда: Новосибирск
Сообщений: 3796
Собственно, забыли команду open
https://docs.intersystems.com/latest/csp/docbook/DocBook.UI.Page.cls?KEY=RCOS_copen

Но я предпочитаю работать через классы
25 янв 19, 16:41    [21794446]     Ответить | Цитировать Сообщить модератору
 Re: Открыть файл  [new]
Valeriu
Member

Откуда: Chisinau
Сообщений: 2042
Блок А.Н.,

Нет. Я забыл уточнить, НЕ через классы !
25 янв 19, 16:46    [21794451]     Ответить | Цитировать Сообщить модератору
 Re: Открыть файл  [new]
Блок А.Н.
Member

Откуда: Новосибирск
Сообщений: 3796
Valeriu,

Я понял, что вам нужна команда, и кинул ссылку на команду. А про классы всего-лишь добавил свое личное мнение.
25 янв 19, 16:58    [21794463]     Ответить | Цитировать Сообщить модератору
 Re: Открыть файл  [new]
Ptn
Member

Откуда:
Сообщений: 5
Valeriu,

set io= $io
set file="/tmp/log"
//open file:"SWAK\1251\"
open file:"SWAK\UTF8\"
if $t {
 use file 
 write "Записать" 
}
use io
close file
26 янв 19, 07:33    [21794701]     Ответить | Цитировать Сообщить модератору
 Re: Открыть файл  [new]
krvsa
Member

Откуда: г Волжский
Сообщений: 13116
Valeriu, в Каше используем такую функцию...

	/// Открыть файл
	/// [Параметры]
	/// File* - Имя файла
	/// Typ - Тип открытия (по умолчанию запись)
	/// Byte - Сместиться на количество байт
	/// Sym - Символы терминаторы
fOpen(File,Typ,Byte,Sym)
	n prt,i,set
	q:$g(File)="" ""
	q:":\/"[$e($re(File)) ""
	s:$g(Typ)="" Typ="WNS"
	s Typ=$s(Typ="R":"RS",Typ="W":"WNS",Typ="M":"RWU",1:Typ)
	i $zu(68,40,1)
	try {
		o File:(Typ::$g(Sym,$c(13,10))):0
	} catch {
		s File=""
	}
	q $s($t:File,1:"")
28 янв 19, 07:58    [21795459]     Ответить | Цитировать Сообщить модератору
 Re: Открыть файл  [new]
krvsa
Member

Откуда: г Волжский
Сообщений: 13116
Пример использования...

TOFILE
	n prt
	s prt=$$fOpen^zsys("Тут путь и имя файла")
	q:prt=""
	u prt
	w "Пример записи",!
	u $p
	c prt
	q
28 янв 19, 08:04    [21795460]     Ответить | Цитировать Сообщить модератору
Все форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M Ответить