Keskeneräinen myyntilasku luodaan, kun luot Luo myyntilasku -funktion kohteille, jotka käyttävät laajennettuja tekstejä Microsoft Dynamics NAV 2009:n Työnsuunnittelurivit -valintaikkunassa

Käytetään kohteeseen
Dynamics NAV 2009

Tämä artikkeli koskee Microsoft Dynamics NAV -ohjelmaa kaikissa maissa ja kaikilla kielialueilla.

Ongelman ilmenemistapa

Oletetaan, että sinulla on useita kohteita, jotka käyttävät laajennettuja tekstejä Microsoft Dynamics NAV 2009:ssä. Kun suoritat Luo myyntilasku -funktion Projektisuunnittelurivit-valintaikkunan kohteissa, luodaan keskeneräinen myyntilasku.
Tämä ongelma ilmenee, kun kohde, jonka Estetty-valintaruutu on valittuna, sisällytetään.

Tämä ongelma ilmenee seuraavissa tuotteissa:

  • Microsoft Dynamics NAV 2009 R2
  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)

Ratkaisu

Hotfix-tiedot

Tuettu hotfix-korjaus on nyt saatavilla Microsoftilta. Sen tarkoituksena on kuitenkin korjata vain tässä artikkelissa kuvattu ongelma. Käytä sitä vain järjestelmissä, joissa on tämä ongelma. Tämä hotfix-korjaus voi saada lisätestejä. Jos ongelma ei siis vaikuta sinuun vakavasti, suosittelemme odottamaan seuraavaa Microsoft Dynamics NAV 2009 Service Pack -pakettia tai seuraavaa Microsoft Dynamics NAV -versiota, joka sisältää tämän hotfix-korjauksen.

Huomautus Erityistapauksissa tukipuheluista tavallisesti aiheutuvat maksut voidaan peruuttaa, jos Microsoft Dynamicsin ja siihen liittyvien tuotteiden teknisen tuen asiantuntija määrittää, että tietty päivitys ratkaisee ongelmasi. Tavanomaiset tukikustannukset koskevat muita tukikysymyksiä ja -ongelmia, jotka eivät ole oikeutettuja kyseiseen päivitykseen.

            
          

Asennustiedot

Microsoft tarjoaa ohjelmointiesimerkkejä vain havainnollistamista varten ilman ilmaistua tai oletettua takuuta. Tämä sisältää muun muassa oletetut takuut soveltuvuudesta kaupankäynnin kohteeksi tai sopivuudesta tiettyyn tarkoitukseen. Tässä artikkelissa oletetaan, että tunnet ohjelmointikielen, jota esitellään, sekä työkalut, joita käytetään toimintosarjojen luomiseen ja virheenkorjaukseen. Microsoftin tukihenkilöt voivat auttaa selittämään tietyn menettelyn toiminnallisuuden, mutta he eivät muokkaa näitä esimerkkejä niin, että ne tarjoaisivat lisätoimintoja tai laativat menetelmiä erityisvaatimusten täyttämiseksi.

Huomautus Varmista ennen tämän hotfix-korjauksen asentamista, että kaikki Microsoft Navision -asiakasohjelman käyttäjät ovat kirjautuneet ulos järjestelmästä. Tämä koskee myös Microsoft Navision Application Services (NAS) -asiakaskäyttäjiä. Sinun pitäisi olla ainoa asiakaskäyttäjä, joka on kirjautunut sisään, kun otat tämän hotfix-korjauksen käyttöön.

Jotta voit ottaa tämän hotfix-korjauksen käyttöön, sinulla on oltava kehittäjän käyttöoikeus.

Suosittelemme, että käyttäjätilille, joka on Windowsin kirjautumisikkunassa tai Tietokannan kirjautumiset -ikkunassa, määritetään "SUPER"-roolitunnus. Jos käyttäjätilille ei voi määrittää "SUPER"-roolitunnusta, sinun on varmistettava, että käyttäjätilillä on seuraavat käyttöoikeudet:

  • Muutettavan objektin Muokkaa-käyttöoikeus.
  • System Object ID 5210 -objektin ja System Object ID 9015 -objektin Suoritus-oikeus.

                
Huomautus Sinulla ei tarvitse olla oikeuksia tietosäilöihin, ellei sinun tarvitse korjata tietoja.

Koodin muutokset

