[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference ilbbak::ibi_focus

Title:FOCUS, from INFORMATION BUILDERS
Moderator:ZAYIUS::BROUILLETTE
Created:Thu Feb 19 1987
Last Modified:Mon May 05 1997
Last Successful Update:Fri Jun 06 1997
Number of topics:615
Total number of notes:1779

326.0. "& substitution problem" by MILPND::SHELTRY (Rrruffles have rrranch?) Sun Mar 18 1990 21:40

Here's a .FEX I'm trying to get to run right (but it doesn't):

--------------------------------------------------------------
-WHICHSITE
-PROMPT &SITE.WHICH SITE CODE?.

-SET &FD1  = 'FILEDEF APPROP      DISK PRS$' | '&SITE' | ':';
-SET &FD2  = 'FILEDEF A_T_DIST    DISK PRS$' | '&SITE' | ':';
-SET &FD3  = 'FILEDEF BUS_PLAN    DISK PRS$' | '&SITE' | ':';
-SET &FD4  = 'FILEDEF NOTES       DISK PRS$' | '&SITE' | ':';
-SET &FD5  = 'FILEDEF PLN_DIST    DISK PRS$' | '&SITE' | ':';
-SET &FD6  = 'FILEDEF PROJ_CTL    DISK PRS$' | '&SITE' | ':';
-SET &FD7  = 'FILEDEF S_CTL       DISK PRS$' | '&SITE' | ':';
-SET &FD8  = 'FILEDEF S_MODSEC    DISK PRS$' | '&SITE' | ':';
-SET &FD9  = 'FILEDEF S_SYSSEC    DISK PRS$' | '&SITE' | ':';
-SET &FD10 = 'FILEDEF TASK        DISK PRS$' | '&SITE' | ':';
-SET &FD11 = 'FILEDEF TRAVEL      DISK PRS$' | '&SITE' | ':';
-SET &FD12 = 'FILEDEF T_ASSIGN    DISK PRS$' | '&SITE' | ':';
-RUN

&FD1
&FD2
&FD3
&FD4
&FD5
&FD6
&FD7
&FD8
&FD9
&FD10
&FD11
&FD12

-RUN
--------------------------------------------------------------

If I put in CTO, for example, I see these lines:

-SET &FD1  = 'FILEDEF APPROP      DISK PRS$' | 'CTO' | ':';
-SET &FD2  = 'FILEDEF A_T_DIST    DISK PRS$' | 'CTO' | ':';
.
.
.
-RUN
FILEDEF APPROP      DISK PRS$&SITE:
FILEDEF A_T_DIST    DISK PRS$&SITE:
.
.
.

What happened to the CTO??  The lines should read:

FILEDEF APPROP      DISK PRS$CTO:
FILEDEF A_T_DIST    DISK PRS$CTO:

Help ??
Wayne
T.RTitleUserPersonal
Name
DateLines
326.1To quote or not to quoteMILPND::SHELTRYRrruffles have rrranch?Mon Mar 19 1990 08:506
Thanks to our European counterparts, this fex now works.  The solution
was to remove the single-quotes around &SITE.  Works great without
them.  (I'm originally from the IBM side of FOCUS and was always used
to using quotes.)

Wayne