Эта статья относится к Microsoft Dynamics NAV для языкового стандарта итальянского (it) языка.
Проблема
Предположим, что в итальянской версии Microsoft Dynamics NAV 2009 с пакетом обновления 1 (SP1) используется счет с помощью кредитных памяток. При выполнении отчета "Список счетов клиентов" (12117) и отчета "Список счетов по счету поставщика" (12116), в отчетах неожиданно отображаются кредитные памятки, примененные к счету.
Решение
Сведения об исправлении
Поддерживаемое исправление теперь доступно в корпорации Майкрософт. Однако он предназначен только для устранения проблемы, описанной в этой статье. Применяйте его только к системам, в которых возникла эта конкретная проблема. Это исправление может пройти дополнительное тестирование. Поэтому, если вы не пострадали от этой проблемы, рекомендуется дождаться следующего пакета обновления Microsoft Dynamics NAV 2009 или следующей версии Microsoft Dynamics NAV, содержащей это исправление.
Примечание. В особых случаях плата, которая обычно взимается за звонки в службу поддержки, может быть отменена, если специалист по технической поддержке Microsoft Dynamics и связанных продуктов определит, что конкретное обновление поможет устранить вашу проблему. Обычные расходы на поддержку будут применяться к дополнительным вопросам и проблемам поддержки, которые не относятся к конкретному обновлению.
Сведения об установке
Корпорация Майкрософт предоставляет примеры программирования только для иллюстрации, без явных или подразумеваемых гарантий. Это включает подразумеваемые гарантии товарного состояния или пригодности для конкретной цели, но не ограничивается ими. В этой статье предполагается, что вы знакомы с демонстрируемым языком программирования и инструментами, используемыми для создания и отладки процедур. Инженеры службы поддержки Майкрософт могут помочь объяснить функциональность конкретной процедуры, но они не будут изменять эти примеры, чтобы предоставить дополнительные функциональные возможности или создать процедуры в соответствии с вашими конкретными требованиями.
Примечание. Перед установкой этого исправления убедитесь, что все пользователи клиента Microsoft Navision вышли из системы. Сюда входят пользователи клиентов Служб приложений Microsoft Navision (NAS). Вы должны быть единственным пользователем клиента, который вошел в систему при реализации этого исправления.
Чтобы реализовать это исправление, у вас должна быть лицензия разработчика.
Рекомендуется назначить учетной записи пользователя в окне Входа Windows или в окне Входа базы данных идентификатор роли SUPER. Если учетной записи пользователя не удается назначить идентификатор роли SUPER, необходимо убедиться, что учетная запись пользователя имеет следующие разрешения:
- Разрешение Изменить для объекта, который вы будете изменять.
- Разрешение Execute для объекта System Object ID 5210 и для объекта System Object ID 9015.
Примечание. Вы не должны иметь права на хранилища данных, если только вам не нужно выполнить восстановление данных.
Изменения кода
Примечание. Перед применением исправлений на рабочих компьютерах всегда тестируйте исправления кода в управляемой среде.
Чтобы устранить эту неполадку, выполните следующие действия:
Измените код элемента данных Номер 2 в отчете "Список счетов для учетной записи поставщика" (12116) следующим образом:
Существующий код... END; OnAfterGetRecord=BEGIN // Delete the following lines. IF (("Document Type" = "Document Type"::Payment) OR ("Document Type" = "Document Type"::" ")) AND (Open = FALSE) THEN // End of the lines. CurrReport.SKIP; CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)"); ...Код замены
... END; OnAfterGetRecord=BEGIN // Add the following lines. IF (("Document Type" = "Document Type"::Payment) OR ("Document Type" = "Document Type"::" ") OR ("Document Type" = "Document Type"::"Credit Memo")) AND NOT Open THEN // End of the lines. CurrReport.SKIP; CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)"); ...Измените код разделов Data Item Number 2 в отчете "Список счетов для учетной записи поставщика" (12116) следующим образом:
Существующий код... DataSetFieldName=VendLedgEntry1__External_Document_No___Control1130023 } { 1130024;TextBox ;1950 ;423 ;1350 ;423 ;SourceExpr="Document Type"; DataSetFieldName=VendLedgEntry1__Document_Type__Control1130024 } } } { PROPERTIES ...Код замены
... DataSetFieldName=VendLedgEntry1__External_Document_No___Control1130023 } { 1130024;TextBox ;1950 ;423 ;1350 ;423 ;SourceExpr="Document Type"; DataSetFieldName=VendLedgEntry1__Document_Type__Control1130024 } // Add the following lines. { 1130082;TextBox ;27600;0 ;150 ;423 ;Visible=No; ForeColor=65535; SourceExpr=FORMAT("Document Type",0,2); DataSetFieldName=VendLedgEntry1_DocumentType } // End of the lines. } } { PROPERTIES ...Измените код раздела Data Item Number 4 в отчете "Список счетов для учетной записи поставщика" (12116) следующим образом:
Существующий код 1... SectionWidth=27750; SectionHeight=846; OnPreSection=BEGIN // Delete the following lines. IF (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::Payment) OR (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::" ") THEN // End of the lines. CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); ...Код замены 1
... SectionWidth=27750; SectionHeight=846; OnPreSection=BEGIN // Add the following lines. IF (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::Payment) OR (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::"Credit Memo") OR (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::" ") OR ("Unapplied by Entry No." <> 0) THEN // End of the lines. CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); ...Существующий код 2
... CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); // Delete the following lines. IF ("Unapplied by Entry No." <> 0) THEN CurrReport.SHOWOUTPUT(FALSE); // End of the lines. END; } ...Код замены 2
... CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); END; } ...Измените код документации в отчете "Список счетов для учетной записи поставщика" (12116) следующим образом:
Существующий код 1... </TableCell> </TableCells> <Visibility> // Delete the following line. <Hidden>=IIF((Fields!Detailed_Vendor_Ledg__Entry_Entry_No_.Value=0 or Fields!Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__.Value<>0),TRUE,FALSE)</Hidden> // End of the line. </Visibility> </TableRow> <TableRow> ...Код замены 1
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!Detailed_Vendor_Ledg__Entry_Entry_No_.Value=0 OR Fields!Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__.Value<>0 OR Fields!VendLedgEntry1_DocumentType.Value="1" OR Fields!VendLedgEntry1_DocumentType.Value="3" OR Fields!VendLedgEntry1_DocumentType.Value="0", TRUE,FALSE)</Hidden> // End of the lines. </Visibility> </TableRow> <TableRow> ...Существующий код 2
... </TableCell> </TableCells> <Visibility> // Delete the following lines. <Hidden>=IIF(Fields!VendLedgEntry1__Document_Type_.Value="Invoice" OR Fields!VendLedgEntry1__Document_Type_.Value="Finance Charge Memo" OR Fields!VendLedgEntry1__Document_Type_.Value="Reminder" OR Fields!VendLedgEntry1__Document_Type_.Value="Credit Memo", // End of the lines. FALSE,TRUE)</Hidden> </Visibility> </TableRow> ...Код замены 2
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!VendLedgEntry1_DocumentType.Value="2" OR Fields!VendLedgEntry1_DocumentType.Value="4" OR Fields!VendLedgEntry1_DocumentType.Value="5" OR Fields!VendLedgEntry1_DocumentType.Value="3", // End of the lines. FALSE,TRUE)</Hidden> </Visibility> </TableRow> ...Существующий код 3
... </TableCell> </TableCells> <Visibility> // Delete the following lines. <Hidden>=IIF(Fields!VendLedgEntry1__Document_Type_.Value<>"Invoice" AND Fields!VendLedgEntry1__Document_Type_.Value<>"Finance Charge Memo" AND Fields!VendLedgEntry1__Document_Type_.Value<>"Reminder" AND Fields!VendLedgEntry1__Document_Type_.Value<>"Credit Memo" AND // End of the lines. Fields!VendLedgEntry1__Remaining_Amt___LCY__.Value<>0, FALSE,TRUE)</Hidden> </Visibility> ...Код замены 3
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!VendLedgEntry1_DocumentType.Value<>"2" AND Fields!VendLedgEntry1_DocumentType.Value<>"4" AND Fields!VendLedgEntry1_DocumentType.Value<>"5" AND Fields!VendLedgEntry1_DocumentType.Value<>"3" AND // End of the lines. Fields!VendLedgEntry1__Remaining_Amt___LCY__.Value<>0, FALSE,TRUE)</Hidden> </Visibility> ...Существующий код 4
... <Field Name="VendLedgEntry1__Amount__LCY___Control1130017Format"> <DataField>VendLedgEntry1__Amount__LCY___Control1130017Format</DataField> </Field> <Field Name="Vendor_BalanceCaption"> <DataField>Vendor_BalanceCaption</DataField> </Field> ...Код замены 4
... <Field Name="VendLedgEntry1__Amount__LCY___Control1130017Format"> <DataField>VendLedgEntry1__Amount__LCY___Control1130017Format</DataField> </Field> // Add the following lines. <Field Name="VendLedgEntry1_DocumentType"> <DataField>VendLedgEntry1_DocumentType</DataField> </Field> // End of the lines. <Field Name="Vendor_BalanceCaption"> <DataField>Vendor_BalanceCaption</DataField> </Field> ...Измените код элемента данных Номер 2 в отчете "Список счетов клиентов" (12117) следующим образом:
Существующий код... END; OnAfterGetRecord=BEGIN // Delete the following lines. IF (("Document Type" = "Document Type"::Payment) OR ("Document Type" = "Document Type"::" ")) AND (Open = FALSE) THEN // End of the lines. CurrReport.SKIP; ...Код замены
... END; OnAfterGetRecord=BEGIN // Add the following lines. IF (("Document Type" = "Document Type"::Payment) OR ("Document Type" = "Document Type"::" ") OR ("Document Type" = "Document Type"::"Credit Memo")) AND NOT Open THEN // End of the lines. CurrReport.SKIP; CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)"); ...Измените код разделов Data Item Number 2 в отчете "Список счетов клиентов" (12117) следующим образом:
Существующий код... ForeColor=65535; SourceExpr=CustLedgEntry1."Bank Receipt"; DataSetFieldName=CustLedgEntry1_CustLedgEntry1__Bank_Receipt_ } } } { PROPERTIES ...Код замены
... ForeColor=65535; SourceExpr=CustLedgEntry1."Bank Receipt"; DataSetFieldName=CustLedgEntry1_CustLedgEntry1__Bank_Receipt_ } // Add the following lines. { 1130008;TextBox ;24150;423 ;150 ;423 ;Visible=No; ForeColor=65535; SourceExpr=FORMAT("Document Type",0,2); DataSetFieldName=CustLedgEntry1_DocumentType } // End of the lines. } } { PROPERTIES ...Измените код раздела Data Item Number 4 в отчете "Список счетов клиентов" (12117) следующим образом:
Существующий код 1... SectionWidth=24450; SectionHeight=846; OnPreSection=BEGIN // Delete the following lines. IF (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::Payment) OR (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::" ") THEN // End of the lines. CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); ...Код замены 1
... SectionWidth=24450; SectionHeight=846; OnPreSection=BEGIN // Add the following lines. IF (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::Payment) OR (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::"Credit Memo") OR (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::" ") OR ("Unapplied by Entry No." <> 0) THEN // End of the lines. CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); ...Существующий код 2
... CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); // Delete the following lines. IF ("Unapplied by Entry No." <> 0) THEN CurrReport.SHOWOUTPUT(FALSE); // End of the lines. END; } ...Код замены 2
... CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); END; } ...Измените код документации в отчете "Список счетов клиентов" (12117) следующим образом:
Существующий код 1... </TableCell> </TableCells> <Visibility> // Delete the following line. <Hidden>=IIF(Fields!Detailed_Cust__Ledg__Entry_Entry_No_.Value=0,TRUE,FALSE)</Hidden> // End of the line. </Visibility> </TableRow> <TableRow> ...Код замены 1
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!Detailed_Cust__Ledg__Entry_Entry_No_.Value=0 OR Fields!CustLedgEntry1_DocumentType.Value="0" OR Fields!CustLedgEntry1_DocumentType.Value="1" OR Fields!CustLedgEntry1_DocumentType.Value="3", TRUE,FALSE)</Hidden> // End of the lines. </Visibility> </TableRow> <TableRow> ...Существующий код 2
... </TableCell> </TableCells> <Visibility> // Delete the following lines. <Hidden>=IIF(Fields!CustLedgEntry1__Document_Type_.Value="Invoice" OR Fields!CustLedgEntry1__Document_Type_.Value="Finance Charge Memo" OR Fields!CustLedgEntry1__Document_Type_.Value="Reminder" OR Fields!CustLedgEntry1__Document_Type_.Value="Credit Memo", // End of the lines. FALSE,TRUE)</Hidden> </Visibility> </TableRow> ...Код замены 2
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!CustLedgEntry1_DocumentType.Value="2" OR Fields!CustLedgEntry1_DocumentType.Value="4" OR Fields!CustLedgEntry1_DocumentType.Value="5" OR Fields!CustLedgEntry1_DocumentType.Value="3", // End of the lines. FALSE,TRUE)</Hidden> </Visibility> </TableRow> ...Существующий код 3
... </TableCell> </TableCells> <Visibility> // Delete the following lines. <Hidden>=IIF(Fields!CustLedgEntry1__Document_Type_.Value<>"Invoice" AND Fields!CustLedgEntry1__Document_Type_.Value<>"Finance Charge Memo" AND Fields!CustLedgEntry1__Document_Type_.Value<>"Reminder" AND Fields!CustLedgEntry1__Document_Type_.Value<>"Credit Memo" AND // End of the lines. Fields!CustLedgEntry1__Remaining_Amt___LCY__.Value<>0 AND Fields!CustLedgEntry1_CustLedgEntry1__Bank_Receipt_.Value=FALSE, FALSE,TRUE)</Hidden> ...Код замены 3
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!CustLedgEntry1_DocumentType.Value<>"2" AND Fields!CustLedgEntry1_DocumentType.Value<>"4" AND Fields!CustLedgEntry1_DocumentType.Value<>"5" AND Fields!CustLedgEntry1_DocumentType.Value<>"3" AND // End of the lines. Fields!CustLedgEntry1__Remaining_Amt___LCY__.Value<>0 AND Fields!CustLedgEntry1_CustLedgEntry1__Bank_Receipt_.Value=FALSE, FALSE,TRUE)</Hidden> ...Существующий код 4
... <Field Name="CustLedgEntry1_CustLedgEntry1__Bank_Receipt_"> <DataField>CustLedgEntry1_CustLedgEntry1__Bank_Receipt_</DataField> </Field> <Field Name="Customer_BalanceCaption"> <DataField>Customer_BalanceCaption</DataField> </Field> ..Код замены 4
... <Field Name="CustLedgEntry1_CustLedgEntry1__Bank_Receipt_"> <DataField>CustLedgEntry1_CustLedgEntry1__Bank_Receipt_</DataField> </Field> // Add the following lines. <Field Name="CustLedgEntry1_DocumentType"> <DataField>CustLedgEntry1_DocumentType</DataField> </Field> // End of the lines. <Field Name="Customer_BalanceCaption"> <DataField>Customer_BalanceCaption</DataField> </Field> ...
Необходимые условия
Чтобы применить это исправление, необходимо установить версию Microsoft Dynamics NAV 2009 с пакетом обновления 1 (SP1) на итальянском языке.
Сведения об удалении
Удалить это исправление невозможно.
Состояние
Корпорация Майкрософт подтвердила, что это проблема продуктов Microsoft, перечисленных в разделе «Относится к».
Примечание. Это статья "FAST PUBLISH", созданная непосредственно в организации поддержки Майкрософт. Информация, содержащаяся в настоящем документе, предоставляется как есть в ответ на возникающие проблемы. В результате быстрой доступности материалы могут содержать опечатки и могут быть пересмотрены в любое время без уведомления. Дополнительные рекомендации см. в разделе Условия использования .