[Info-vax] Command Procedure pass value to program READ

[HCorte]

Its working added a condition IF(LIB$GET_SYMBOL('script_origin',SYMBOL_VALUE)) then uses unit=6.

for performance purposes LIB$GET_SYMBOL('script_origin',SYMBOL_VALUE) shouldn't have impact right?