Pomocné programy a skripty upravené pro Aleph 500

Konverze diakritiky
Programy pro procesy na serveru, kontrolní a úklidové programy

Programy pro procesy na serveru a úklidové programy

* 101MEZ

Účel:

Výpis SYSEN, která chybějí v souvislé řadě v souboru 101.

Volání:

awk -f /aleph/bin/101mez   soubor101 > výstup

Programy a další potřebné soubory: 101mez

* 101TO303.SH

Účel:

Množení záznamů, např. pro výplně větších mezer ve sledu záznamů v bázi předdefinovanými záznamy - spojení souboru 101 (čísel) se souborem 303 (množený záznam).

Volání:

/aleph/bin/101to303sh soubor101 soubor303 > výsledný soubor

Poznámka pro NK: soubor 101 přestěhovat do .../scratch nebo psát i s cestou!

Programy a další potřebné soubory: 101to303.sh, premazf

* 303TO101.SH

Účel:

Získání systémových čísel ze souboru 303 pro export nebo tisk v podobě souboru 101. Mohou se zadávat parametry pro výběr záznamů podle obsahu pole či podpole, odklepnutím se ponechají parametry nevyplněné.
Pozor! Pokud se liší lokální báze od globální, je nutno výsledný soubor opravit (výsledek je např.0006981NKCNKC).

Volání:

/aleph/bin/303to101sh

Parametry:
vstupní soubor
pole (tag)
podpole
dolní mez (počátek obsahu podpole)
horní mez
výstupní soubor

Poznámka: soubor 303 přestěhovat do $alephe_scratch nebo psát i s cestou!

Programy a další potřebné soubory: 303to101.sh

* ADDATE

Účel:

Vytvoření data podle současného data (addate) nebo zadaného data (druhý parametr u addate2) přidáním/odpočítáním určitého počtu dní. Součást skriptů pro exporty ap.

Volání:

/aleph/bin/addate počet_dní (do budoucnosti)
/aleph/bin/addate -počet_dní (do minulosti)
/aleph/bin/addate2 počet_dní RRRRMMDD
/aleph/bin/addate2 -počet_dní RRRRMMDD

 

* ADDNUL

Účel:

Donulování signatur (v podpoli h) na 6 pozic a přírůstkové číslo (v podpoli l) na 5 pozic.

Volání:

awk -f /aleph/eutil/for_us/addnul test=0 vstupní_soubor > výstupní_soubor

Parametr test=0 se zadává při ostrém běhu, pokud se nezadá, jedná se o kontrolní běh a do výstupního souboru se zapisuje jak původní, tak upravený řádek.
Je třeba mít vstupní soubor s vyexportovaným polem IAH/HLD (pole program nezajímá).
Pozn. Má-li se pracovat s jiným podpolem, je třeba dodat parametr podle vzoru:
awk -f /aleph/eutil/for_us/addnul odds='$$g' vstup > výstup (pro sign. v podpoli g)

* ADDNULPP

Účel:

Doplnění počátečních nul v podpolích typu identifikační=pořadové číslo, signatura, přírůstkové číslo - nuly doplňuje k číslu, které je na konci podpole - nelze použít pro komplikované signatury. Nezadá-li se podpole, pracuje s posledním číslem v poli.

Volání:

/aleph/eutil/for_us/addnulpp
Parametry (lze zadávat do řádku):
vstupní soubor - počet míst - podpole - výstupní soubor

* ADDPOLE_101

Účel:

Výroba souboru 303 s jedním polem pro záznamy se systémovými čísly ze 101

Volání:

/aleph/bin/addpole_101

Parametry (je též možno zapsat do příkazu rovnou):
vstupní soubor
číslo pole (tag)
hodnota pole (včetně ozn. podpolí)
výstupní soubor

Programy a další potřebné soubory: addpole_101

* ADDPOLE_303
* ADDPOLE_303_EXCL

Účel:

Přidání pole do souboru 303

Volání:

/aleph/bin/addpole_303
- pokud jsou další výskyty téhož pole, ponechá je

/aleph/bin/addpole_303_excl
- přidá pole jen pokud v záznamu ještě není

Parametry (je též možno zapsat do příkazu rovnou):
vstupní soubor
číslo pole (tag)
hodnota pole (včetně ozn. podpolí)
výstupní soubor

Programy a další potřebné soubory: addpole_303, addpole_303_excl

* ADDPOLE_SPVAL - součást skriptů - vyrobení nového pole z obsahu jiného pole/podpole

* ADDPPOLE

Účel:

Přidání podpole do souboru 303

Volání:

/aleph/bin/addppole

