Create or Point to Files FILE=GRPPOL,SUFFIX=SQLORA,MFD_PROFILE=GRPPOL VARIABLE NAME=LTD, USAGE=A30, DEFAULT= LTD or ETD ,$ SEGNAME=GRPPOL,SEGTYPE=S0 FIELD=GROUP_CODE,GCODE,A8,TITLE= Group Code ,$ FIELD=GROUP_NAME,,A30,TITLE= Group Policy Holder ,$ FIELD=CONTRACT_NO,CONTRACT,A8,TITLE= Contract Number ,$ FIELD=LONG_TERM,LTD,A1,TITLE=&&LTD, $ FIELD=EFFECT_DATE,,YYMD,TITLE= Effective,Date ,$ FILTER SELECTGRPS = IF DECODE GROUP_CODE(TEAMRESP ELSE 2) EQ 0 THEN 1 ELSE 0 ; -IF &1 NE 'GRPPOL' GOTO NOVAR1; -SET &&LTD = IF &&TEAM_NAME EQ 'GM' THEN 'Extended Term' ELSE - 'Long Term'; -NOVAR1 FILEDEF TEAMRESP DISK c:\userapp\teamresp.dat 7 MFD_PROFILE
{}