FILENAME=testcar, SUFFIX=EDA , $ SEGMENT=CAR, SEGTYPE=S0, $ FIELDNAME=SALARY, ALIAS=MODEL, USAGE=A24, ACTUAL=A24, $ FIELDNAME=COUNTRY, ALIAS=COUNTRY, USAGE=A10, ACTUAL=A10, $ FIELDNAME=CAR, ALIAS=CAR, USAGE=A16, ACTUAL=A16, $ FIELDNAME=MODEL, ALIAS=MODEL, USAGE=A24, ACTUAL=A24, $ FIELDNAME=BODYTYPE, ALIAS=BODYTYPE, USAGE=A12, ACTUAL=A12, $ FIELDNAME=WARRANTY, ALIAS=WARRANTY, USAGE=A40, ACTUAL=A40, $ FIELDNAME=STANDARD, ALIAS=STANDARD, USAGE=A40, ACTUAL=A40, $ FIELDNAME=SEATS, ALIAS=SEATS, USAGE=I3, ACTUAL=I4, $ FIELDNAME=DEALER_COST, ALIAS=DEALER_COST, USAGE=D7, ACTUAL=D8, $ FIELDNAME=RETAIL_COST, ALIAS=RETAIL_COST, USAGE=D7, ACTUAL=D8, $ FIELDNAME=SALES, ALIAS=SALES, USAGE=I6, ACTUAL=I4, $ FIELDNAME=LENGTH, ALIAS=LENGTH, USAGE=D5, ACTUAL=D8, $ FIELDNAME=WIDTH, ALIAS=WIDTH, USAGE=D5, ACTUAL=D8, $ FIELDNAME=HEIGHT, ALIAS=HEIGHT, USAGE=D5, ACTUAL=D8, $ FIELDNAME=WEIGHT, ALIAS=WEIGHT, USAGE=D6, ACTUAL=D8, $ FIELDNAME=WHEELBASE, ALIAS=WHEELBASE, USAGE=D6.1, ACTUAL=D8, $ FIELDNAME=FUEL_CAP, ALIAS=FUEL_CAP, USAGE=D6.1, ACTUAL=D8, $ FIELDNAME=BHP, ALIAS=BHP, USAGE=D6, ACTUAL=D8, $ FIELDNAME=RPM, ALIAS=RPM, USAGE=I5, ACTUAL=I4, $ FIELDNAME=MPG, ALIAS=MPG, USAGE=D6, ACTUAL=D8, $ FIELDNAME=ACCEL, ALIAS=ACCEL, USAGE=D6, ACTUAL=D8, $
FILENAME=testcar, SUFFIX=EDA , $ SEGMENT=CAR, SEGTYPE=S0, $ -IF IBIMR_user NE 'Me' GOTO SKIPSALARY; FIELDNAME=SALARY, ALIAS=MODEL, USAGE=A24, ACTUAL=A24, $ -SKIPSALARY FIELDNAME=COUNTRY, ALIAS=COUNTRY, USAGE=A10, ACTUAL=A10, $ FIELDNAME=CAR, ALIAS=CAR, USAGE=A16, ACTUAL=A16, $ FIELDNAME=MODEL, ALIAS=MODEL, USAGE=A24, ACTUAL=A24, $ ....
Frank | |
prod: WF 7.6.10 platform Windows, databases: msSQL2000, msSQL2005, RMS, Oracle, Sybase,IE7 test: WF 7.6.10 on the same platform and databases,IE7 |
APP FI master DISK testcar.mas -RUN -WRITE master FILENAME=testcar, SUFFIX=EDA , $ -WRITE master SEGMENT=CAR, SEGTYPE=S0, $ -WRITE master FIELDNAME=SALARY, ALIAS=MODEL, USAGE=A24, ACTUAL=A24, $ . . -SET &DEFSAL = IF IBIMR_user NE 'Me' THEN 'DEFINE SALARY/A24 = ''' ''';,$' ELSE ' '; -IF IBIMR_user NE 'Me' GOTO SKIPSALARY; -WRITE master FIELDNAME=SALARY, ALIAS=MODEL, USAGE=A24, ACTUAL=A24, $ -SKIPSALARY . . -WRITE master &DEFSAL
- Using AS 8.2.01 on Windows 10 - IE11. | |||
in Focus since 1988 |
FILENAME=TEST_TABLE, SUFFIX=SQLMSS , $ SEGMENT=TEST_TABLE, SEGTYPE=S0, $ FIELDNAME=EVENTID, ALIAS=EventID, USAGE=I11, ACTUAL=I4, FIELDTYPE=R, $ FIELDNAME=EVENTTIME, ALIAS=EventTIme, USAGE=HYYMDs, ACTUAL=HYYMDs, MISSING=ON, $ FIELDNAME=EVENTTYPE, ALIAS=EventType, USAGE=A10, ACTUAL=A10, MISSING=ON, $ FIELDNAME=USERID, ALIAS=UserID, USAGE=A10, ACTUAL=A10, MISSING=ON, $ FIELDNAME=REPORTID, ALIAS=ReportID, USAGE=A8, ACTUAL=A8, MISSING=ON, $ FIELDNAME=REPORTDATE, ALIAS=ReportDate, USAGE=A10, ACTUAL=A10, MISSING=ON, $ FIELDNAME=GROUPID, ALIAS=GroupID, USAGE=A10, ACTUAL=A10, MISSING=ON, $ FIELDNAME=UNIQUEID, ALIAS=UniqueID, USAGE=A10, ACTUAL=A10, MISSING=ON, $ FIELDNAME=FLAG1, ALIAS=Flag1, USAGE=A1, ACTUAL=A1, MISSING=ON, $ FIELDNAME=FLAG2, ALIAS=Flag2, USAGE=A1, ACTUAL=A1, MISSING=ON, $ FIELDNAME=FLAG3, ALIAS=Flag3, USAGE=A1, ACTUAL=A1, MISSING=ON, $ FIELDNAME=FLAG4, ALIAS=Flag4, USAGE=A1, ACTUAL=A1, MISSING=ON, $ END DBA=password, $ USER=EVERYONE, ACCESS=RW, $ ACCESS=R, RESTRICT=NOPRINT, NAME=Flag1, $ ACCESS=R, RESTRICT=NOPRINT, NAME=Flag2, $ ACCESS=R, RESTRICT=NOPRINT, NAME=Flag3, $ ACCESS=R, RESTRICT=NOPRINT, NAME=Flag4, $ USER=ADMIN, ACCESS=RW, $