Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Caché Новый топик    Ответить
Топик располагается на нескольких страницах: Ctrl  назад   1 2 [3]      все
 Re: Помогите новичку, проблема с базой  [new]
Блок А.Н.
Member

Откуда: Новосибирск
Сообщений: 3411
Ермалай,

Не понимая, что делает ваша программа и какие исходные данные, сложно что-то рекомендовать.
Но попробуйте

F91	S I=0,GD=0
S GD=$O(Z(GD)) G END:GD="" S CRR=0 F J=1:1:5 {S T1(J)=0}
S CRR=$O(Z(GD,CRR)) G F91+5:CRR="" S VN=0 S MJD=$S(CRR=1:"в т.ч. Международные",CRR=3:"Внутренние")
S VN=$O(Z(GD,CRR,VN)) G F91+2:VN="" S NN=0 F J=1:1:5 {S T(J)=0} S:VN="O" VVN="ОТПРАВЛЕНО" s:VN="P" VVN="ПРИБЫЛО"
S NN=$O(Z(GD,CRR,VN,NN)) G F91+3:NN="" S T=$G(Z(GD,CRR,VN,NN)) F J=1:1:5 {S T(J)=$P(T,"\",J),T1(J)=T1(J)+T(J)} G F91+4
S I=I+1  S ^RPL2(2)=$g(^RPL2(2),5_"\"_GD) _"\"_T1(1)  G F91+1


Хотя эту калечную прогу проще заново написать, чем править. И есть подозрение, что она у вас в том виде уже не работает.
9 фев 17, 16:16    [20197435]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Ермалай
Member

Откуда: Бишкек
Сообщений: 14
Хехеех стока букав и критики! Мне свой код абсолютно понятен и очень удобно мне самому читабельно. Конечно у каждого свой почерк как говорится. По делу там переменная T1(1) постоянно меняется поскольку перебирает ветку значение и возвращает ее. Вопрос был в том как записать в глобал как показано на первом скриншоте по горизонтали с косой разделителем все переменные которые возвращаются. Ну т.е. F i=1:1:10 T1(1),"\",10 ну не знаю что то типа того короче. Я ж говорю что я новичок сильно не пинайте. Тока начинаю изучать каши еще...
10 фев 17, 05:37    [20198897]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Ермалай
Member

Откуда: Бишкек
Сообщений: 14
Блок А.Н.
Ермалай,

Это, конечно, чудо: G F91+4
И две метки с разными названиями, одна F9I, а другая F91.
Прям не уверен, что это человек, а не киборг писал какой-нибудь.

патсталом
10 фев 17, 07:18    [20198944]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
krvsa
Member

Откуда: г Волжский
Сообщений: 12702
Ермалай
Мне свой код абсолютно понятен и очень удобно мне самому читабельно.
...
Вопрос был в том как записать в глобал как показано на первом скриншоте

Если программа читабельна и понятна, такие вопросы не возникают.
10 фев 17, 08:24    [20199035]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
krvsa
Member

Откуда: г Волжский
Сообщений: 12702
Ермалай
Хехеех стока букав и критики!

Потом люди смотрят такие "шедевры" и хают весь М-язык...
10 фев 17, 08:26    [20199039]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Langobard
Member

Откуда: Новосибирск
Сообщений: 23
Ермалай
Хехеех стока букав и критики! Мне свой код абсолютно понятен и очень удобно мне самому читабельно. Конечно у каждого свой почерк как говорится.

Структурирование кода - это не блажь, а необходимость, которую Вы пока не осознаете.
Это сейчас он для Вас "понятен", а откроете через пару-тройку лет...
Не говоря уж про то, что другие Вас будут матер поминать недобрым словом :-)
10 фев 17, 08:30    [20199051]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Ермалай
Member

Откуда: Бишкек
Сообщений: 14
Что бы там не было, Блок А.Н. благодарю за подсказку! Правда я ее немного переделал но это стало идеей создания другой идеи. ЛОЛ. А вот собственно результат которого я добился. Таблица правда еще больше я ее вырезал

К сообщению приложен файл. Размер - 99Kb
10 фев 17, 08:55    [20199139]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
krvsa
Member

Откуда: г Волжский
Сообщений: 12702
Ермалай
А вот собственно результат которого я добился. Таблица

Для создания таблиц не обязательно делать строчки "через разделитель"... ;)
10 фев 17, 09:03    [20199160]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
imdb
Member

Откуда: Москва
Сообщений: 105
Ермалай
Я ж говорю что я новичок сильно не пинайте. Тока начинаю изучать каши еще...

Ну тогда стоит открыть документацию и почитать примеры, например:
Averageloop
  SET sum=0
  FOR i=0:1 {
    READ !,"Number: ",num
    QUIT:num=""
    SET sum=sum+num
  }
  SET average=sum/i

или вот такой:
SET x=$ZUTIL(68,42)
  IF x=0 {
    WRITE !,"Initially standard format ",x
    WRITE !,"Standard $JOB format: ",$JOB
    SET y=$ZUTIL(68,42,1)
    WRITE !,"Extended $JOB format: ",$JOB
    SET y=$ZUTIL(68,42,0) ; restore setting
    QUIT
  }
  ELSE {
    WRITE !,"Initially extended format",x
    WRITE !,"Extended $JOB format: ",$JOB
    SET y=$ZUTIL(68,42,0)
    WRITE !,"Standard $JOB format: ",$JOB
    SET y=$ZUTIL(68,42,1) ; restore setting
  QUIT
  }


или вот пример с goto:
SET age=""
READ !,"What is your age? ",age QUIT:age=""
IF age<30 {
  SET loc="Young" }
ELSEIF (age>29)&(age<60) {
  SET loc="Midage" }
ELSEIF age>59 {
  SET loc="Elder" }
ELSE {
  WRITE "data input error"
  QUIT }
GOTO @loc
QUIT
Young
  WRITE !,"You're still young"
  QUIT
Midage
  WRITE !,"You're in your prime"
  QUIT
Elder
  WRITE !,"You have a lifetime of wisdom to impart"
  QUIT


Таким образом, Ваших "шедевров" там не наблюдаем. Так что если Вы новичок, то тем более должны начинать с чтения доков. И заявления "мне свой код абсолютно понятен и очень удобно мне самому читабельно" грозит задержать Вас в статусе новичка надолго. Да и вместо помощи сообщества Вы можете получить - "хехеех стока букав и критики".
10 фев 17, 10:03    [20199374]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Ермалай
Member

Откуда: Бишкек
Сообщений: 14
Все! Учту замечания. Будем развиваться. А скока з/п в среднем у "cache" прогеров в Рашн Федерейшн?
10 фев 17, 10:25    [20199461]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Mammonth
Member

Откуда:
Сообщений: 30
Ермалай
Все! Учту замечания. Будем развиваться. А скока з/п в среднем у "cache" прогеров в Рашн Федерейшн?

Для начала найди вакансию :)
10 фев 17, 10:27    [20199468]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
krvsa
Member

