| View previous topic :: View next topic |
| Author |
Message |
Светлана
Joined: 22 Jul 2002
Posts: 416
Location: Эпштейн Светлана
Interests: Бердск, Новосибирская обл
|
 Posted: 15 Jan 2004 06:10 Post subject: Срочно! Кол-во отработанных часов в выходную форму! |
 |
|
| Возникла такая проблема. В ЖКО для предоставления субсидий требуют справки о зарплате с указанием отработанных дней(часов) и нормо-дней(часов) помесячно. У меня справка была сделана в АРМ “Зарплата» через «Выходные формы». Но теперь не могу придумать, как в эту справку вытащить дни(часы). Ведь нужны не только за текущий месяц, но и за прошедшие 6. Может есть какая функция или другой путь. Посоветуйте что-нибудь. Сейчас все идут за справками, бухгалтер ужу стонет. |
|
| Back to top |
|
 |
Умница
Joined: 25 Mar 2003
Posts: 35
|
| Posted: 15 Jan 2004 13:13 Post subject: |
|
|
Можно попробовать через FileEval.
Нарисовать шаблончик, а в нем сделать такую привязку:
Дни Часы
#### ####
#### ####
...
В колонке "Дни" к первой строке привязать:<Вычислить по формуле> | Code: | | fileeval("text1.txt",{I43,I44,I01}) |
Во второй и последующих строчках: | Code: | | avars[2],...,avars[12] |
Строк будет столько, за сколько месяцев нужны данные
В колонке "Часы", соответственно | Code: | | avars[13],...,avars[24] |
Получится следующее:
| Code: | Дни Часы
fileeval("text1.txt",{I43,I44,I01}) avars[13]
avars[2] avars[14]
avars[3] avars[15]
... |
При печати индивидуальной справки берутся данные из архива за тот период, который указывает бухгалтер при формировании справки.
А сам текст программки такой:
| Code: |
//apars[1]- дата начала
//apars[2]- дата конца
//apars[3]- табельный номер
if select("arc_tab")<>0
private i
aVars:=AFill(ARRAY(24),0)
i:=0
dbpush("arc_tab","01","",{"TNUM+CPERIOD",apars[3]+apars[1],apars[3]+apars[2]})
do while arc_tab->(!eof())
i:=i+1
avars[i]:=arc_tab->iday
avars[i+12]:=arc_tab->ihour
arc_tab->(dbskip())
enddo
dbpop()
avars[1]
endif |
Куда программу положить знаете? PRO\PLUGINS\PRINT\SALARY\.
Файл надо назвать TEXT1.TXT. Попробуй |
|
| Back to top |
|
|
Светлана
Joined: 22 Jul 2002
Posts: 416
Location: Эпштейн Светлана
Interests: Бердск, Новосибирская обл
|
| Posted: 16 Jan 2004 08:11 Post subject: |
|
|
| Попробовала. При выполнении выскакивает ошибка: BASE1122: Ошибка в аргументах TRANSFORM. И выбрасывает из программы вообще... |
|
| Back to top |
|
|
Светлана
Joined: 22 Jul 2002
Posts: 416
Location: Эпштейн Светлана
Interests: Бердск, Новосибирская обл
|
| Posted: 16 Jan 2004 08:33 Post subject: И вопрос к ИС |
|
|
| Почему в табличных документах я могу вытащить дни(часы) за любой месяц, а в выходных формах нет? |
|
| Back to top |
|
|
Умница
Joined: 25 Mar 2003
Posts: 35
|
| Posted: 16 Jan 2004 10:20 Post subject: |
|
|
| Светлана wrote: | | Попробовала. При выполнении выскакивает ошибка: BASE1122: Ошибка в аргументах TRANSFORM. И выбрасывает из программы вообще... |
Такая ошибка может возникать, если вы скопировали не весь текст программы, а точнее, если в программе нет предпоследней строки - . Проверьте, пожалуйст |
|
| Back to top |
|
|
Artem
Joined: 19 Jan 2004
Posts: 1
Location: Колесников Артем
Occupation: СУ-9
Interests: Новосибирск
|
| Posted: 19 Jan 2004 13:47 Post subject: |
|
|
| А может у кого-нибудь уже есть готовое решение для справки для расчета субсидий ? |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
