Keresés veszi táblázat értékeinek vagy asztalra box
Ellenőrzés minden asztalra másolni sorokat az üzenet, amelyet zadublirovanny line működés, és a „elutasítás” dokumentumok.
Ez az eljárás tart keresés történik az egész oszlopsorok. Azaz kettős értékek tekinthetők meg kell ismételni két sorban minden oszlopot.
Ha ismétlődő sorokat egynél több, akkor minden megjelenik egy üzenet a sorozatszámot az eredeti vonal és az ismételt húr.
Ez az eljárás a legjobban használható általános modult és hívjuk meg eljárások „PriZapisi” vagy „ObrabotkaProvedeniya”, stb Vagyis azok, ahol tudod, hogy egy elutasítás elvégzéséhez további destve
Mivel a táblák - megadhatja „TablitsuZnacheny” vagy „TablichnuyuChast” című dokumentum, kézikönyvek stb
Ha Type (PM) = Típus ( "TablitsaZnacheny") Ezután
TablZnach = PM;
egyébként
TablZnach = PM. Vegye ();
ENDIF;
Selection = új struktúra ();
Minden egyes oldal TablZnach Cycle
Kiválasztása. Tiszta ();
Minden egyes oszlop TablZnach. oszlop ciklus
Ha az oszlop. név <> „NomerStroki” Akkor
Kiválasztása. Beszúrása (oszlopok neve Page [Oszlop neve] ...);
ENDIF;
KonetsTsikla;
String = TablZnach. FindRows (kiválasztás);
Ha a húr. Száma ()> 1, akkor
Minden hurok a sorok NaydennyeStroki
Ha a húr. Találd (NaydennyeStroki)> 0 Then
StrokaSoobscheniya = "karakterlánc №" + Lines [0]. NomerStroki + "egybeesik a sorban №" + NaydennyeStroki. NomerStroki;
SoobschitObOshibke (.. StrokaSoobscheniya Failure "Tiszta zadvoeniya sorokat!");
ENDIF;
KonetsTsikla;
ENDIF;
KonetsTsikla;
KonetsProtsedury