Откуда: г Волжский
Сообщений: 12702
У нас вроде есть вакансия на 30т.р...
10 фев 17, 11:11    [20199662]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Mammonth
Member

Откуда:
Сообщений: 30
krvsa
У нас вроде есть вакансия на 30т.р...

у нас вообще нет :( даже таких
10 фев 17, 11:34    [20199761]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
krvsa
Member

Откуда: г Волжский
Сообщений: 12702
Mammonth, потому как не всем выпадает такая честь! Работать на М...
10 фев 17, 11:49    [20199824]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
П.С.М.
Member

Откуда: Из СССР
Сообщений: 360
Ермалай
А скока з/п в среднем у "cache" прогеров в Рашн Федерейшн?

Mammonth
Для начала найди вакансию :)

:D т.ч. учи еще что-нибудь.
10 фев 17, 11:52    [20199837]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Mammonth
Member

Откуда:
Сообщений: 30
П.С.М.
Ермалай
А скока з/п в среднем у "cache" прогеров в Рашн Федерейшн?

Mammonth
Для начала найди вакансию :)

:D т.ч. учи еще что-нибудь.

Да знаю я и еще что-нибудь, но резюме открывают... опыт работы... "а чотакоекашэ" еще и старый... "нудавайдосвиданья", "мывамперезвоним", и мое любимое: "мывзялиболееподходящего" и вакансию перевешивают.
Но это уже не по теме.
10 фев 17, 12:27    [20199996]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
П.С.М.
Member

Откуда: Из СССР
Сообщений: 360
Mammonth,

Наверное, я как-то плохо свой прошлый ответ написал, т.к. я его больше Ермалай адресовал :), в том плане, что б ставку на одно только каше не делал.
10 фев 17, 12:52    [20200129]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Mammonth
Member

Откуда:
Сообщений: 30
П.С.М.
Mammonth,

Наверное, я как-то плохо свой прошлый ответ написал, т.к. я его больше Ермалай адресовал :), в том плане, что б ставку на одно только каше не делал.

это правильно :)
я вообще мультицитирование пытался сделать... но что-то пошло не так и меня намотало на бэкэнд форума
10 фев 17, 13:05    [20200193]     Ответить | Цитировать Сообщить модератору
 Re: Помогите новичку, проблема с базой  [new]
Langobard
Member

Откуда: Новосибирск
Сообщений: 23
Mammonth
Да знаю я и еще что-нибудь, но резюме открывают... опыт работы... "а чотакоекашэ" еще и старый... "нудавайдосвиданья", "мывамперезвоним", и мое любимое: "мывзялиболееподходящего" и вакансию перевешивают.
Но это уже не по теме.

Ой, да не нойте...
Логика у Вас пропала? Или что Вы такого пропустили, работая на Cache'?
10 фев 17, 19:29    [20201744]     Ответить | Цитировать Сообщить модератору
Топик располагается на нескольких страницах: Ctrl  назад   1 2 [3]      все
Все форумы / Caché Ответить