Príznaky
Nainštalujete najnovšiu verziu zostavy zoznam účtov konta, ak sa faktúry súvisiace platobnú transakciu, a potom post v talianskej verzie Microsoft Dynamics NAV 2009, správa konta účty zoznam nezobrazuje platby. Zobrazuje len faktúry ako zavrieť. Postupujte podľa pokynov zmeny kódu sekcia na riešenie tohto problému. Tento problém sa vyskytuje v nasledovných produktov:
-
Talianskej verzie systému Microsoft Dynamics NAV 2009 R2
-
Talianskej verzie systému Microsoft Dynamics NAV 2009 SP1
Riešenie
Informácie o rýchlej oprave
Rýchla oprava je k dispozícii od spoločnosti Microsoft. Je však určená iba opraviť problém popísaný v tomto článku. Použite ju iba v počítačoch s týmto konkrétnym problémom. Môže, že táto rýchla oprava bude ďalej testovaná. Ak vám nespôsobuje tento problém, odporúčame vám počkať na ďalšiu Microsoft Dynamics NAV 2009 service pack alebo ďalšej verzii Microsoft Dynamics NAV, ktorá obsahuje túto rýchlu opravu.
Poznámka: V špeciálnych prípadoch sa poplatky, ktoré sú telefonickú podporu nemusia účtovať ak technickú podporu Professional pre Microsoft Dynamics a súvisiace produkty zistí, že táto konkrétna aktualizácia vyrieši váš problém. Ďalšie otázky a žiadosti o technickú podporu, ktoré sa netýkajú tejto špecifickej aktualizácie, podliehajú bežným sadzbám za poskytovanie technickej podpory.
Informácie o inštalácii
Spoločnosť Microsoft poskytuje príklady programovacieho kódu len ako názornú ukážku bez vyjadrených či predpokladaných záruk. Tie okrem iného zahŕňajú predpokladané záruky obchodovateľnosti alebo vhodnosti na konkrétny účel. Tento článok predpokladá, že ovládate predvádzaný programovací jazyk a nástroje, ktoré sa používajú na vytváranie a ladenie procedúr. Pracovníci technickej podpory spoločnosti Microsoft môžu vysvetliť fungovanie konkrétneho postupu. Ale nemôžu tieto príklady poskytovať pridanú funkčnosť alebo konštrukčné procedúry zohľadňujúce vaše konkrétne požiadavky.
Poznámka: Pred inštaláciou tejto rýchlej opravy, kontrola všetkých používateľov klienta Microsoft Dynamics NAV systém. To zahŕňa služby Microsoft Dynamics NAV aplikácie servera (NAS). Mali by ste byť iba klient prihláseného používateľa je pri implementácii túto rýchlu opravu.
Vykonávať túto rýchlu opravu, musíte mať licencie pre vývojárov.
Odporúčame, aby používateľského konta v okne prihlásenia systému Windows alebo v okne prihlásenia do databázy pridelí "SUPER" úlohu ID. Ak používateľské konto nemožno priradiť úlohu ID "SUPER", musíte overiť, že používateľské konto má nasledujúce povolenia:
-
Zmeniť povolenia pre objekt, ktorý sa zmení.
-
Povolenia na vykonanie systému objekt ID 5210 a systém objekt ID 9015
objekt.
Poznámka: Nemusíte mať práva ukladá údaje, pokiaľ budete musieť vykonať opravy údajov.
Zmeny kódu
Poznámka: Vždy skúšobný opravy v prostredí kontrolované pred použitím opravy výroby počítačov.
Ak chcete vyriešiť tento problém, postupujte nasledovne:
-
Zmena kódu v zoznam účtov konta správa (12116):
Nahradenie kód 1...DataItemTableView=SORTING(Vendor Ledger Entry No.,Entry Type,Posting Date)
WHERE(Entry Type=CONST(Application));
OnPreDataItem=BEGIN
// Delete the following line.
VendLedgEntry1.COPYFILTER("Posting Date", "Detailed Vendor Ledg. Entry"."Posting Date");
// End of the deleted line.
END;
OnAfterGetRecord=BEGIN
...Nahradenie kód 1
...DataItemTableView=SORTING(Vendor Ledger Entry No.,Entry Type,Posting Date)
WHERE(Entry Type=CONST(Application));
OnPreDataItem=BEGIN
// Add the following line.
FindAppliedDtldVendLedgEntry(VendLedgEntry1."Entry No.");
// End of the added line.
END;
OnAfterGetRecord=BEGIN
...Existujúci kód 2
... END;
OnAfterGetRecord=BEGIN
// Delete the following lines.
VendLedgEntry3.GET("Applied Vend. Ledger Entry No.");
VendLedgEntry3.CALCFIELDS("Original Amt. (LCY)");
ClosedByAmountLCY := "Amount (LCY)";
TotalForVendor += "Amount (LCY)";
TotalClosedByAmntLCY += "Amount (LCY)";
END;
DataItemLink=Vendor Ledger Entry No.=FIELD(Entry No.);
// End of the deleted lines.
}
SECTIONS
{
...Nahradenie kód 2
... END;
OnAfterGetRecord=BEGIN
// Add the following lines.
IF NOT TempDetailedVendorLedgEntryApplied.GET("Entry No.") THEN
CurrReport.SKIP;
VendLedgEntry3.GET("Vendor Ledger Entry No.");
VendLedgEntry3.CALCFIELDS("Original Amt. (LCY)");
AppliedDocumentTypeText := FORMAT(VendLedgEntry3."Document Type");
ClosedByAmountLCY := "Amount (LCY)";
TotalForVendor -= "Amount (LCY)";
TotalClosedByAmntLCY -= "Amount (LCY)";
END;
// End of the added lines.
}
SECTIONS
{
...Existujúci kód 3
...SectionWidth=27750;
SectionHeight=846;
OnPreSection=BEGIN
IF (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::Payment)
OR (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::" ") THEN
CurrReport.SHOWOUTPUT(FALSE)
ELSE
CurrReport.SHOWOUTPUT(TRUE);
IF ("Unapplied by Entry No." <> 0) THEN
CurrReport.SHOWOUTPUT(FALSE);
END;
...Nahradenie kód 3
...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
CurrReport.SHOWOUTPUT(FALSE)
ELSE
CurrReport.SHOWOUTPUT(TRUE);
// End of the deleted lines.
IF ("Unapplied by Entry No." <> 0) THEN
CurrReport.SHOWOUTPUT(FALSE);
END;
...Existujúci kód 4
... { 1130070;TextBox ;19200;0 ;1800 ;423 ;SourceExpr=ClosedByAmountLCY;
DataSetFieldName=ClosedByAmountLCY_Control1130070 }
{ 1130071;TextBox ;5550 ;0 ;1500 ;423 ;HorzAlign=Right;
// Delete the following lines.
SourceExpr="Document No.";
DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_No__ }
{ 1130072;TextBox ;1950 ;0 ;1350 ;423 ;SourceExpr="Document Type";
// End of the deleted lines.
DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_Type_ }
{ 1130073;TextBox ;0 ;0 ;1800 ;423 ;CaptionML=[ENU=PostingDate;
ITA=Data di registrazione];
...Nahradenie kód 4
...{ 1130070;TextBox ;19200;0 ;1800 ;423 ;SourceExpr=ClosedByAmountLCY;
DataSetFieldName=ClosedByAmountLCY_Control1130070 }
{ 1130071;TextBox ;5550 ;0 ;1500 ;423 ;HorzAlign=Right;
// Add the following lines.
SourceExpr=VendLedgEntry3."Document No.";
DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_No__ }
{ 1130072;TextBox ;1950 ;0 ;1350 ;423 ;SourceExpr=AppliedDocumentTypeText;
// End of the added lines.
DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_Type_ }
{ 1130073;TextBox ;0 ;0 ;1800 ;423 ;CaptionML=[ENU=PostingDate;
ITA=Data di registrazione];
...Existujúci kód 5
... DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_Type_ }
{ 1130073;TextBox ;0 ;0 ;1800 ;423 ;CaptionML=[ENU=PostingDate;
ITA=Data di registrazione];
// Delete the following line.
SourceExpr=FORMAT("Posting Date");
// End of the deleted line.
DataSetFieldName=Detailed_Vendor_Ledg__Entry__Posting_Date_ }
{ 1130074;TextBox ;7200 ;0 ;1650 ;423 ;SourceExpr=VendLedgEntry3."Document Occurrence";
DataSetFieldName=VendLedgEntry3__Document_Occurrence_ }
...Nahradenie kód 5
...DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_Type_ }
{ 1130073;TextBox ;0 ;0 ;1800 ;423 ;CaptionML=[ENU=PostingDate;
ITA=Data di registrazione];
// Add the following line.
SourceExpr=FORMAT(VendLedgEntry3."Posting Date");
// End of the added line.
DataSetFieldName=Detailed_Vendor_Ledg__Entry__Posting_Date_ }
{ 1130074;TextBox ;7200 ;0 ;1650 ;423 ;SourceExpr=VendLedgEntry3."Document Occurrence";
DataSetFieldName=VendLedgEntry3__Document_Occurrence_ }
...Existujúci kód 6
...ForeColor=65535;
SourceExpr="Unapplied by Entry No.";
DataSetFieldName=Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__ }
}
}
{ PROPERTIES
...Nahradenie kód 6
... ForeColor=65535;
SourceExpr="Unapplied by Entry No.";
DataSetFieldName=Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__ }
// Add the following lines.
{ 1130178;TextBox ;21150;0 ;1800 ;423 ;Visible=No;
SourceExpr="Vendor Ledger Entry No.";
DataSetFieldName=Detailed_Vendor_Ledg__Entry_Vendor_Ledger_Entry_No_ }
// End of the added lines.
}
}
{ PROPERTIES
... -
Zmena kódu v globálne premenné v konto účty zoznam správa (12116) takto:
Nahradenie kód 1...VAR
Text000@1130000 : TextConst 'ENU=Please specify the Ending Date;ITA=Specificare Data fine';
VendorBillLine@1130001 : Record 12182;
EndingDate@1130002 : Date;
OnlyOpened@1130003 : Boolean;
RemainingAmountLCY@1130004 : Decimal;
...Nahradenie kód 1
...VAR
Text000@1130000 : TextConst 'ENU=Please specify the Ending Date;ITA=Specificare Data fine';
VendorBillLine@1130001 : Record 12182;
// Add the following line.
TempDetailedVendorLedgEntryApplied@1130013 : TEMPORARY Record 380;
// End of the added line.
EndingDate@1130002 : Date;
OnlyOpened@1130003 : Boolean;
RemainingAmountLCY@1130004 : Decimal;
...Existujúci kód 2
...TotalVendorBillAmnt@1130010 : Decimal;
VendLedgEntry3@1130011 : Record 25;
VendorLedgerEmtryTypeINT@1102601000 : Integer;
BEGIN
END.
...Nahradenie kód 2
...TotalVendorBillAmnt@1130010 : Decimal;
VendLedgEntry3@1130011 : Record 25;
VendorLedgerEmtryTypeINT@1102601000 : Integer;
// Add the following lines.
AppliedDocumentTypeText@1170000000 : Text[30];
LOCAL PROCEDURE FindAppliedDtldVendLedgEntry@1130007(VendorLedgerEntryNo@1130000 : Integer);
VAR
DetailedVendorLedgEntry@1130001 : Record 380;
DetailedVendorLedgEntryApplied@1130003 : Record 380;
BEGIN
TempDetailedVendorLedgEntryApplied.RESET;
TempDetailedVendorLedgEntryApplied.DELETEALL;
DetailedVendorLedgEntry.SETRANGE("Vendor Ledger Entry No.",VendorLedgerEntryNo);
DetailedVendorLedgEntry.SETRANGE("Entry Type",DetailedVendorLedgEntry."Entry Type"::Application);
DetailedVendorLedgEntry.SETRANGE(Unapplied,FALSE);
DetailedVendorLedgEntryApplied.SETRANGE(
"Entry Type",DetailedVendorLedgEntryApplied."Entry Type"::Application);
IF DetailedVendorLedgEntry.FINDSET THEN
REPEAT
DetailedVendorLedgEntryApplied.SETRANGE(
"Applied Vend. Ledger Entry No.",DetailedVendorLedgEntry."Applied Vend. Ledger Entry No.");
DetailedVendorLedgEntryApplied.SETFILTER(
"Vendor Ledger Entry No.",'<>%1',VendorLedgerEntryNo);
DetailedVendorLedgEntryApplied.SETRANGE(
"Vendor No.",DetailedVendorLedgEntry."Vendor No.");
DetailedVendorLedgEntryApplied.SETRANGE(
"Transaction No.",DetailedVendorLedgEntry."Transaction No.");
IF DetailedVendorLedgEntryApplied.FINDSET THEN
REPEAT
TempDetailedVendorLedgEntryApplied := DetailedVendorLedgEntryApplied;
IF TempDetailedVendorLedgEntryApplied.INSERT THEN;
UNTIL DetailedVendorLedgEntryApplied.NEXT = 0;
UNTIL DetailedVendorLedgEntry.NEXT = 0;
END;
// End of the added lines.
BEGIN
END.
... -
Zmena kódu v zoznam účtov konta správa (12116):
Existujúci kód...</TableCell>
</TableCells>
<Visibility>
// Delete the following line.
<Hidden>=IIF((Count(Fields!Detailed_Vendor_Ledg__Entry_Vendor_Ledger_Entry_No_.Value)=Rownumber("table1_Group3")),
// End of the deleted line.
FALSE,TRUE)</Hidden>
</Visibility>
</TableRow>
...Nahradenie kódu
... </TableCell>
</TableCells>
<Visibility>
// Add the following line.
<Hidden>=IIF((Count(Fields!Detailed_Vendor_Ledg__Entry_Entry_No_.Value)=Rownumber("table1_Group3")),
// End of the added line.
FALSE,TRUE)</Hidden>
</Visibility>
</TableRow>
...
Požiadavky
Musíte mať jednu z nasledovných produktov nainštalovaný chcete použiť túto rýchlu opravu:
-
Talianskej verzie systému Microsoft Dynamics NAV 2009 R2
-
Talianskej verzie systému Microsoft Dynamics NAV 2009 SP1
Informácie o odstránení
Nemôžete odstrániť túto rýchlu opravu.
Stav
Spoločnosť Microsoft potvrdila, že ide o problém v produktoch spoločnosti Microsoft, ktoré sú uvedené v časti Vzťahuje sa na.
Poznámka: To je "Rýchlo publikovať" článok vytvorené priamo v rámci organizácie technickej podpory spoločnosti Microsoft. Uvedené informácie sa poskytuje ako-v reakcii na naliehavé problémy. Rýchlosťou robiť materiály môžu obsahovať typografické chyby a môžu byť revidované kedykoľvek bez predchádzajúceho upozornenia. Prečítajte si Podmienky používaniaz iných dôvodov.
