Stránkovaný výstup
Existuje-li definice formátu se jménem, které je stejné jako jméno ovladače následované _TOP, bude tento formát použit vždy na začátku každé stránky při zápisu do tohoto ovladače. Jméno formátu pro hlavičku je obsaženo v proměnné $^ ($ FORMAT_TOP_NAME) a její modifikací je možné tento formát změnit.Při provádění výstupu pomocí funkce „write“ se automaticky provádí stránkování. Počet řádků, kolik se vejde na stránku, obsahuje proměnná $= (FORMAT_LINES_PER_PAGE, standardně hodnota 60). V proměnné $($FORMAT_LINES_LEFT) je uložen počet řádků, které se ještě na stránku vejdou. Až je tato hodnota 0, dojde k odstránkování a při dalším použití funkce write se opět použije formát
// Definice formátu začátku stránky
Format STDOUT_TOP =
Vytvořeno dne: @<<<<<<<<<<<<<<<<<<<< Strana @<<<<
Aktualni_datum(), $%
+----------------+-----------------------+
| Jméno...........|Příjmení.................|
+----------------+-----------------------+
.
// Definice formátu pro jednotlivé záznamy
Format =
|@<<<<<<<<<<<|@<<<<<<<<<<<|
$jmeno, $příjmení
.
$jmeno = ‘Emil’; $příjmení = ‘Zabloudil‘;
Write;
$- = 0; //Odstránkování
$jmeno = ‘Pepík’; $příjmení = ‘Votýpka‘;
Write;
// Vytiskne
Vytvořeno dne: 15. 1.2008 Strana 1
+-------------- -+-------------------------+
| Jméno..........| Příjmení...................|
+----------------+-------------------------+
| Emil...........| Zabloudil....................|
Vytvořeno dne: 15. 1.2008 Strana 2
+----------------+-------------------------+
| Jméno..........| Příjmení...................|
+----------------+-------------------------+
| Pepík..........| Votýpka....................|
A to by bylo pro dnešek všechno. V dalším díle se podíváme na podprogramy. V případě jakýchkoliv dotazů mě kontaktujte na email: habrman@banan.cz.
Autor: Robert Habrman
2024 ©