Write Timephased Value Using VBA Macro

Sub WriteTimePhasedValue()
Dim TimeScaledvalues As TimeScaleValues
Dim TimeScaledValue As TimeScaleValue
Dim stdate, fsdate As Date
   
    With ActiveProject.Tasks(5) ‘ i have taken static task ID, you might wanna change
        stdate = Format(.Start, “Short date”)
        fsdate = Format(.Finish, “Short date”)
      
       Set TimeScaledvalues = .TimeScaleData(StartDate:=.Start, EndDate:=.Finish, Type:=pjTaskTimescaledActualWork, TimeScaleUnit:=pjTimescaleDays, Count:=1) ‘ You might wanna select task type to update

   End With

    For Each TimeScaledValue In TimeScaledvalues

        If Val( TimeScaledValue .Value) <> 0 Then
            MsgBox (ActiveProject.Tasks(5).Name & ”            ” & stdate & ”     ” & CStr( TimeScaledValue .Value / 60) & “h”)
             TimeScaledValue .Value = 240 ‘in minutes
        End If

    Next  TimeScaledValue

End Sub

Now at times you might get error 1100 : Check the server settings >> Operational policies >> Additional Server Settings >> Task Mode Settings >> “Automatically Scheduled”

Read Full Post »

Microsoft® Team Foundation Server® 2010 and Microsoft Project Server® 2010 Integration Hyper-V Virtual Machine Released

This virtual machine demonstrates the integration of Team Foundation Sever 2010 with Project Server 2010. Included with this download are four walkthroughs that demonstrate using enterprise project plans in Project Server associated with team projects in Team Foundation Server….. For More Visit the Link below

http://www.microsoft.com/downloads/en/details.aspx?FamilyID=F221C660-161B-43CA-95F3-E0E4AAD8D43E&displaylang=en

Read Full Post »

Get Predeccesor / Succesor Details From project Data Set

I have been asked this question several times, “Where do i find Successor & predecessor” for tasks in project data set

Hence thought lets blog it, and share it with everyone, so essentially the predecessor & Succesor links lies within the Project Data Set itself, I can’t recall the Table name but its index is 4, so here is the code to get predecessor / successor UID which can be related back to task uid to get the task ID / name or related info

         private void button1_Click(object sender, EventArgs e)
        {
            PWA_DevProjectWebSvc.ProjectDataSet TempDS = ReadAnySpecificProjectDetails(“60163fcd-5cdf-4556-898d-ce48a37f8037”);
            this.dataGridView1.DataSource = TempDS.Tables[4];
            /*Table 0 = project level Detail
             *Table 1 = Task level Details
             *Table 2 = Resource Details
             *Table 3 = Assignment Details
             * Table 4 = Link ID, Pred_ID,Succ_UID
             * Table 5 = Custom Fields Prop_ID,MD_PropUID
             * Table 6 = Task level Custom Field More Details
             * Table 7 =
             */
        }

        private PWA_DevProjectWebSvc.ProjectDataSet ReadAnySpecificProjectDetails( string PrjUid)
        {
            PWA_DevProjectWebSvc.Project PrjWebSvc = new PWA_DevProjectWebSvc.Project();
            PrjWebSvc.Url = @http://Servername/pwa/_vti_bin/psi/project.asmx;
            NetworkCredential myCredential = new NetworkCredential(“username”, “Password”, “Domain”);
            PrjWebSvc.Credentials = myCredential;
            PWA_DevProjectWebSvc.ProjectDataSet PrjDS = new PWA_DevProjectWebSvc.ProjectDataSet();
            Guid prjguid = new Guid(PrjUid);
            PrjDS = PrjWebSvc.ReadProject(prjguid, PWA_DevProjectWebSvc.DataStoreEnum.PublishedStore);
            return PrjDS;
        }

}

Read Full Post »

Project Server 2010 Performance Counters

To help you determine when you have to scale up or scale out your Microsoft Project Server farm, use performance counters to monitor the health of the system. Use the information in the following tables to determine which performance counters to monitor, and to which process the performance counters should be applied, For more Information Refer to :

http://technet.microsoft.com/en-us/library/gg715567.aspx

Read Full Post »

Get project % Complete Using PSI

Project PrjWebSvc = new ProjectWebSvc.Project();
PrjWebSvc.Url = baseUrl + PROJECTWEBSERVICE;
NetworkCredential myCredential = new NetworkCredential(“Username”, “Password”, “Domain”);
PrjWebSvc.Credentials = myCredential;
ProjectWebSvc.ProjectDataSet PrjDS = new ProjectWebSvc.ProjectDataSet();
Guid prjguid = new Guid(“60163fcd-5cdf-4556-898d-ce48a37f8037”);
PrjDS = PrjWebSvc.ReadProject(prjguid,ProjectWebSvc.DataStoreEnum.PublishedStore);
this.dataGridView1.DataSource = PrjDS.Tables[1];
MessageBox.Show(“Project Name->” + PrjDS.Tables[1].Rows[0][3].ToString() + “%Comp” + PrjDS.Tables[1].Rows[0][36].ToString());

Read Full Post »