Tiekėjo sąskaitą KS sąrašą ataskaitoje rodomi kredito pažymos Italijos versija Microsoft Dynamics NAV 2009

Šablonas: CPR - Navision kodas nustatyti šablonas

BUG #: 206057 (turinio priežiūra)

Šis straipsnis taikomas Microsoft Dynamics NAV italų (it) kalbos lokalės.

Požymiai

Registruoti ir grąžinimo gretinimas tiekėjų kredito pažymos, tiekėjo sąskaita Bill sąrašo ataskaitą (12116) nerodo grąžinimo pažyma. Ši problema iškyla faile šiems produktams:

  • Italų kalba, Microsoft Dynamics NAV 2009 R2

  • Italų kalba, Microsoft Dynamics NAV 2009 Service Pack 1

Sprendimas

Karštųjų pataisų informacija

Palaikomą naujausią pataisą dabar yra Microsoft. Tačiau jos skirtos tik šiame straipsnyje aprašytai problemai spręsti. Taikyti ją tik sistemoms, kuriose kyla ši konkreti problema. Šios karštosios pataisos gali būti papildomai išbandoma. Todėl, jei jums nelabai trukdo Ši problema, rekomenduojame palaukti kito "Microsoft Dynamics NAV 2009" pakeitimų paketo arba kitą versiją Microsoft Dynamics NAV, kuriame bus šios karštosios pataisos.

Pastaba. Konkrečiais atvejais už palaikymo skambučius gali būti atšaukti, jei techninės pagalbos specialistas Microsoft Dynamics ir susijusių produktų taikomi įprasti mokesčiai nustato, kad jūsų problemą galima išspręsti naudojant konkretų naujinimą. Į įprastos kainos už palaikymą taikomos papildomos palaikymo klausimams ir problemoms, kurių negalima išspręsti naudojant minėtą naujinimą.

Jei šios karštosios pataisos nepaskelbtos kaip viešai prieinamos (tai reiškia, viešasis URL šios karštosios pataisos yra suteikta šiame straipsnyje), norint platinti reikia techninio vadovo, problemų sprendimo komandos nario ar vadovo patvirtinimo ir taikoma toliau pateikta informacija:

  • Norėdami gauti karštąją pataisą, klientai turi patirti klaidų, paminėtam skyriuje "Požymiai".

  • Turite stebėti klientus, kuriems siunčiate karštąsias pataisas ir pateikti jiems kitą pakeitimų paketą, kai tik jis bus išleistas (jei pakeitimų paketas bus išleistas).

Šias karštąsias pataisas planuojama įtraukti į Microsoft Dynamics NAV 2013.


Diegimo informacija

Microsoft pateikia programavimo pavyzdžius tik, tačiau nesuteikia jokių aiškių arba numanomų garantijų. Tai apima, bet neapsiribojant, numanomas garantijas dėl perkamumo ir tinkamumo konkrečiam tikslui. Šis straipsnis parašytas galvojant, kad esate susipažinę su pateikta programavimo kalba ir įrankiais, kurie yra naudojami procedūroms kurti ir derinti. "Microsoft" palaikymo inžinieriai gali padėti paaiškindami konkrečios procedūros funkcines galimybes. Tačiau jie nekeis šių pavyzdžių, kad numatytų papildomą funkcinę galimybę arba sukurtų konkrečius jūsų reikalavimus atitinkančias procedūras.

Pastaba. Prieš diegdami šias karštąsias pataisas, patikrinkite, kad visi Microsoft Navision klientas vartotojai išsiregistravę sistema. Tai reiškia, kad Microsoft Navision programos paslaugos (NAS) kliento naudotojai. Jums turėtų būti tik kliento vartotojo, kuris yra prisijungęs, kai atliekate šias karštąsias pataisas.

Norint pritaikyti šią karštąją pataisą, turite programų kūrėjo licencijos.

Rekomenduojame, kad vartotojo abonemento Windows registravimosi lange arba duomenų bazės prisijungimų langas priskirti "SUPER" vaidmenį ID. Jei vartotojo abonementas negali būti priskirta "SUPER" ID., turi patikrinti, kad vartotojo abonementas turi šias teises:

  • Keisti teisės objektas, kuris bus pakeisti.

  • Teisės vykdyti sistemos objekto ID 5210 objekto ir sistemos objekto ID 9015 objekto.



