Pierakstīties, izmantojot Microsoft
Pierakstīties vai izveidot kontu
Sveicināti!
Atlasīt citu kontu.
Jums ir vairāki konti
Izvēlieties kontu, ar kuru vēlaties pierakstīties.

Ātri publicētās raksti sniedz informāciju tieši no Microsoft atbalsta organizācijas. Šajos dokumentos sniegtā informācija ir izveidota, atbildot uz neatliekamām vai unikālām tēmām, vai ir paredzēts Papildinājums citai zināšanu bāzes informācijai.

Šis raksts attiecas uz Microsoft Dynamics NAV 2009 visās valstīs un visu valodu lokalizācijas.

Pazīmes

Ja piegādātāja bilance ir negatīva Microsoft Dynamics NAV 2009. gada 1. servisa pakotni, ziņojuma "Iesakām piegādātāju maksājumi" (393) iesaka negatīva bilance maksājumu.

Risinājums

Informācija par labojumfailu

Pašlaik korporācija Microsoft piedāvā atbalstītu labojumfailu. Tomēr tas ir paredzēts tikai šajā rakstā aprakstītās problēmas novēršanai. Izmantojiet to tikai tām sistēmām, kurām ir radusies tieši šī problēma. Iespējams, tiks veikta šī labojumfaila papildu testēšana. Tādēļ, ja jums ir šī problēma nerada nopietnus traucējumus, ieteicams nogaidīt, līdz tiks izlaista nākamā servisa pakotne Microsoft Dynamics NAV 2009 vai nākamo Microsoft Dynamics NAV versiju, kurā ir iekļauts šis labojumfails.

Piezīme. Īpašos gadījumos standarta izmaksas par atbalsta zvaniem nav jāsedz, ja tehniskā atbalsta speciālists Microsoft Dynamics un saistītiem produktiem nosaka, ka šo problēmu novērsīs noteikts atjauninājums. Parasti atbalsta izmaksas tiek piemērotas jautājumiem par papildu atbalstu un problēmām, kas neskar specifisko atjauninājumu apspriešanu.



Informācija par instalēšanu

Microsoft piedāvā programmēšanas piemērus tikai uzskatāmībai, nesniedzot nekādas tiešas vai netiešas garantijas. Tas ietver, bet neaprobežojas ar netiešām garantijām par piemērotību pārdošanai vai atbilstību noteiktam mērķim. Šajā rakstā tiek pieņemts, ka pārzināt programmēšanas valodu, kas tiek aprakstīta, un rīkus, kas tiek izmantoti, lai izveidotu un atkļūdotu procedūras. Microsoft atbalsta inženieri var palīdzēt izskaidrot kādas noteiktas procedūras funkcionalitāti, taču viņi nemainīs šos piemērus, lai sniegtu skaidrāku funkcionalitāti, un neveidos jaunas procedūras, kas atbilstu īpašām prasībām.

Piezīme. Pirms šī labojumfaila instalēšanas pārliecinieties, vai ka visi Microsoft Navision klients lietotāji ir atteikušies sistēmu. Tas ietver Microsoft Navision lietojumprogrammu pakalpojumu (NAS) klients lietotājiem. Jums ir jābūt tikai klienta lietotājam, kurš ir pieteicies datorā, kad izmantojat šo labojumfailu.

Lai ieviestu šo labojumfailu, datorā jābūt instalētai izstrādātāja licenci.

Ieteicams, ka lietotāja konts tiek atvērts logs Windows lietotājvārdi vai logā datu bāzes lietotājvārdi piešķirt "SUPER" lomas ID Ja lietotāja kontam nevar piešķirt "SUPER" lomas ID, ir jāpārbauda lietotāja konts ir šādas atļaujas:

  • Objektu, kad tiks mainīts modificēt atļaujas.

  • Izpildes atļaujas sistēmas objekta ID 5210 objektam un sistēmas objekta ID 9015 objektam.



Piezīme. Jums nav tiesības datu krātuvju, izņemot gadījumus, kad jāveic datu labošanas.

Koda izmaiņas

