gnucobol-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [open-cobol-list] File path.


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

 

 


reply via email to

[Prev in Thread] Current Thread [Next in Thread]