Stran 41 8.8.1.3 HEkranski del - di. sploĹĄni podatki za ekran di krmil jenje ekrana mai klici ekrana sdatoteka "kadr librekran.libi ooo oo O1 parametri. OS izpis pic x(40), OS tekst BiÄ Y9O); 05 ittvpis. io. tznak pieÄex. 88 vredu value "8", 88 nazaj value "4", 88 ven value "4H!, 88 da Value Sd". tp"; 88 ne value "n" "N", 05 Gerr pic 3993 OS scrallo pig<x. 05 jErFtice 'pim xk; 890 vnos value "d". OS o wdatm pic x(6)., OS o wniume pic s?(15) comp-3. O5 uwndep pire OSG kontrola. 10 âÂŁ51ler. picen(S)a 10 tipka PES RENAĹ 10, fritler pic: xio? datoteka zg krmiljenje "kadr librprograml.lib"- 01 WTDIS. OS WO1 PIC X(40) VALUE "2401<NE MOREĹ NAPREJ â KLIÄI ERC!' 301 ". OS WO2 PIC X(40) VALUE "0101%ÂŁ...SREGNO!...' po2?, oĹĄ WMO3 PIC X(40) VALUE "O101fxLB-GBLA' HOO4U, OS WO4 PIC X(40) VALUE "OZZSHAZURIRANJE VIRTERJA' ooB" OS wO5 pic x (40) value "OSO1 1.Virtualni naslov A Mo ni OS wO6 pic x(40) value "O601 2.FiziÄna oznaka vrat : ' ZOB. OS wOF pic x(40) value "OBO1 4.Tip terminala dusi Ol; O5 WO8B PIC X(40) VALUE "0901 5.Sifra poslovne enote : ' 201". uklici "kadr librgekran.lib"-----------o---------- gwrt section l. gwrtx. if ierr < zero move wadislindx) to izpis else move wadislierr) to izpis. call "xekran" using parametri. ia: x 2:go to gwrtx. ir x 9% stop run. gurte. exit.