Piezīme. Vienmēr pārbaudes kods novērš kontrolētā vidē pirms lietojat datoru ražošanas labojumus.
Lai novērstu šo problēmu, rīkojieties šādi:

  1. Nomainiet šo kodu ar piegādātāju - OnPostDataItem izraisīt "Ieteikt kreditoru maksājumi" ziņojumā (393) šādi:
    Kods

    ...   IF FIND('-') THEN
    REPEAT
    Window.UPDATE(1,"No.");
    PayableVendLedgEntry.SETRANGE("Vendor No.","No.");
    GetVendLedgEntries(TRUE,TRUE);
    GetVendLedgEntries(FALSE,TRUE);
    CheckAmounts(TRUE);
    UNTIL (NEXT = 0) OR StopPayments;
    END;

    ClearNegative;

    JnlLineDim.LOCKTABLE;
    ...

    Aizstāšanas kodu

    ...   IF FIND('-') THEN
    REPEAT
    Window.UPDATE(1,"No.");
    PayableVendLedgEntry.SETRANGE("Vendor No.","No.");
    GetVendLedgEntries(TRUE,TRUE);
    GetVendLedgEntries(FALSE,TRUE);
    CheckAmounts(TRUE);
    ClearNegative;
    UNTIL (NEXT = 0) OR StopPayments;
    END ELSE
    IF FIND('-') THEN
    REPEAT
    ClearNegative;
    UNTIL NEXT = 0;

    JnlLineDim.LOCKTABLE;
    ...

  2. Nomainiet šo kodu GetVendLedgEntries procedūras "Ieteikt kreditoru maksājumi" ziņojumā (393) šādi:
    Kods

    ...  VendLedgEntry.RESET;
    VendLedgEntry.SETCURRENTKEY("Vendor No.",Open,Positive,"Due Date");
    VendLedgEntry.SETRANGE("Vendor No.",Vendor."No.");
    VendLedgEntry.SETRANGE(Open,TRUE);
    VendLedgEntry.SETRANGE(Positive,Positive);

    IF Future THEN BEGIN
    ...

    Aizstāšanas kodu

    ...  VendLedgEntry.RESET;
    VendLedgEntry.SETCURRENTKEY("Vendor No.",Open,Positive,"Due Date");
    VendLedgEntry.SETRANGE("Vendor No.",Vendor."No.");
    VendLedgEntry.SETRANGE(Open,TRUE);
    VendLedgEntry.SETRANGE(Positive,Positive);
    VendLedgEntry.SETRANGE("Applies-to ID",'');
    IF Future THEN BEGIN
    ...

  3. Nomainiet šo kodu MakeGenJnlLines procedūras "Ieteikt kreditoru maksājumi" ziņojumā (393) šādi:
    Kods

    ...      Window.UPDATE(1,VendLedgEntry."Vendor No.");
    TempPaymentBuffer.INSERT;
    END;
    VendLedgEntry.TESTFIELD("Applies-to ID",'');
    VendLedgEntry."Applies-to ID" := TempPaymentBuffer."Document No.";
    END ELSE BEGIN
    ...

    Aizstāšanas kodu

    ...      Window.UPDATE(1,VendLedgEntry."Vendor No.");
    TempPaymentBuffer.INSERT;
    END;

    VendLedgEntry."Applies-to ID" := TempPaymentBuffer."Document No.";
    END ELSE BEGIN
    ...

  4. Nomainiet šo kodu ClearNegative procedūras "Ieteikt kreditoru maksājumi" ziņojumā (393) šādi:
    Kods

    ...      WHILE PayableVendLedgEntry.NEXT <> 0 DO BEGIN
    TempCurrency.Code := PayableVendLedgEntry."Currency Code";
    CurrencyBalance := 0;
    PayableVendLedgEntry2 := PayableVendLedgEntry;
    IF TempCurrency.INSERT THEN BEGIN

    PayableVendLedgEntry.SETRANGE("Currency Code",PayableVendLedgEntry."Currency Code");
    REPEAT
    CurrencyBalance := CurrencyBalance + PayableVendLedgEntry."Amount (LCY)"
    UNTIL PayableVendLedgEntry.NEXT = 0;
    IF CurrencyBalance < 0 THEN
    PayableVendLedgEntry.DELETEALL;
    END;
    PayableVendLedgEntry.SETRANGE("Currency Code");
    PayableVendLedgEntry := PayableVendLedgEntry2;
    END;
    ...

    Aizstāšanas kodu

    ...      WHILE PayableVendLedgEntry.NEXT <> 0 DO BEGIN
    TempCurrency.Code := PayableVendLedgEntry."Currency Code";
    CurrencyBalance := 0;

    IF TempCurrency.INSERT THEN BEGIN
    PayableVendLedgEntry2 := PayableVendLedgEntry;
    PayableVendLedgEntry.SETRANGE("Currency Code",PayableVendLedgEntry."Currency Code");
    REPEAT
    CurrencyBalance := CurrencyBalance + PayableVendLedgEntry."Amount (LCY)"
    UNTIL PayableVendLedgEntry.NEXT = 0;
    IF CurrencyBalance < 0 THEN
    PayableVendLedgEntry.DELETEALL;
    PayableVendLedgEntry.SETRANGE("Currency Code");
    PayableVendLedgEntry := PayableVendLedgEntry2;
    END;
    END;
    ...