Pastaba. Jūs neturite turėti teisių į duomenų parduotuvių, nebent jūs turite atlikti duomenų atkūrimo.

Pastaba.

Pastaba visada bandymas kodas nustato kontroliuojamoje aplinkoje, prieš taikydami nustato savo gamybos kompiuteriams. Norėdami išspręsti šią problemą, atlikite šiuos veiksmus:

  1. Tiekėjo sąskaitą sąskaitų sąrašo ataskaitą (12116) kodą pakeisti taip:
    Esamas kodas 1

    ...        OnAfterGetRecord=BEGIN
    CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)");

    // Delete the following line.
    IF ((OnlyOpened) OR ("Document Type" IN ["Document Type"::Payment,"Document Type"::"Credit Memo","Document Type"::" "])) AND

    ("Remaining Amt. (LCY)" = 0)
    THEN
    CurrReport.SKIP;
    ...

    Atsarginis kodas 1

    ...        OnAfterGetRecord=BEGIN
    CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)");

    // Add the following line.
    IF ((OnlyOpened) OR ("Document Type" IN ["Document Type"::Payment,"Document Type"::Refund,"Document Type"::" "])) AND

    ("Remaining Amt. (LCY)" = 0)
    THEN
    CurrReport.SKIP;
    ...

    Esamas kodas 2

    ...                           RemainingAmountLCY := 0;
    VendorBillAmnt := 0;

    // Delete the following lines.
    IF ("Document Type" = "Document Type"::Invoice) OR
    ("Document Type" = "Document Type"::"Finance Charge Memo") OR
    ("Document Type" = "Document Type"::Reminder)
    // End of the lines.

    THEN BEGIN
    //TotalClosedByAmntLCY := "Remaining Amt. (LCY)"; //IT0002 - IT0004
    TotalForVendor := TotalForVendor + "Amount (LCY)";
    ...

    Atsarginis kodas 2

    ...                           RemainingAmountLCY := 0;
    VendorBillAmnt := 0;

    // Add the following lines.
    IF "Document Type" IN
    ["Document Type"::Invoice,
    "Document Type"::"Credit Memo",
    "Document Type"::"Finance Charge Memo",
    "Document Type"::Reminder]
    // End of the lines.

    THEN BEGIN
    //TotalClosedByAmntLCY := "Remaining Amt. (LCY)"; //IT0002 - IT0004
    TotalForVendor := TotalForVendor + "Amount (LCY)";
    ...

    Esamas kodas 3

    ...                      END;

    OnAfterGetRecord=BEGIN
    // IT0003.begin
    VendLedgEntry3.GET("Applied Vend. Ledger Entry No.");
    VendLedgEntry3.CALCFIELDS("Original Amt. (LCY)");
    ...

    Pakeitimo kodas 3

    ...                      END;

    OnAfterGetRecord=BEGIN

    // Add the following lines.
    IF ("Entry No." = 0) OR ("Unapplied by Entry No." <> 0) OR
    ("Document Type" IN ["Document Type"::Payment,"Document Type"::Refund,"Document Type"::" "])
    THEN
    ShowDetailedVendorLedgerEntry := TRUE
    ELSE
    ShowDetailedVendorLedgerEntry := FALSE;
    // End of the lines.

    // IT0003.begin
    VendLedgEntry3.GET("Applied Vend. Ledger Entry No.");
    VendLedgEntry3.CALCFIELDS("Original Amt. (LCY)");
    ...

    Esamas kodas 4

    ...            SectionWidth=27750;
    SectionHeight=846;
    OnPreSection=BEGIN

    // Delete the following lines.
    // IT0008.begin
    // IT0011.begin
    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
    // IT0011.end
    CurrReport.SHOWOUTPUT(FALSE)
    ELSE
    CurrReport.SHOWOUTPUT(TRUE);
    // IT0008.end
    // IT0009.begin
    //IF ("Unapplied by Entry No." <> 0) THEN
    // CurrReport.SHOWOUTPUT(FALSE);
    // IT0009.end
    // End of the lines.

    END;

    }
    ...

    Pakeitimo kodekso 4

    ...            SectionWidth=27750;
    SectionHeight=846;
    OnPreSection=BEGIN

    // Add the following line.
    CurrReport.SHOWOUTPUT(ShowDetailedVendorLedgerEntry)

    END;

    }
    ...

    Esamas kodas 5

    ...                                                         ForeColor=65535;
    SourceExpr="Unapplied by Entry No.";
    DataSetFieldName=Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__ }
    }
    }
    { PROPERTIES
    ...

    Pakeitimo kodas 5

    ...                                                         ForeColor=65535;
    SourceExpr="Unapplied by Entry No.";
    DataSetFieldName=Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__ }

    // Add the following lines.
    { 1130084;TextBox ;27150;0 ;150 ;423 ;Visible=No;
    SourceExpr=ShowDetailedVendorLedgerEntry;
    DataSetFieldName=ShowDetailedVendorLedgerEntry }
    // End of the lines.

    }
    }
    { PROPERTIES
    ...

  2. Pakeisti pasaulio kintamuosius tiekėjo sąskaitą sąskaitų sąrašo ataskaitą (12116) kodą taip:
    Esamas kodas

    ...      TotalVendorBillAmnt@1130010 : Decimal;
    VendLedgEntry3@1130011 : Record 25;
    VendorLedgerEmtryTypeINT@1102601000 : Integer;

    BEGIN
    {
    ...

    Pastaba.

    ...      TotalVendorBillAmnt@1130010 : Decimal;
    VendLedgEntry3@1130011 : Record 25;
    VendorLedgerEmtryTypeINT@1102601000 : Integer;

    // Add the following line.
    ShowDetailedVendorLedgerEntry@1130012 : Boolean INDATASET;

    BEGIN
    {
    ...

  3. Tiekėjo sąskaitą sąskaitų sąrašo ataskaitą (12116) kodą pakeisti taip:
    Esamas kodas 1

    ...                    </TableCell>
    </TableCells>
    <Visibility>

    // Delete 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>
    ...

    Atsarginis kodas 1

    ...                    </TableCell>
    </TableCells>
    <Visibility>

    // Add the following line.
    <Hidden>=IIF(Fields!ShowDetailedVendorLedgerEntry.Value,TRUE,FALSE)</Hidden>

    </Visibility>
    </TableRow>
    <TableRow>
    ...

    Esamas kodas 2

    ...        <Field Name="Detailed_Vendor_Ledg__Entry_Vendor_Ledger_Entry_No_">
    <DataField>Detailed_Vendor_Ledg__Entry_Vendor_Ledger_Entry_No_</DataField>
    </Field>
    </Fields>
    <Query>
    <CommandText />
    ...

    Atsarginis kodas 2

    ...        <Field Name="Detailed_Vendor_Ledg__Entry_Vendor_Ledger_Entry_No_">
    <DataField>Detailed_Vendor_Ledg__Entry_Vendor_Ledger_Entry_No_</DataField>
    </Field>

    // Add the following lines.
    <Field Name="ShowDetailedVendorLedgerEntry">
    <DataField>ShowDetailedVendorLedgerEntry</DataField>
    </Field>
    // End of the lines.

    </Fields>
    <Query>
    <CommandText />
    ...

Būtinosios sąlygos

Turi būti viena iš toliau nurodytų produktų, norint taikyti šias karštąsias pataisas:

  • Italų kalba, Microsoft Dynamics NAV 2009 R2

  • Italų kalba, Microsoft Dynamics NAV 2009 Service Pack 1

Pašalinimo informacija

Jūs negalite pašalinti šias karštąsias pataisas.

Būsena

„Microsoft“ patvirtino, kad tai yra „Microsoft“ produktų, išvardytų skyriuje „Taikoma“, problema.

Nuorodos

VSFT DynamicsNAVSE: 355463

Pastaba. Tai yra "GREITAI PUBLIKUOJAMAS" straipsnis, sukurtas tiesiogiai Microsoft palaikymo tarnybos. Čia pateikta informacija yra atsakas į kylančius klausimus. Dėl greito publikavimo medžiagoje gali būti spausdinimo klaidų ir ji gali būti peržiūrima bet kuriuo metu be įspėjimo. Naudojimo ieškokite kitų priežasčių.

Autorius: avannini
Rašytojas: v-brialu
Techninis redaktorius: avannini
Redaktorius:

Reikia daugiau pagalbos?

Tobulinkite savo įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijungti prie "Microsoft Insider"

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

×