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 |
DEFINE FILE EMPLOYEE XSAL1/D12.2BC = IF DEPARTMENT EQ 'MIS' THEN CURR_SAL * (-1) ELSE CURR_SAL; XSAL2/A15 = IF XSAL1 LT 0 THEN '-' || EDIT(XSAL1) ELSE EDIT(XSAL1); XSAL3/P12.2 = ATODBL(XSAL2, '15', XSAL3); END TABLE FILE EMPLOYEE PRINT LAST_NAME FIRST_NAME DEPARTMENT XSAL1 XSAL2 XSAL3 END -EXIT
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 |
-* File alphalomgtonumber.fex DEFINE FILE CAR BEDRAG/A15=IF COUNTRY EQ 'ITALY' THEN '(25,345.76)' ELSE IF COUNTRY EQ 'ENGLAND' THEN '1,859,001.45' ELSE '9,765.33'; BEDRAG2/A15=STRREP (15,BEDRAG ,1,')',0,'',15,BEDRAG2); BEDRAG3/A15=STRREP (15,BEDRAG2 ,1,'(',1,'-',15,BEDRAG2); BEDRAG4/A15=STRREP (15,BEDRAG3 ,1,',',0,'',15,BEDRAG2); BEDRAGV/D15.2=EDIT(BEDRAG4); END TABLE FILE CAR PRINT BEDRAG BEDRAG2 BEDRAG3 BEDRAG4 BEDRAGV BY COUNTRY ON TABLE COLUMN-TOTAL END
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 |