Priekšnosacījumi

Jābūt instalētai Microsoft Dynamics NAV 2009. gada 1. servisa pakotni, lai lietotu šo labojumfailu.

Informācija par noņemšanu

Nevar noņemt šo labojumfailu.

Statuss

Korporācija Microsoft ir apstiprinājusi, ka šī problēma pastāv Microsoft produktos, kas ir minēti sadaļā "Attiecas uz".

MICROSOFT UN/VAI TĀS ATTIECĪGIE PIEGĀDĀTĀJI NEIZDARA PAZIŅOJUMUS UN NESNIEDZ GARANTIJAS PAR PIEMĒROTĪBU, UZTICAMĪBU VAI PRECIZITĀTI INFORMĀCIJU, KAS ATRODAS DOKUMENTOS UN AR TIEM SAISTĪTAJĀS GRAFIKĀS, KAS PUBLICĒTAS ŠAJĀ VIETNĒ ("MATERIĀLI") JEBKĀDIEM NOLŪKIEM.

MATERIĀLOS VAR TIKT IETVERTAS TEHNISKAS NEPRECIZITĀTES VAI TIPOGRĀFISKAS KĻŪDAS UN VAR TIKT PĀRSKATĪTI JEBKURĀ LAIKĀ BEZ IEPRIEKŠĒJA BRĪDINĀJUMA. IEVĒROJOT LIKUMDOŠANĀ NOTEIKTOS IEROBEŽOJUMUS, KORPORĀCIJA MICROSOFT UN/VAI TĀS PIEGĀDĀTĀJI ATSAKĀS UN IZSLĒDZ VISUS PROTESTUS, GARANTIJAS UN NOSACĪJUMUS VAI IZTEIKTUS, IZRIETOŠUS VAI AR LIKUMU NOTEIKTUS, IESKAITOT, BET NEAPROBEŽOJOTIES AR PAZIŅOJUMIEM, GARANTIJĀM VAI NOSACĪJUMIEM PAR NOSAUKUMU, NEPĀRKĀPŠANU, APMIERINOŠU STĀVOKLI VAI KVALITĀTI, PIEMĒROTĪBU PĀRDOŠANAI UN PIEMĒROTĪBU NOTEIKTAM MĒRĶIM ATTIECĪBĀ UZ MATERIĀLIEM.

Nepieciešama papildu palīdzība?

Vēlaties vairāk opciju?

Izpētiet abonementa priekšrocības, pārlūkojiet apmācības kursus, uzziniet, kā aizsargāt ierīci un veikt citas darbības.

Kopienas palīdz uzdot jautājumus un atbildēt uz tiem, sniegt atsauksmes, kā arī saņemt informāciju no ekspertiem ar bagātīgām zināšanām.

Vai šī informācija bija noderīga?

Cik lielā mērā esat apmierināts ar valodas kvalitāti?
Kas ietekmēja jūsu pieredzi?
Nospiežot Iesniegt, jūsu atsauksmes tiks izmantotas Microsoft produktu un pakalpojumu uzlabošanai. Jūsu IT administrators varēs vākt šos datus. Paziņojums par konfidencialitāti.

Paldies par jūsu atsauksmēm!

×