Parametry (je též možno zapsat do příkazu rovnou):
vstupní soubor
číslo pole (tag)
podpole
hodnota podpole
výstupní soubor

Programy a další potřebné soubory: addppole

* CDROKY

Účel:

Rozdělení souborů pro export na CD/ČNB podle roku vydání v poli 100. Zpracovává soubor 303 s polem 100, který má příponu .100. Výsledkem jsou soubory 101 s příponami .old a .new (je nutno je přemístit do alephe_scratch). Součást skriptů cdnpck a cdaleph.

Volání:

awk -f /aleph/eutil/for_us/cdroky.awk soubor303(i s příponou .100)
            (pro implicitní rok počátku souboru .new 1983)
awk -f /aleph/eutil/for_us/cdroky.awk lmt=rok soubor303(i s příponou .100)
            (pro jiný rok)

* CUB2DAT

Účel:

Převod výstupního formátu RUX z Cubusu (=řádkový UNIMARC se sysnem za ## a s jedním dolarem jako oddělovač) do aleph importního souboru. Sysno uloží do pole 909. Součást importního skriptu pro SKC (varianty cub2al). Je ošetřeno tak, že dokáže zpracovat i jiný soubor ve formátu ed (řádkový UNIMARC) bez ohledu na to, je-li tam jeden nebo dva dolary jako oddělovač. Z polí lab/000 vytvoří pole LDR. Při jiném použití je třeba poté vymazat pole 909.

Volání:

awk -f /aleph/bin/cub2dat.awk souborRUX > soubor303

Programy a další potřebné soubory: cub2dat.awk

* DAT2ED

Účel:

Převedení exportního souboru do řádkového unimarcu. Jako druhý parametr může být jméno báze, které se dává do řádku ## se sysnem, jinak je defaultně NKC01.

Volání:

/aleph/bin/dat2ed soubor303 [báze] > soubor.ed

* FILTRPOLI

Účel:

Výběr jen určitých polí ze souboru 303 podle tabulky. Pole k zachování mohou být definována 1-5 znaky. Součást skriptů pro exporty.

Volání:

csh -f /aleph/bin/filtrpoli tabulka vstup > vystup

* GLOBALEX

Účel:

Program pro globální náhradu řetězce ve všech souborech adresáře (pokud použijete hvězdičku jako jeden z parametrů), nebo v prvním parametrem specifikovaných souborech, přičemž můžete použít běžné "wild cards".

Pokud nepoužijete příznak g, provede náhradu vždy jen v prvním výskytu řetězce na řádku. Lomítka a jiné speciální znaky mohou působit potíže!

Využití zejména pro adresáře s html soubory pro webovské rozhraní alephovských bází.

Volání:

/aleph/bin/globalex `*' `stávající řetězec' `nový řetězec' [g]

Programy a další potřebné soubory: globalex

* GLOBALEXF

Účel:

Program pro globální náhradu více řetězců najednou ve všech nebo specifikovaných souborech adresáře (pokud použijete hvězdičku jako jeden z parametrů), nebo v druhým parametrem specifikovaných souborech, přičemž můžete použít běžné "wild cards".

Vyžaduje existenci souboru, v němž je zapsána dávka příkazů pro náhradu řetězců podle vi konvence, ale bez dvojtečky. Na posledním řádku souboru musí být řetězec wq (nebo znak x).

Volání:

/aleph/bin/globalexf jméno_souboru_s_dávkou_příkazů_pro náhradu `*'

(náhrada ve všech souborech)

/aleph/bin/globalexf jméno_souboru_s_dávkou_příkazů_pro náhradu soubor

(náhrada v jednom souboru)

Programy a další potřebné soubory: globalexf + soubory s dávkou příkazů

Příklad souboru s dávkou příkazů:

g#<option a>#s#<option a>#<option a> volba 1a#
wq

* HOSTIVAR

Účel:

Program pro opětovný tisk žádanek čtenářů - výběr žádanek pro Hostivař. Spouštěn z cronu (momentálně v 7:30 z předešlého a aktuálního dne a ve 12:30 z aktuálního dne) .

/aleph/bin/hostivar.sh

Program předpokládá spuštěného démona (ue_06 = util e / 6) v nkc50. Online žádanky sype Aleph do dp (/aleph/u50_5/nkc50/print je momentálně přesměrován do /aleph/scratches/nkc50/print), odkud si je tahá démon spuštěný na klientu ze Správce úloh v bázi nkc50 s nadefinovaným print ID sliphala. Po vytištění v Hale služeb se online žádanky přesunou do podadresáře save-RRRR-MM-DD. Odtud je Pavel 2 krát denně bere a programem hostivar.sh je přejmenovává a sype zpět do dp s příponou .sliphost, což je print ID pro tisk online žádanek v Hostivaři.

(Pokud se program nespustí, Hala může online žádanky do Hostivaře faxovat.)

#!/bin/csh -f
set lib=nkc
# set lib=slk
set hdir=`pwd`
date >> /aleph/u50_5/${lib}50/print/demon.log
foreach d ( /aleph/u50_5/${lib}50/print/save-????-??-?? )
cd $d
# echo $d
foreach c ( `grep -s -l HOSTIVA /dev/nul[l] ${lib}50*.sliphala-??-??-??` )
echo mv $c ../`echo $c | sed 's/sliphala.*/sliphost/'` >> /aleph/u50_5/${lib}50/
print/demon.log
mv $c ../`echo $c | sed 's/sliphala.*/sliphost/'`
end
end
cd $hdir

 

* CHPRCIS.SH

Účel:

Program na změnu struktury přírůstkového čísla z nnn/RR na RR/nnn

Volání:

- pro změnu v bibl. záznamech:

/aleph/eutil/for_us/chprcis.sh vstup.soubor výstup.soubor

Programy a další potřebné soubory: chprcis, chprcis.sh
Poznámka: pro A300 byl ještě program CHPRCISH.SH pro změnu v holdings.

* JEDVYS.SH

Účel:

Rozdělí exportní soubor na dva soubory, z nichž jeden obsahuje konkrétní výskyt pole a druhý ostatní zbylé výskyty. Lze použít i na soubor obsahující více polí - pak bude v prvním souboru zadaný výskyt zadaného pole a ve druhém celý zbytek souboru. Chceme-li poslední výskyt, zadává se pro pořadí výskytu -1.

Volání:

/aleph/bin/jedvys.sh vstup pole výskyt výstup1 výstup2

* JOIN101303

Účel:

Přečíslování souboru 303 podle souboru 101, např. pro obsazování zrušených záznamů. Soubor 101 musí být přenesen do data_scratch nebo je třeba ho psát s cestou.

Volání:

/aleph/bin/join101303 soubor101 soubor303 > výsledný_soubor303

Programy a další potřebné soubory: premazf

Upozornění:

Po vyhledání zrušených záznamů (obsahují pole DEL, není pole 001) je dobře je před akcí a importem pro jistotu vyexportovat a zkontrolovat, že opravdu neobsahují skutečné záznamy (např. pole 200) a vyexportovat pro stejnou kontrolu i ADM záznamy.
Po skončení je třeba zkontrolovat, zda se neliší velikost vstupního a výstupního souboru.

* LASTSYSNO.SH

Účel:

Vypsat poslední obsazené sysno v bázi (rychlejší náhrada UTIL G/2). Nepřidává počáteční nuly. Součást skriptů.

Volání:

/aleph/bin/lastsysno.sh báze

* LOADZ30

Účel:

Import BIB záznamů + vytvoření jednotek z polí HLD/IAH.
Soubor BIB záznamů v adresáři ../data/scratch nalije jako NEW, vyrobí odpovídající počet nových ADM záznamů a vyrobí odpovídající jednotky (podle zadání v tabulce). Lze vyrobit i dodatečně k již existujícím záznamům jen jednotky.
Podrobný popis - nespouštět bez prostudování!

Volání:

/aleph/eutil/for_us/loadz30.sh BIB_BASE soubor k/s (knihy/seriály)

Programy a další potřebné soubory: různé v různých podadresářích eutil

* NOSPACE

Účel:

likvidace mezer v řádku. Používáno pro URL v poli 856 (spouští se na exportní soubor 303).
Standardně likviduje mezery od 20.pozice, je možno dát jako 2.parametr pozici, od níž se mezery lividují.

Volání:

/aleph/bin/nospace vstup > výstup
/aleph/bin/nospace vstup 2 > výstup

* OUT101.SH
* OUT101S.SH

Účel:

Výroba souboru 101 od SYSNO do SYSNO, užitečné pro větší rozmezí systémových čísel (zbytečně neblokuje frontu).
Sysno se nezadává s nulami - program doplní.
Základní varianta je interaktivní - parametrem je jméno souboru a báze (velkými písmeny) - možno poté zadat několik rozmezí, která program přiřadí za sebe, pro skončení třeba zadat místo dalšího sysna -1.
Varianta pro skript očekává zadání parametrů. báze - sysno1 - sysno2, případně další dvojice sysen. Výstup nutno přesměrovat do souboru.

Volání:

/aleph/bin/out101.sh $alephe_scratch/jméno_souboru BÁZE (dále se zadávají hodnoty)
/aleph/bin/out101s.sh BÁZE sysno1 sysno2 > $alephe_scratch/soubor

Programy a další potřebné soubory: out101.sh, out101s.sh

* PREMAZF

Účel:

Pomocný program pro 101to303.

* POCRAD

Účel:

Spočítá stejné řádky v souboru. Do výstupního souboru zapíše každý řádek jen jednou a u něj počet.
Nesmí být příliš mnoho různých řádků (výsledek do cca 2000 znaků). Výstupem je soubor s příponou .poc.

Volání:

/aleph/bin/pocrad soubor

* POR303 (dříve CLAIMPFI)
* POR303SYS

Účel:

Primárně pro vyloučení duplicitních záhlaví při importu do AUJ, lze použít pro výběr/vyloučení záznamů ze souboru 303 filtrováním proti určitému poli z tohoto souboru.
Porovnává obsah určitého pole v souboru 303 (soubor vstup) proti souboru 303 s jediným polem (soubor base). Nezadá-li se číslo pole, testuje se pole AU.

Volání:

/aleph/bin/por303 vstup base č.pole
         (sysna ve výstupních souborech se nemění)

/aleph/bin/por303sys vstup base č.pole
         (v souborech .dup a .dup1 se přečísluje podle sysen souboru base)

Výsledkem jsou soubory duplicitní a neduplicitní odlišené příponami:
         .dup = duplicitní celé záznamy - varianta por303sys připojí záznamům odpovídající sysna z porovnávacího souboru base
         .dup1 = testované pole z duplicitních záznamů (wc = informace o počtu) - "-"
         .imp = neduplicitní celé záznamy
         .imp1 = testované pole z neduplicitních záznamů (wc = informace o počtu)

Programy a další potřebné soubory: por303, por303sys

* PRIPOJPP

Účel:

Přidá podpole z dalšího výskytu pole do prvního. V exportním souboru (1 vyexportované pole) najde druhý výskyt sysna a pokud tento druhý výskyt začíná podpolem uvedeným jako parametr, připojí jeho obsah do prvního výskytu. Jako parametr lze zadat nejen podpole, ale i text za podpolem (při zadání parametru např. hSF připojí výskyt jen tehdy, začíná-li $$hSF).
Podpole a celý obsah dalšího výskytu pole se připojí tehdy, když zadané podpole v prvním výskytu pole není. Hodnota pole se netestuje, takže teoreticky lze vyexportovat dvě různá pole, kde druhé pole obsahuje jiná podpole než první pole, a přidat obsah tohoto druhého pole do prvního.

Volání:

awk -f /aleph/bin/pripojpp vsf=podpole vstupní_soubor > výstupní soubor

* PRVNIVYS

Účel:

Vybere první výskyt určitého pole z exportního souboru. Součást skriptů, např. opr_cat. Výsledkem jsou soubory s příponou .prvni a .dalsi.

Volání:

awk -f /aleph/bin/prvnivys.awk soubor

* RADKY

Účel:

Spojení řádků v souboru .ed do jednoho řádku pro každé pole. Začíná-li řádek mezerou, je připojen k předchozímu. Bylo součástí skriptů cped a cpskoed, asi už začleněno do dat2ed.

Volání:

awk -f /aleph/eutil/for_us/radky  soubor.ed1 > soubor.ed2

* SG910
* SG910_SLK
* SG910_KKL

Účel:

Vytvoření pole 910, není-li, nebo doplnění signatury do pole 910 z polí HLD/IAH/LOC. Vytváří opakované výskyty podpole b. Vstupní soubor obsahuje buď všechna pole (KKL,SLK), nebo pole 001,IAH,Z30,910 (NKC). Pro NKC je třeba pro vyexportování pole Z30 změnit tab_expand (pro PRINT-DOC) a pak vrátit do původního stavu.

Volání:

awk -f  /aleph/eutil/for_us/sg910  vstup > výstup

Varianty podle bází:

NKC (základní skript) - pracuje s polem LOC a/nebo IAH - vybere 5 výskytů podpole h v pořadí podle půjčitelnosti signatury
SLK - signaturu bere z 1.výskytu pole HLD, podpole h (dříve g)
KKL - signaturu bere ze všech výskytů pole HLD, podpole h

* SNOZOBS
* SNOZOBSP

Účel:

Vyhledání řádků v souboru 303 (s jedním polem), které obsahují údaje zadané v porovnávacím souboru (hodí se např. pro vyhledání SYSEN duplicitních signatur).

Volání:

/aleph/bin/snozobs obsah_pole soubor303 > výstup
- porovnávací soubor musí obsahovat údaj včetně označení podpole, soubor 303 pouze toto podpole.

/aleph/bin/snozobsp obsah_pole soubor303 podpole oddělovač > výstup
- porovnávací soubor neobsahuje označení podpole, soubor 303 může obsahovat i další podpole
- jako znak pro oddělovač se doporučuje např. @, pokud se nevyskytuje v datech

Programy a další potřebné soubory:

snozobs, snozobs.awk, snozobsp, snozobsp.awk

* SPOJUSP

Účel:

Spojit dva importní soubory tak, aby zůstalo zachováno pořadí polí v rámci záznamu. Složí záznam (v rámci jednoho sysna) tak, že nejprve vezme pole z 1. souboru a za ně přiřadí pole z 2.souboru. Použitelné např. při importu retrokonverze, kdy je třeba zvlášť opracovat pole IAH a poté ho začlenit (není žádoucí přehození výskytů podpolí mechanickým tříděním sort).

Volání:

awk -f /aleph/bin/spojusp.awk -v f1=soubor2 soubor1 > výsledek

* TESTRADY

Účel:

Program pro testování řady SYSEN v souboru 101. Fungování neprověřeno, účel již neznámý. Lépe vyhovuje 101mez.

Volání:

awk -f /aleph/bin/testrady stp=n vstup.soubor > výstup.soubor

n=velikost mezer (2=> v pořádku je jen když následující je maximálně o 2 větší)

řádky ve výstupních souboru jsou označeny takto:
O - OK
U - mimo sekvenci nahoru
D - mimo sekvenci dolů
V - díra v sekvenci = SYSNO v původním souboru chybí, doplněno uměle!

* VYRSIG

Účel:

Označí pole IAHOL s plošně vyřazenými signaturami. Do IAHOL dodá podpole: $f - 805, $h - 31, $y - 101, $3 - vyřazeno. Pokud záznam nemá jiný IAHOL než vyřazený(é), přidá pole BASE - 51
Pro každý běh je třeba upravit rozmezí vyřazovaných signatur.

Volání:

awk -f /aleph/eutil/for_mrak/vyrsig vstupní_soubor>výstup_soubor

vstupní soubor: 303, pouze pole IAHOL

* WWWNKC

Účel:

výroba souborů pro zveřejnění přehledu přírůstků na webu (třídění podle oborů) - součást skriptu zahrprir

Volání:

/aleph/eutil/for_us/wwwnkc.sh soubor301

Programy a další potřebné soubory: wwwnkc.sh, nkc_ts, crhtmln, trmdtn

Poznámka:

Spouští se z adresáře /aleph/nkc/print/, kde se je vstupní soubor 301 - zde se vytvářejí soubory prir01.htm - prir26.htm, které je pak třeba přenést na server Artur do příslušného adresáře.
Je-li třeba upravit seznam oborů, je třeba provést úpravu v souborech nkc_ts,trmdtn i v souboru obory.htm na webu.
Změny v html úpravě souborů prir* se provádějí v souboru crhtmln.

* WWWSLK

Účel:

výroba souborů pro zveřejnění přehledu přírůstků na webu (třídění podle MDT) - součást skriptu slkprir (formát slk01-54 - wwwnovinky)

Volání:

csh -f /aleph/eutil/for_us/wwwslk.sh soubor301

Programy a další potřebné soubory: wwwslk.sh, slkmdt_ts, crhtml, trmdt

Poznámka:

Spouští se z adresáře /aleph/slk/print/, kde se je vstupní soubor 301 - zde se vytvářejí soubory prir01.htm - prir26.htm, které je pak třeba přenést na server Artur do příslušného adresáře (viz návod).
Je-li třeba upravit seznam tříd a podtříd, je třeba provést úpravu v souborech slkmdt_ts, trmdt i v souboru prirustky.htm na webu.
Změny v html úpravě souborů prir* se provádějí v souboru crhtml.

* ZMSYSNO

Účel:

Program pro přečíslování záznamů (posunutí systémových čísel o určité číslo) ze vstupního souboru 303

Volání:

awk -f /aleph/bin/zmsysno posuv=n vstup.soubor > výstup.soubor

n= kladné nebo záporné číslo (kladné je implicitní, před záporným musí být znaménko -)

Programy a další potřebné soubory: zmsysno

* ZMSYSRAD

Účel:

Program pro přečíslování záznamů (jiná systémová čísla) ze vstupního souboru 303

Volání:

awk -f /aleph/bin/zmsysrad cz=xxx vstup.soubor > výstup.soubor

xxx= SYSNO, které bude v souboru užito jako první

Programy a další potřebné soubory: zmsysrad