Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / SetTaskField / 10 сообщений из 10, страница 1 из 1
13.06.2013, 09:16
    #38295656
AleKs20
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
Всем доброго времени суток!)
Подскажите пожалуйста, как с помощью SetTaskField вытащить значения из sql запроса и поместить их в поля ms project?
У меня имеется запросик на sql сервере вот такого содержания:
set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
go


ALTER PROCEDURE [dbo].[AGRRpt_StaffTasks]

AS
BEGIN
SET NOCOUNT ON;
DECLARE @Start as smalldatetime
set @Start= GetDate()
select TOP 5 TASK.TASKID,'' as Fio,Place.PlaceTechId as PlaceCode,
(case isnull(Part.ProductId,0) when 0 then Part.PartName else Product.ProductName end ) as PartName,
Task.TaskName,
Task.StartDateTime,Task.FinishDateTime,PT1.Shift as Shift1,PT2.Shift as Shift2,
isnull(Part.PartVolume,'') as Kol,
(case year(Task.StartDateTime) when year(@Start) then
(case month(Task.StartDateTime) when month(@Start) then
(case day(Task.StartDateTime) when day(@Start) then
(case PT1.Shift when 1 then isnull(Part.PartVolume,0) else 0 end)
else 0 end) else 0 end ) else 0 end) as Zap1,
(case year(Task.FinishDateTime) when year(@Start) then
(case month(Task.FinishDateTime) when month(@Start) then
(case day(Task.FinishDateTime) when day(@Start) then
(case PT2.Shift when 1 then isnull(Part.PartVolume,0) else 0 end)
else 0 end) else 0 end ) else 0 end) as Sd1,
(case year(Task.StartDateTime) when year(@Start) then
(case month(Task.StartDateTime) when month(@Start) then
(case day(Task.StartDateTime) when day(@Start) then
(case PT1.Shift when 2 then isnull(Part.PartVolume,0) else 0 end)
else 0 end) else 0 end ) else 0 end) as Zap2,
(case year(Task.FinishDateTime) when year(@Start) then
(case month(Task.FinishDateTime) when month(@Start) then
(case day(Task.FinishDateTime) when day(@Start) then
(case PT2.Shift when 2 then isnull(Part.PartVolume,0) else 0 end)
else 0 end) else 0 end ) else 0 end) as Sd2,
(case year(Task.StartDateTime) when year(@Start) then
(case month(Task.StartDateTime) when month(@Start) then
(case day(Task.StartDateTime) when day(@Start) then
(case PT1.Shift when 3 then isnull(Part.PartVolume,0) else 0 end)
else 0 end) else 0 end ) else 0 end) as Zap3,
(case year(Task.FinishDateTime) when year(@Start) then
(case month(Task.FinishDateTime) when month(@Start) then
(case day(Task.FinishDateTime) when day(@Start) then
(case PT2.Shift when 3 then isnull(Part.PartVolume,0) else 0 end)
else 0 end) else 0 end ) else 0 end) as Sd3
from PlanTask AS Task
left join PlanPart as Part on Task.PartId=Part.PartId
left join PlanProduct as Product on Part.ProductId=Product.ProductId
left join PlanPlace as Place on Task.PlaceId=Place.PlaceId
left join PlanTime AS PT1 on Task.StartDateTime>PT1.StartDateTime and Task.StartDateTime<=PT1.FinishDateTime
left join PlanTime AS PT2 on Task.FinishDateTime>PT2.StartDateTime and Task.FinishDateTime<=PT2.FinishDateTime
where (Task.StateId is null or Task.StateId=30)
and ((year(Task.StartDateTime)=year(GetDate())
and month(Task.StartDateTime)=month(GetDate())
and day(Task.StartDateTime)=day(GetDate()))
or (year(Task.FinishDateTime)=year(GetDate())
and month(Task.FinishDateTime)=month(GetDate())
and day(Task.FinishDateTime)=day(GetDate())))
and Task.TaskDescription like '%43-8%'
and right(Task.TaskName,4)='_032'
and Product.ProductName is not null
ORDER BY Place.PlaceTechId,Task.StartDateTime,Task.FinishDateTime
END

Из него мне нужны поля выделенные красным...
Большая просьба, если у кого есть что-то наподобе , скиньте пожалуйста для примера...
Заранее спасибо)
...
Рейтинг: 0 / 0
13.06.2013, 09:17
    #38295657
AleKs20
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
Вытаскивать значения нужно по макросу....
...
Рейтинг: 0 / 0
14.06.2013, 07:11
    #38297250
AleKs20
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
Ну или подскажите, пожалуйста, кто-нибудь, как это вообще можно сделать...
...
Рейтинг: 0 / 0
14.06.2013, 09:14
    #38297323
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
Непонятно что вызывает затруднение, если в предыдущей своей задаче вы и поля вытаскивали из запроса и SetTaskField пользовались. Или под вашим логином пишут разные люди?
...
Рейтинг: 0 / 0
14.06.2013, 11:39
    #38297577
AleKs20
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
Shocker.Pro,

да разные...
...
Рейтинг: 0 / 0
14.06.2013, 12:31
    #38297637
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
Тогда вам сюда 14414890 , там ответ
...
Рейтинг: 0 / 0
14.06.2013, 13:50
    #38297755
AleKs20
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
Shocker.Pro,
Да я смотрел этот пример, по нему не получается, он поля оставляет пустыми и что самое интересное не выдает никакой ошибки...
...
Рейтинг: 0 / 0
14.06.2013, 16:17
    #38298044
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
ну так а в чем проблема, в том, что пустые поля считываются из базы или не работает SetTaskField ?
Разделите задачу на две
...
Рейтинг: 0 / 0
19.06.2013, 13:39
    #38303134
AleKs20
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
Shocker.Pro,Не работает SetTaskField
...
Рейтинг: 0 / 0
19.06.2013, 13:43
    #38303156
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SetTaskField
Ок, то есть про базу забыли.

сделайте тестовый файлик с макросом с единственной строкой SetTaskField и выложите сюда
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / SetTaskField / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]