Ketika Anda menggunakan bahasa Jerman (Swiss) untuk meluncurkan laporan dari 11584 11587 dalam versi Microsoft Dynamics NAV 2009, "nomor Total Swiss Tagihan atau kredit memo"selalu ditampilkan sebagai nol. Masalah ini terjadi di produk berikut ini:
-
Swiss versi Microsoft Dynamics NAV 2009 R2
-
Swiss versi Microsoft Dynamics NAV 2009 SP1
Pemecahan masalah
Informasi Hotfix
Sekarang tersedia hotfix yang didukung dari Microsoft. Namun, hanya ditujukan untuk memperbaiki masalah yang dijelaskan di artikel ini. Terapkan hanya ke sistem yang mengalami masalah khusus ini. Perbaikan terbaru ini dapat menerima pengujian tambahan. Oleh karena itu, jika Anda tidak terlalu dipengaruhi oleh masalah ini, kami sarankan Anda menunggu paket layanan Microsoft Dynamics NAV 2009 atau versi Microsoft Dynamics NAV berikutnya yang berisi perbaikan terbaru ini.
Catatan Dalam kasus tertentu, biaya yang biasanya diadakan untuk panggilan mungkin dibatalkan apabila profesional dukungan teknis untuk Microsoft Dynamics dan produk-produk terkait dukungan menentukan bahwa pembaruan khusus akan memecahkan masalah Anda. Biaya dukungan biasa akan berlaku untuk pertanyaan dan masalah yang tidak termasuk pada pembaruan tertentu yang dimaksud dukungan tambahan.
Informasi penginstalan
Microsoft menyediakan contoh pemrogaman hanya untuk ilustrasi, tanpa garansi baik tersurat maupun tersirat. Ini mencakup, namun tidak terbatas pada, garansi yang tersirat dapat diperjualbelikan atau kesesuaian untuk tujuan tertentu. Artikel ini menganggap bahwa Anda sudah terbiasa dengan bahasa pemrograman yang ditunjukkan dan terbiasa dengan alat-alat yang digunakan untuk membuat dan prosedur debug. Teknisi dukungan Microsoft dapat membantu menjelaskan fungsionalitas prosedur tertentu. Namun, mereka tidak akan mengubah contoh tersebut untuk memberikan fungsionalitas tambahan atau menyusun prosedur untuk memenuhi persyaratan khusus Anda.
Catatan Sebelum Anda menginstal perbaikan terbaru ini, verifikasi bahwa semua pengguna klien Microsoft Dynamics NAV log off sistem. Ini termasuk layanan Microsoft Dynamics NAV aplikasi Server (NAS). Anda harus klien hanya pengguna yang masuk saat Anda menerapkan perbaikan terbaru ini.
Untuk menerapkan hotfix ini, Anda harus memiliki lisensi pengembang.
Kami menyarankan bahwa akun pengguna di jendela login Windows atau jendela login Database ditetapkan id peran "SUPER" Jika account pengguna tidak dapat ditetapkan ID peran "SUPER", Anda harus memverifikasi bahwa account pengguna yang memiliki izin berikut ini:
-
Ubah izin untuk objek yang Anda akan berubah.
-
Izin eksekusi untuk objek sistem objek ID 5210 dan sistem objek ID 9015
objek.
Catatan Anda tidak harus memiliki hak untuk penyimpanan data kecuali jika Anda harus melakukan perbaikan data.
Perubahan kode
Catatan selalu menguji kode perbaikan di lingkungan yang dikontrol sebelum Anda menerapkan perbaikan komputer produksi. Sebelum menerapkan perubahan, silakan mengimpor semua SEPA pembaruan.
Untuk mengatasi masalah ini, ikuti langkah-langkah berikut:
-
Ubah kode di bagian 1 jumlah Item Data di SR Cust. Faktur daftar Std laporan (11584):
Kode yang ada...ForeColor=65535;
SourceExpr="Sales (LCY)";
DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
{ 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
// Delete the following lines.
SourceExpr="Document Type";
DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
// End of the deleted lines.
}
}
{ PROPERTIES
{
SectionType=Body;
...Penggantian kode
... ForeColor=65535;
SourceExpr="Sales (LCY)";
DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
{ 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
// Add the following lines.
SourceExpr=[ ("Document Type" = "Document Type"::Invoice)];
DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
{ 1150010;TextBox ;17100;0 ;150 ;423 ;Visible=No;
SourceExpr=("Document Type" = "Document Type"::"Credit Memo");
DataSetFieldName=Cust__Ledger_Entry__Document_Type_1 }
// End of the added lines.
}
}
{ PROPERTIES
{
SectionType=Body;
...
-
Ubah kode di fungsi CalcExrate di SR Cust. Faktur daftar Std laporan (11584):
Kode yang ada 1...<PaddingLeft>2pt</PaddingLeft>
<PaddingRight>2pt</PaddingRight>
</Style>
<Value>=iif(True,
CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
// Delete the following line.
+CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
// End of the deleted line.
+CStr(Code.CalcProfit(Fields!Cust__Ledger_Entry__Profit__LCY__.Value))+chr(177)
+CStr(Code.CalcFooterProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY__.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
+CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY__.Value)),"")</Value>
</Textbox>
</ReportItems>
...Penggantian kode 1
...<PaddingLeft>2pt</PaddingLeft>
<PaddingRight>2pt</PaddingRight>
</Style>
<Value>=iif(True,
CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
// Add the following line.
+CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_1.Value))+Chr(177)
// End of the added line.
+CStr(Code.CalcProfit(Fields!Cust__Ledger_Entry__Profit__LCY__.Value))+chr(177)
+CStr(Code.CalcFooterProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY__.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
+CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY__.Value)),"")</Value>
</Textbox>
</ReportItems>
...Kode yang ada 2
...TotalProfitLCY = 0
TotalProfitPct = 0
TotalAmountLCY = 0
End Function
// Delete the following lines.
Function CalcNoOfInvoices(DocumentType as string)
if DocumentType = "Invoice"
// End of the deleted lines.
NoOfInvoices += 1
end if
return NoOfInvoices
End Function
...Penggantian kode 2
...TotalProfitLCY = 0
TotalProfitPct = 0
TotalAmountLCY = 0
End Function
// Add the following lines.
Function CalcNoOfInvoices(DocumentType as Boolean)
if DocumentType
// End of the added lines.
NoOfInvoices += 1
end if
return NoOfInvoices
End Function
...Kode yang ada 3
...NoOfInvoices += 1
end if
return NoOfInvoices
End Function
// Delete the following lines.
Function CalcNoOfCredMemos(DocumentType as string)
if DocumentType = "Credit Memo"
// End of the deleted lines.
NoOfCredMemos += 1
end if
return NoOfCredMemos
End Function
...Penggantian kode 3
...NoOfInvoices += 1
end if
return NoOfInvoices
End Function
// Add the following lines.
Function CalcNoOfCredMemos(DocumentType as Boolean)
if DocumentType
// End of the added lines.
NoOfCredMemos += 1
end if
return NoOfCredMemos
End Function
...Ada kode 4
...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Document_Type_">
<DataField>Cust__Ledger_Entry__Document_Type_</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Amount__LCY__">
<DataField>Cust__Ledger_Entry__Amount__LCY__</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Amount__LCY__Format">
<DataField>Cust__Ledger_Entry__Amount__LCY__Format</DataField>
...Penggantian kode 4
...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Document_Type_">
<DataField>Cust__Ledger_Entry__Document_Type_</DataField>
</Field>
// Add the following lines.
<Field Name="Cust__Ledger_Entry__Document_Type_1">
<DataField>Cust__Ledger_Entry__Document_Type_1</DataField>
</Field>
// End of the added lines.
<Field Name="Cust__Ledger_Entry__Amount__LCY__">
<DataField>Cust__Ledger_Entry__Amount__LCY__</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Amount__LCY__Format">
<DataField>Cust__Ledger_Entry__Amount__LCY__Format</DataField>
... -
Ubah kode di bagian 1 jumlah Item Data di SR Cust. Faktur daftar FCY laporan (11585):
Kode yang ada... ForeColor=65535;
SourceExpr="Sales (LCY)";
DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
{ 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
// Delete the following lines.
SourceExpr="Document Type";
DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
// End of the deleted lines.
}
}
{ PROPERTIES
{
SectionType=Body;
...Penggantian kode
... ForeColor=65535;
SourceExpr="Sales (LCY)";
DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
{ 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
// Add the following lines.
SourceExpr=("Document Type" = "Document Type"::Invoice);
DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
{ 1150011;TextBox ;17100;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
SourceExpr=("Document Type" = "Document Type"::"Credit Memo");
DataSetFieldName=Cust__Ledger_Entry__Document_Type_1 }
// End of the added lines.
}
}
{ PROPERTIES
{
SectionType=Body;
... -
Ubah kode di fungsi CalcExrate di SR Cust. Faktur daftar FCY laporan (11585):
Kode yang ada 1...<TextAlign>Right</TextAlign>
<VerticalAlign>Middle</VerticalAlign>
</Style>
<Value>=iif(True
,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
// Delete the following line.
+CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_.Value))+chr(177)
// End of the deleted line.
+CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
+CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control56.Value)),"")</Value>
</Textbox>
</ReportItems>
</TableCell>
...Penggantian kode 1
...<TextAlign>Right</TextAlign>
<VerticalAlign>Middle</VerticalAlign>
</Style>
<Value>=iif(True
,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
// Add the following line.
+CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_1.Value))+chr(177)
// End of the added line.
+CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
+CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control56.Value)),"")</Value>
</Textbox>
</ReportItems>
</TableCell>
...
Kode yang ada 2TotalProfitLCY = 0 TotalProfitPct = 0
TotalAmountLCY = 0
End Function
// Delete the following lines.
Function CalcNoOfInvoices(DocumentType as string)
if DocumentType = "Invoice"
// End of the deleted lines.
NoOfInvoices += 1
end if
return NoOfInvoices
End Function
...Penggantian kode 2
...TotalProfitLCY = 0
TotalProfitPct = 0
TotalAmountLCY = 0
End Function
// Add the following lines.
Function CalcNoOfInvoices(DocumentType as Boolean)
if DocumentType
// End of the added lines.
NoOfInvoices += 1
end if
return NoOfInvoices
End Function
...Kode yang ada 3
...NoOfInvoices += 1
end if
return NoOfInvoices
End Function
// Delete the following lines.
Function CalcNoOfCredMemos(DocumentType as string)
if DocumentType = "Credit Memo"
// Add of the deleted lines.
NoOfCredMemos += 1
end if
return NoOfCredMemos
End Function
...Penggantian kode 3
...NoOfInvoices += 1
end if
return NoOfInvoices
End Function
// Add the following lines.
Function CalcNoOfCredMemos(DocumentType as Boolean)
if DocumentType
// End of the added lines.
NoOfCredMemos += 1
end if
return NoOfCredMemos
End Function
...Ada kode 4
...TotalAmountLCY = TotalAmountLCY + AmountLCY
return TotalAmountLCY
End Function</Code>
<DataSets>
<DataSet Name="DataSet_Result">
<Fields>
<Field Name="Customer_Invoices_ListCaption">
<DataField>Customer_Invoices_ListCaption</DataField>
</Field>
<Field Name="FORMAT_TODAY_0_4_">
...Penggantian kode 4
...TotalAmountLCY = TotalAmountLCY + AmountLCY
return TotalAmountLCY
End Function</Code>
<DataSets>
<DataSet Name="DataSet_Result">
// Add the following lines.
<DataSetInfo xmlns="http://schemas.microsoft.com/SQLServer/reporting/reportdesigner">
<DataSetName>DataSet</DataSetName>
<TableName>Result</TableName>
</DataSetInfo>
// End of the added lines.
<Fields>
<Field Name="Customer_Invoices_ListCaption">
<DataField>Customer_Invoices_ListCaption</DataField>
</Field>
<Field Name="FORMAT_TODAY_0_4_">
...Ada kode 5
...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Document_Type_">
<DataField>Cust__Ledger_Entry__Document_Type_</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Document_No___Control11">
<DataField>Cust__Ledger_Entry__Document_No___Control11</DataField>
</Field>
<Field Name="COPYSTR_FORMAT__Document_Type___1_1__Control13">
<DataField>COPYSTR_FORMAT__Document_Type___1_1__Control13</DataField>
...Penggantian kode 5
...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Document_Type_">
<DataField>Cust__Ledger_Entry__Document_Type_</DataField>
</Field>
// Add the following lines.
<Field Name="Cust__Ledger_Entry__Document_Type_1">
<DataField>Cust__Ledger_Entry__Document_Type_1</DataField>
</Field>
// End of the added linds.
<Field Name="Cust__Ledger_Entry__Document_No___Control11">
<DataField>Cust__Ledger_Entry__Document_No___Control11</DataField>
</Field>
<Field Name="COPYSTR_FORMAT__Document_Type___1_1__Control13">
<DataField>COPYSTR_FORMAT__Document_Type___1_1__Control13</DataField>
...Kode yang ada 6
... </Fields>
<Query>
<CommandText />
<DataSourceName>DummyDataSource</DataSourceName>
</Query>
// Delete the following lines.
<rd:DataSetInfo>
<rd:DataSetName>DataSet</rd:DataSetName>
<rd:TableName>Result</rd:TableName>
</rd:DataSetInfo>
// End of the deleted lines.
</DataSet>
</DataSets>
<DataSources>
<DataSource Name="DummyDataSource">
<ConnectionProperties>
...Penggantian kode 6
...</Fields>
<Query>
<CommandText />
<DataSourceName>DummyDataSource</DataSourceName>
</Query>
</DataSet>
</DataSets>
<DataSources>
<DataSource Name="DummyDataSource">
<ConnectionProperties>
... -
Ubah kode di bagian 1 jumlah Item Data di SR Cust. Daftar faktur Posting laporan (11586):
Kode yang ada... ForeColor=65535;
SourceExpr="Sales (LCY)";
DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
{ 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
// Delete the following lines.
SourceExpr="Document Type";
DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
// End of the deleted lines.
}
}
{ PROPERTIES
{
SectionType=Body;
...Penggantian kode
...ForeColor=65535;
SourceExpr="Sales (LCY)";
DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
{ 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
// Add the following lines.
SourceExpr=("Document Type" = "Document Type"::Invoice);
DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
{ 1150012;TextBox ;17100;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
SourceExpr=("Document Type" = "Document Type"::"Credit Memo");
DataSetFieldName=Cust__Ledger_Entry__Document_Type_1 }
// End of the added lines.
}
}
{ PROPERTIES
{
SectionType=Body;
... -
Ubah kode di fungsi CalcExrate di SR Cust. Daftar faktur Posting laporan (11586):
Kode yang ada 1...TextAlign>Right</TextAlign>
<VerticalAlign>Middle</VerticalAlign>
</Style>
<Value>=iif(True
,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
// Delete the following line.
+CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_.Value))+chr(177)
// End of the deleted lines.
+CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
+CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control41.Value)),"")</Value>
</Textbox>
</ReportItems>
</TableCell>
...Penggantian kode 1
... <TextAlign>Right</TextAlign>
<VerticalAlign>Middle</VerticalAlign>
</Style>
<Value>=iif(True
,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
// Add of the following line.
+CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_1.Value))+chr(177)
// End of the added line.
+CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
+CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control41.Value)),"")</Value>
</Textbox>
</ReportItems>
</TableCell>
...Kode yang ada 2
...TotalProfitLCY = 0
TotalProfitPct = 0
TotalAmountLCY = 0
End Function
// Delete the following lines.
Function CalcNoOfInvoices(DocumentType as string)
if DocumentType = "Invoice"
// End of the deleted lines.
NoOfInvoices += 1
end if
return NoOfInvoices
End Function
...Penggantian kode 2
... TotalProfitLCY = 0
TotalProfitPct = 0
TotalAmountLCY = 0
End Function
// Add the following lines.
+ Function CalcNoOfInvoices(DocumentType as Boolean)
+ if DocumentType
// End of the added lines.
NoOfInvoices += 1
end if
return NoOfInvoices
End Function
...Kode yang ada 3
...end if
return NoOfInvoices
End Function
Function CalcNoOfCredMemos(DocumentType as string)
// Delete the following line.
if DocumentType = "Credit Memo"
// End of the deleted line.
NoOfCredMemos += 1
end if
return NoOfCredMemos
End Function
...Penggantian kode 3
...end if
return NoOfInvoices
End Function
Function CalcNoOfCredMemos(DocumentType as string)
// Add the following line.
if DocumentType
// End of the added line.
NoOfCredMemos += 1
end if
return NoOfCredMemos
End Function
...Ada kode 4
...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Document_Type_">
<DataField>Cust__Ledger_Entry__Document_Type_</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Amount__LCY___Control41">
<DataField>Cust__Ledger_Entry__Amount__LCY___Control41</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Amount__LCY___Control41Format">
<DataField>Cust__Ledger_Entry__Amount__LCY___Control41Format</DataField>
...Penggantian kode 4
...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Document_Type_">
<DataField>Cust__Ledger_Entry__Document_Type_</DataField>
</Field>
// Add the following lines.
<Field Name="Cust__Ledger_Entry__Document_Type_1">
<DataField>Cust__Ledger_Entry__Document_Type_1</DataField>
</Field>
// End of the added lines.
<Field Name="Cust__Ledger_Entry__Amount__LCY___Control41">
<DataField>Cust__Ledger_Entry__Amount__LCY___Control41</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Amount__LCY___Control41Format">
<DataField>Cust__Ledger_Entry__Amount__LCY___Control41Format</DataField>
...
-
Ubah kode di bagian 1 jumlah Item Data di SR Cust. Laporan pembayaran daftar faktur (11587):
Kode yang ada... ForeColor=65535;
SourceExpr="Sales (LCY)";
DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
{ 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
// Delete the following lines.
SourceExpr="Document Type";
DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
// End of the deleted lines.
}
}
{ PROPERTIES
{
SectionType=Body;
...Penggantian kode
... ForeColor=65535;
SourceExpr="Sales (LCY)";
DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
{ 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
// Add the following lines.
SourceExpr=("Document Type" = "Document Type"::Invoice);
DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
{ 1150013;TextBox ;17100;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
SourceExpr=("Document Type" = "Document Type"::"Credit Memo");
DataSetFieldName=Cust__Ledger_Entry__Document_Type_1 }
// End of the added lines.
}
}
{ PROPERTIES
{
SectionType=Body;
... -
Ubah kode di fungsi CalcExrate di SR Cust. Laporan pembayaran daftar faktur (11587):
Kode yang ada 1...<TextAlign>Right</TextAlign>
<VerticalAlign>Middle</VerticalAlign>
</Style>
<Value>=iif(True
,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
//Delete the following line.
+CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_.Value))+chr(177)
// End of the deleted line.
+CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
+CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control100.Value)),"")</Value>
</Textbox>
</ReportItems>
</TableCell>
...Penggantian kode 1
...<TextAlign>Right</TextAlign>
<VerticalAlign>Middle</VerticalAlign>
</Style>
<Value>=iif(True
,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
// Add the following line.
+ +CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_1.Value))+chr(177)
// End of the added line.
+CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
+CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control100.Value)),"")</Value>
</Textbox>
</ReportItems>
</TableCell>
...Kode yang ada 2
...TotalProfitLCY = 0
TotalProfitPct = 0
TotalAmountLCY = 0
End Function
// Delete the following lines.
Function CalcNoOfInvoices(DocumentType as string)
if DocumentType = "Invoice"
// End of the deleted lines.
NoOfInvoices += 1
end if
return NoOfInvoices
End Function
...Penggantian kode 2
...TotalProfitLCY = 0
TotalProfitPct = 0
TotalAmountLCY = 0
End Function
// Add the following lines.
Function CalcNoOfInvoices(DocumentType as Boolean)
if DocumentType
// End of the added lines.
NoOfInvoices += 1
end if
return NoOfInvoices
End Function
...Kode yang ada 3
...NoOfInvoices += 1
end if
return NoOfInvoices
End Function
// Delete the following lines.
Function CalcNoOfCredMemos(DocumentType as string)
if DocumentType = "Credit Memo"
// End of the deleted lines.
NoOfCredMemos += 1
end if
return NoOfCredMemos
End Function
...Penggantian kode 3
... NoOfInvoices += 1
end if
return NoOfInvoices
End Function
// Add the following lines.
Function CalcNoOfCredMemos(DocumentType as Boolean)
if DocumentType
// End of the added lines.
NoOfCredMemos += 1
end if
return NoOfCredMemos
End Function
...Ada kode 4
...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Document_Type_">
<DataField>Cust__Ledger_Entry__Document_Type_</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Amount__LCY___Control100">
<DataField>Cust__Ledger_Entry__Amount__LCY___Control100</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Amount__LCY___Control100Format">
<DataField>Cust__Ledger_Entry__Amount__LCY___Control100Format</DataField>
...Penggantian kode 4
... <DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Document_Type_">
<DataField>Cust__Ledger_Entry__Document_Type_</DataField>
</Field>
// Add the following lines.
<Field Name="Cust__Ledger_Entry__Document_Type_1">
<DataField>Cust__Ledger_Entry__Document_Type_1</DataField>
</Field>
// End of the added lines.
<Field Name="Cust__Ledger_Entry__Amount__LCY___Control100">
<DataField>Cust__Ledger_Entry__Amount__LCY___Control100</DataField>
</Field>
<Field Name="Cust__Ledger_Entry__Amount__LCY___Control100Format">
<DataField>Cust__Ledger_Entry__Amount__LCY___Control100Format</DataField>
...
Prasyarat
Anda harus memiliki salah satu produk berikut ini diinstal untuk menerapkan perbaikan terbaru ini:
-
Swiss versi Microsoft Dynamics NAV 2009 R2
-
Swiss versi Microsoft Dynamics NAV 2009 SP1
Informasi penghapusan
Anda tidak dapat menghapus hotfix ini.
Status
Microsoft telah memastikan bahwa ini merupakan masalah di dalam produk Microsoft sebagaimana tercantum di bagian "Berlaku untuk".
Catatan Ini adalah artikel "Penerbitan cepat" dibuat langsung dari dalam organisasi dukungan Microsoft. Informasi yang terkandung di dalamnya disediakan sebagai tanggapan masalah yang muncul. Sebagai akibat dari kecepatan untuk menjadikannya tersedia, materi dapat mengandung kesalahan ketik dan dapat direvisi setiap saat tanpa pemberitahuan. Lihat Ketentuanuntuk pertimbangan lainnya.
