do moderror with sys(16), error(), lineno()
master
Epson LX-810                 
typ_zpr7
LADENI
\LADENI
\DATA
set path to &f_adr,&pth,&f_adr\data, &pth\01,&pth\02,&pth\03,&pth\04,&pth\05, &pth\06,&pth\07,&pth\08,&pth\09,&pth\10,&pth\11,&pth\12,&pth\13
M_PARAM
m_param
Novell NetWare
csprol25
x_dp.idx2
data\m_dp
data\x_dp
m_log.cdx2
data\m_log
data\m_volh.mem2
 Konfigura
 soubor nen
tomen !
m_volh.mem
m_datum.mem2
Inicializace demoverze
mod_demo
m_datum.mem2
delete file &f_adr\data\m_datum.mem
Heslo: 
sjmeno=sjmeno+chr(hesj&y(poc)/i)
sheslo=sheslo+chr(hesh&y(poc)/i)
prior=hesp&y
save all like hes* to &f_adr\data\m_volh.mem 
set defa to &w1w
run &w1w
cd\ >nul
! cd &w_adr >nul
set defa to &w2w
run &w2w
! cd &xxxx >nul
! cd &xxxx >nul
mod_lib
m_heslo
ctrl+f11
do calc
 ? ? ?PRIOR
? ? A1
? ? ? ?AA
 ? ? ? PRIHLAS
 ?HESLO
? ? SLAPEJ
? ?PRISTUP
? MM_ZPET
 ?MM_VER
 ? USCHOVA
 ?MM_DEMO
? MM_AUTOR
?MM_JMENO
 W_TISKARNAW_FRONTA
 W_MYS
 ? ?PODNIK
 ? CISS
? ? ?ID_ORG
 ? W_CESTINA
W_EGA_MIN
W_KODPRN
?W_SIT
?s?(W_CSCON
)?W_CSPROL
aW_ADR
 ?&?W_MISTO
?yW_CD
?e?x?PTH_DATA
aW_SIT_OS
?W_SIT_OSV
W_TYP_ZPR
F_ADR
M_PARAM
?FIRMA
 ? SIT_OS
?VERZE
W_SET
?r?oPOLE0
r?a?CSPROL25
?UROV
i?i?sPORAD
e?s?CISL
b?y?tZAZNAM
?s?CHYBA
?:?'JM_PRG
? ?TEXT
 ? ? RADEK
e?t?M_VOLH
a? MEM
 ?&?w?HESOBR
 ? HESCELK
 ?HESDEMO
? MOD_DEMO
 ? ? ?HESPOC
 ? ? ?POC
? ? ? SJMENO
? ?SHESLO
 ? W1W
u?W2W
?2?wXXXX
 ? ?UZ_AKCE
? MOD_LIB
 ?M_HESLO
 UZIV
? ? ?JMENO
 TISKARNA
AT_FRONTA
 CTRL
? ? ? a
P:\IN\SK\O\
MOD_SET1.FXP
P:\IN\SK\O\MOD_SET1.PRG