A címtár újratervezése - a vállalkozás 1-es programozása és konfigurálása 7
Hello mindenkinek!
van egy kis probléma.
A konfiguráció összevonása során hiba történt
A TMC referenciakönyvének kódjainak egyediségét szabályozzák
megoldotta a problémát azáltal, hogy megszüntette az egyediség jelölőnégyzetét.
most már nem számolhatja újra a TMC-k referenciakönyvét
megtalálható az interneten hogyan kell csinálni.
-------------------------
A kód a Ref. a nómenklatúra olyan szöveg, amelynek vezető nullák vannak, ezért itt szükségünk van erre az eljárásra:
1) letiltja az unicode vezérlést
2) elkezdjük a feldolgozást
3) magában foglalja az egyediség ellenőrzését
a feldolgozás önmagában változást igényel:
Eljárás futása ()
Спр = CreateObject ("Directory.Nomenclature");
Válasz elemek ();
K = 0;
Amíg a Spr.Get elem () = 1 ciklus
K = K + 1;
Az aktuális elem ();
NKOD = "00000000" + K;
code = jogok (UNC, 9); // 9-kód hossza a könyvtár nómenklatúrában, nullák 8 vezető maximum
Jelentés (hivatkozási kód);
Rec. Write ();
A ciklus vége;
Az eljárás vége
----------------------------
ezzel az 1C-ben megszerzett ismereteim véget értek
Megkérdezem, hogyan és hol helyezze be ezt a kódot. és mi a következő lépés, köszönöm!
Igor.
Külső feldolgozásnál. És jobb megtalálni a kész.
Hozzon létre egy új feldolgozást, és kattintson a Futtatás gombra a fent ismertetett Run () futtatásához. de még mindig van egy kiváló uchoice feldolgozás, amely többszörözi a renumbering-t.
A konfigurációban létrehozom a feldolgozást (Fájl / új / külső feldolgozás). A formanyomtatványon dobja a gombot. A "Speciális" lapon lévő gomb tulajdonságaiban adja meg a "Run ()" kifejezést idézőjelek nélkül. Az űrlapmodulban adja hozzá saját eljárását.
Felhasználói módban mentheti és futtathatja.
TESTERUGS A COPIES.
Köszönöm mindenkinek.
minden működött
nagyon hasznos fórum.
Megkérdezem a téma lezárását.