Huomautus Testaa koodikorjaukset aina valvotussa ympäristössä, ennen kuin otat korjaukset käyttöön tuotantotietokoneissasi.
Voit ratkaista ongelman seuraavasti:

  1. Muuta InsertExtendedText-funktion koodia Myyntitilaus-alilomakelomakkeessa (46) seuraavasti:
    Aiemmin luotu koodi

    PROCEDURE InsertExtendedText@5(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;
TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

    Korvaava koodi

    PROCEDURE InsertExtendedText@5(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;

// Add the following line.
COMMIT;

TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

  2. Muuta LisääExtendedText-funktion koodia Myyntilaskun alilomake -lomakkeessa (47) seuraavasti:
    Aiemmin luotu koodi

    PROCEDURE InsertExtendedText@7(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;
TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

    Korvaava koodi

    PROCEDURE InsertExtendedText@7(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;

// Add the following line.
COMMIT;

TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

  3. Muuta InsertExtendedText-funktion koodia Myyntitarjous-alilomakelomakkeessa (95) seuraavasti:
    Aiemmin luotu koodi

    PROCEDURE InsertExtendedText@4(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;
TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

    Korvaava koodi

    PROCEDURE InsertExtendedText@4(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;

// Add the following line.
COMMIT;

TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

  4. Muuta InsertExtendedText-funktion koodia Sales Cr. Memo Subform -lomakkeessa (96) seuraavasti:
    Aiemmin luotu koodi

    PROCEDURE InsertExtendedText@5(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;
TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

    Korvaava koodi

    PROCEDURE InsertExtendedText@5(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;

// Add the following line.
COMMIT;

TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

  5. Muuta InsertExtendedText-funktion koodia Puitemyyntitilaus-alilomakelomakkeessa (508) seuraavasti:
    Aiemmin luotu koodi

    PROCEDURE InsertExtendedText@5(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;
TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

    Korvaava koodi

    PROCEDURE InsertExtendedText@5(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;

// Add the following line.
COMMIT;

TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

  6. Muuta InsertExtendedText-funktion koodia Myyntipalautustilaus-alilomakelomakkeessa (6631) seuraavasti:
    Aiemmin luotu koodi

    PROCEDURE InsertExtendedText@5(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;
TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

    Korvaava koodi

    PROCEDURE InsertExtendedText@5(Unconditionally@1000 : Boolean);
BEGIN
IF TransferExtendedText.SalesCheckIfAnyExtText(Rec,Unconditionally) THEN BEGIN
CurrForm.SAVERECORD;

// Add the following line.
COMMIT;

TransferExtendedText.InsertSalesExtText(Rec);
END;
IF TransferExtendedText.MakeUpdate THEN
UpdateForm(TRUE);
END;

  7. Muuta InsertSalesExtText-funktion koodia Transfer Extended Text codeunit (378) -toiminnossa seuraavasti:
    Aiemmin luotu koodi

    PROCEDURE InsertSalesExtText@2(VAR SalesLine@1000 : Record 37);
VAR
ToSalesLine@1001 : Record 37;
BEGIN

// Delete the following line.
COMMIT;

ToSalesLine.RESET;
ToSalesLine.SETRANGE("Document Type",SalesLine."Document Type");
ToSalesLine.SETRANGE("Document No.",SalesLine."Document No.");
ToSalesLine := SalesLine;
IF ToSalesLine.FIND('>') THEN BEGIN

    Korvaava koodi

    PROCEDURE InsertSalesExtText@2(VAR SalesLine@1000 : Record 37);
VAR
ToSalesLine@1001 : Record 37;
BEGIN
ToSalesLine.RESET;
ToSalesLine.SETRANGE("Document Type",SalesLine."Document Type");
ToSalesLine.SETRANGE("Document No.",SalesLine."Document No.");
ToSalesLine := SalesLine;
IF ToSalesLine.FIND('>') THEN BEGIN

Edellytykset

Sinulla on oltava asennettuna jokin seuraavista tuotteista, jotta voit käyttää tätä hotfix-korjausta:

  • Microsoft Dynamics NAV 2009 R2
  • Microsoft Dynamics NAV 2009 Service Pack 1

Poistotiedot

Et voi poistaa tätä hotfix-korjausta.

Tila

Microsoft on vahvistanut tämän olevan ongelma niissä Microsoftin tuotteissa, jotka ovat listattuna Koskee seuraavia tuotteita -osiossa.

Huomautus Tämä on FAST PUBLISH -artikkeli, joka on luotu suoraan Microsoftin tukiorganisaatiosta. Tässä annetut tiedot annetaan sellaisenaan vastauksena uusiin ongelmiin. Koska materiaalit ovat nopeasti käytettävissä, ne voivat sisältää typografisia virheitä, ja niitä voidaan muuttaa milloin tahansa ilman ennakkoilmoitusta. Lisätietoja on ohjeaiheessa Käyttöehdot .