| View previous topic :: View next topic |
| Author |
Message |
ZKS
Joined: 24 Jan 2003
Posts: 82
Location: ZKS
|
 Posted: 28 May 2004 06:36 Post subject: Шаблон Акт выполненных работ |
 |
|
Здравствуйте!
Модуль "Учет материальных запасов" - "Управление продажами" - "Акт выполненных работ". Сделан свой собственный шаблон. Акты выполненных работ забивают в конце месяца. Есть параметр DATAOPER мне нужно, чтобы он выводил месяц и год. А в БЭСТе-4 только день, месяц, год, дата прописью. Указываю месяц - при просмотре выводит номер месяца. Есть ли там функция копирования строки. Как в Паскале или Делфи: Copy(строка, индекс с которого копируется, число символов которые нужно скопировать). Если есть, то где найти описание функции. Переход на БЭСТ-5 предлагать не над |
|
| Back to top |
|
 |
integral
Joined: 19 Jul 2002
Posts: 378
Occupation: ОАО "Интеграл" инженер-программист
Interests: Нефтекамск
|
| Posted: 28 May 2004 07:43 Post subject: |
|
|
| Quote: | | Есть ли там функция копирования строки. Как в Паскале или Делфи: Copy(строка, индекс с которого копируется, число символов которые нужно скопировать). |
Есть называется substr
параметры аналогичны copy из делфей - строка, индекс с которого копируется, число символов которые нужно скопировать |
|
| Back to top |
|
|
ZKS
Joined: 24 Jan 2003
Posts: 82
Location: ZKS
|
| Posted: 28 May 2004 09:21 Post subject: |
|
|
| integral wrote: | | Quote: | | Есть ли там функция копирования строки. Как в Паскале или Делфи: Copy(строка, индекс с которого копируется, число символов которые нужно скопировать). |
Есть называется substr
параметры аналогичны copy из делфей - строка, индекс с которого копируется, число символов которые нужно скопировать |
Параметр DATAOPER имеет тип Дата.
SUBSTR(строка, индекс, число символов) - или есть еще параме |
|
| Back to top |
|
|
Дорогой Денис
Joined: 09 Apr 2003
Posts: 37
Location: Дорогой Денис
Occupation: Алтай-Интеллект-Сервис
Interests: Барнаул
|
| Posted: 28 May 2004 13:44 Post subject: |
|
|
| Функция DTOS (Date) - преобразует дату в строку, ну а дальше Substr() |
|
| Back to top |
|
|
Bestovichek
Joined: 22 Mar 2002
Posts: 257
|
| Posted: 28 May 2004 13:54 Post subject: |
|
|
ну тогда только не DTOS, а DTOC
DTOS переворачивает дату 20040528 |
|
| Back to top |
|
|
ZKS
Joined: 24 Jan 2003
Posts: 82
Location: ZKS
|
| Posted: 31 May 2004 05:03 Post subject: |
|
|
| Bestovichek wrote: | ну тогда только не DTOS, а DTOC
DTOS переворачивает дату 20040528 |
Прошу прощения за не точность информации. Мне нужна дата прописью
Например: апрель 2004 год. |
|
| Back to top |
|
|
Титов Александр
Joined: 26 Jul 2002
Posts: 975
Location: Титов Александр Александрович
Occupation: Компания БЭСТ
Interests: Москва
|
| Posted: 31 May 2004 07:04 Post subject: |
|
|
| ZKS wrote: | | Bestovichek wrote: | ну тогда только не DTOS, а DTOC
DTOS переворачивает дату 20040528 |
Прошу прощения за не точность информации. Мне нужна дата прописью
Например: апрель 2004 год. |
Если DATE() - текущая дата и равна сегодняшнему последнему дню весны, то:
CMONTH(Date()) // Результат: Май - строка
YEAR(Date()) // Результат: 2004 - число
Более полные функции построения даты прописью могут выглядеть например так:
FUNCTION MyStrData(d)
//----------------------------------------------------------------------------//
// Пеpевод даты в стpоку с наим. месяца
PRIVATE cDay := PADL(NTOC(Day(d)),2,"0")
PRIVATE cYear:= AllTrim(Str(Year(d)))
RETURN cRet := IF(EMPTY(d),"",(cDay + ' ' + RCMonth(d) + ' ' + cYear))
FUNCTION RCMonth(dDate, cM) // Перевод месяца в строку со склонением, типа "сентября" или "марта"
RETURN (IF(RIGHT(cM := LOWER(CMonth(dDate)), 1) $ "Тт",;
cM + "а", STUFF(cM, Len(cM), 1, "я")))
Для получения более подробной информации можно почитать HELP по клипперу, который входит в поставку БЭСТ-4, в разделе для разработчика (Develop)
_________________
С уважением, Александр Титов, Компания БЭСТ, Москва, отдел разрабо |
|
| Back to top |
|
|
ZKS
Joined: 24 Jan 2003
Posts: 82
Location: ZKS
|
| Posted: 31 May 2004 07:52 Post subject: |
|
|
| Титов Александр wrote: | | ZKS wrote: | | Bestovichek wrote: | ну тогда только не DTOS, а DTOC
DTOS переворачивает дату 20040528 |
Прошу прощения за не точность информации. Мне нужна дата прописью
Например: апрель 2004 год. |
Если DATE() - текущая дата и равна сегодняшнему последнему дню весны, то:
CMONTH(Date()) // Результат: Май - строка
YEAR(Date()) // Результат: 2004 - число
Более полные функции построения даты прописью могут выглядеть например так:
FUNCTION MyStrData(d)
//----------------------------------------------------------------------------//
// Пеpевод даты в стpоку с наим. месяца
PRIVATE cDay := PADL(NTOC(Day(d)),2,"0")
PRIVATE cYear:= AllTrim(Str(Year(d)))
RETURN cRet := IF(EMPTY(d),"",(cDay + ' ' + RCMonth(d) + ' ' + cYear))
FUNCTION RCMonth(dDate, cM) // Перевод месяца в строку со склонением, типа "сентября" или "марта"
RETURN (IF(RIGHT(cM := LOWER(CMonth(dDate)), 1) $ "Тт",;
cM + "а", STUFF(cM, Len(cM), 1, "я")))
Для получения более подробной информации можно почитать HELP по клипперу, который входит в поставку БЭСТ-4, в разделе для разработчика (Develop) |
Спасибо помогло.
Вопрос следующий. Многие функции аналогичны функциям Клиппера? |
|
| Back to top |
|
|
Титов Александр
Joined: 26 Jul 2002
Posts: 975
Location: Титов Александр Александрович
Occupation: Компания БЭСТ
Interests: Москва
|
| Posted: 31 May 2004 08:38 Post subject: |
|
|
| ZKS wrote: | | Вопрос следующий. Многие функции аналогичны функциям Клиппера? |
Да все 
_________________
С уважением, Александр Титов, Компания БЭСТ, Москва, отдел разрабо |
|
| Back to top |
|
|
ZKS
Joined: 24 Jan 2003
Posts: 82
Location: ZKS
|
| Posted: 01 Jun 2004 10:33 Post subject: |
|
|
Еще один вопрос на засыпку.
В 1С при формировании отчетов можно запрограммировать, чтобы отчет печатался по 2 или 3 экземпляра.
В БЭСТ-е такое возможно. Для счет-фактур, актов выполненных рабо |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
