|
From: | vbcoen |
Subject: | Re: [open-cobol-list] File path. |
Date: | Wed, 8 May 2013 13:29:47 +0100 |
User-agent: | KMail/4.8.5 (Linux/3.4.34-desktop-1.mga2; KDE/4.8.5; x86_64; ; ) |
Hi
forgot to add this that sets up the ACAS-xxx vars from the environment that is run before the code I sent last msg:
Procedure:
accept ACAS_LEDGERS from Environment "ACAS_LEDGERS". accept ACAS_IRS from Environment "ACAS_IRS". accept ACAS_BIN from Environment "ACAS_BIN". if ACAS_IRS (1:1) = space or ACAS_LEDGERS (1:1) = spaces or ACAS_BIN (1:1) = spaces display ST009 at 0505 with erase eos highlight display ST008 at 1210 with foreground-color 3 highlight accept ws-reply at 1243 stop run end-if if ACAS_LEDGERS (1:1) = "/" *> Its Linux/Unix/OSX move "/" to OS-Delimiter. if ACAS_LEDGERS (1:1) = "\" *> Its Windoz/Dos-Box move "\" to OS-Delimiter.
Vince
|
[Prev in Thread] | Current Thread | [Next in Thread] |