The Allocation Date field is not copied when you allocate a resource group to a service order in the RoleTailored client in Microsoft Dynamics NAV 2009

Installation information

Code changes

1. Change the code in the Res. Gr. Avail. (Serv.) Matrix page (9221) as follows:
   Existing code

   ...
       { 13  ;2   ;Field     ;
                   Name=Qtytoallocate;
                   CaptionML=ENU=Qty. To Allocate;
                   SourceExpr=QtytoAllocate;
                   MinValue=0;
                   Enabled=QtytoallocateEnable }
    
       { 1   ;1   ;Group     ;
                   Editable=FALSE;
                   GroupType=Repeater }
   ...

   Replacement code

   ...
       { 13  ;2   ;Field     ;
                   Name=Qtytoallocate;
                   CaptionML=ENU=Qty. To Allocate;
                   SourceExpr=QtytoAllocate;
                   MinValue=0;
                   Enabled=QtytoallocateEnable }
    
       // Add the following lines.
       { 30  ;2   ;Field     ;
                   Name=SelectDate;
                   CaptionML=ENU=Selected Day;
                   SourceExpr=SelectedDate }
       // End of the lines.
   
       { 1   ;1   ;Group     ;
                   Editable=FALSE;
                   GroupType=Repeater }
   ...

2. Change the code in the SetData function in the Res. Gr. Avail. (Serv.) Matrix page (9221) as follows:
   Existing code

       BEGIN
         CurrentDocumentType := DocumentType;
         CurrentDocumentNo := DocumentNo;
         CurrentServItemLineNo := ServItemLineNo;
         CurrentEntryNo := EntryNo;
         COPYARRAY(MatrixColumnCaptions,NewMatrixColumnCaptions,1);
         COPYARRAY(MatrixColumnDateFilters,NewMatrixDateFilters,1);
         PeriodType := Period;
       END;

   Replacement code

       BEGIN
         CurrentDocumentType := DocumentType;
         CurrentDocumentNo := DocumentNo;
         CurrentServItemLineNo := ServItemLineNo;
         CurrentEntryNo := EntryNo;
         COPYARRAY(MatrixColumnCaptions,NewMatrixColumnCaptions,1);
         COPYARRAY(MatrixColumnDateFilters,NewMatrixDateFilters,1);
         PeriodType := Period;
         
         // Add the following line.
         EVALUATE(SelectedDate,MatrixColumnCaptions[1]);
   
       END;

3. Change the code in the MatrixOnDrillDown function in the Res. Gr. Avail. (Serv.) Matrix page (9221) as follows:
   Existing code

       VAR
         PlanningLine@1001 : Record 5950;
   
         // Delete the following line.
         Res@1004 : Record 156;
   
         PlanningLineForm@1002 : Form 6001;
   
         // Delete the following line.
         ResAvailability@1003 : Form 6006;
   
       BEGIN
   
         // Delete the following lines.
         CLEAR(ResAvailability);
         CLEAR(Res);
         Res.SETRANGE("No.");
         Res.SETRANGE("Resource Group No.","No.");
         Res.SETRANGE("Date Filter",MatrixColumnDateFilters[Column]."Period Start",
           MatrixColumnDateFilters[Column]."Period End");
         ResAvailability.SETTABLEVIEW(Res);
         ResAvailability.SETRECORD(Res);
         ResAvailability.RUNMODAL;
         // End of the lines.
   
       END;

   Replacement code

       VAR
         PlanningLine@1001 : Record 5950;
   
         // Add the following line.
         ResGr@1004 : Record 152;
   
         PlanningLineForm@1002 : Form 6001;
   
         // Add the following line.
         ResGrAvailability@1003 : Form 6011;
   
       BEGIN
   
         // Add the following lines.
         CLEAR(ResGr);
         CLEAR(ResGrAvailability);
         ResGr.SETRANGE("No.","No.");
         ResGrAvailability.SETTABLEVIEW(ResGr);
         ResGrAvailability.SETRECORD(ResGr);
         ResGrAvailability.RUNMODAL;
         // End of the lines.
   
       END;

Prerequisites

• Microsoft Dynamics NAV 2009 R2
• Microsoft Dynamics NAV 2009 Service Pack 1

Removal information