I am trying to use the WHEN command with DRILLMENUITEM in my stylesheeting and for some reason it is not recognizing my WHEN command. I use this command all the time, but this is the first time I am using with 7.7.02. This is the code:

TYPE=DATA,
COLUMN=N17,
DRILLMENUITEM='View PenInk Footnote Changes',
JAVASCRIPT=viewPenInkFootnoteChanges(RECORD_ID 1),
DRILLMENUITEM='Pen Ink Change',
JAVASCRIPT=PenInkChange(RECORD_ID 1),
DRILLMENUITEM='Standard Footnote View',
JAVASCRIPT=StandardFootnoteView(RECORD_ID 1),
DRILLMENUITEM='User Footnote',
JAVASCRIPT=UserFootnote(RECORD_ID 1),
WHEN N1='TRUE',

This message has been edited. Last edited by: Kerry,

Could be a simple case of miscoding, I think it should be:

WHEN=N1 EQ 'TRUE',

I don't recall ever coding a WHEN within DRILLMENITEM...

It's still not working. I've tried everything I can think of. Maybe you can not use WHEN with DRILLMENUITEM. Any more ideas, please let me know.

The syntax for the DRILLMENUITEM feature is unique: It involves repetition of a keyword, and the order of the phrases is semantically significant.

I suspect the series of DRILLMENUITEM declarations must be the last elements of the TYPE entry. So try moving the WHEN clause up:

TYPE=DATA, 
COLUMN=N17,
WHEN N1='TRUE',
DRILLMENUITEM='View PenInk Footnote Changes',
 JAVASCRIPT=viewPenInkFootnoteChanges(RECORD_ID 1),
DRILLMENUITEM='Pen Ink Change',
 JAVASCRIPT=PenInkChange(RECORD_ID 1),
DRILLMENUITEM='Standard Footnote View',
 JAVASCRIPT=StandardFootnoteView(RECORD_ID 1),
DRILLMENUITEM='User Footnote',
 JAVASCRIPT=UserFootnote(RECORD_ID 1),
$

Sorry but it appears that j.gross already responded

Try moving the WHEN statement before the DRILLMENUITEM Like:

 TYPE=DATA,
COLUMN=N17,

WHEN N1='TRUE',

DRILLMENUITEM='View PenInk Footnote Changes',
JAVASCRIPT=viewPenInkFootnoteChanges(RECORD_ID 1),
DRILLMENUITEM='Pen Ink Change',
JAVASCRIPT=PenInkChange(RECORD_ID 1),
DRILLMENUITEM='Standard Footnote View',
JAVASCRIPT=StandardFootnoteView(RECORD_ID 1),
DRILLMENUITEM='User Footnote',
JAVASCRIPT=UserFootnote(RECORD_ID 1),
 

this way if it's 'True' then the Menu Item gets built other wise it disregards it and does not build the control.
Hope this helps

I had something weird happen when i tried to use a when statement in styling... try putting a space in where the TRUE is

Ex. '_True'

Idk but it worked for me

Okay, I have tried everything I can think of including all of the suggestions that I've seen posted and it seems like it is not recognizing the WHEN condition. I have tried using the actual field names as well, and have ensured that I am using the appropriate column numbers when I reference by column number. Nothing is working. To test it further, I have stripped my code to as basic as this:

TYPE=DATA,
COLUMN=N17,
WHEN=N13 EQ 'TRUE',
COLOR=RED,
$

When I remove the WHEN condition from this little piece of code, it works fine...I get the N17 column generated in red. However, when the WHEN condition is included, I get my report, but WebFOCUS acts like it does not even recognizes the WHEN condition at all....it does not color it red even though the field for N13 is 'TRUE'.

This is the first time I am using a WHEN condition with WF 7.7.02. I have used WHEN conditions with previous WF versions and it has worked for the most part. I am beginning to think that maybe it could possibly be some type of bug with this version.

If anymore suggestions or insight on this, please let me know.

Just to confirm, you are including column N13 in the report or via a NOPRINT? All fields mentioned in a stylesheet must be in the report columns or included as NOPRINTs.

Use one of the IBI supplied sample files to recreate the problem - if you can recreate the problem, open a case with IBI (and post the code here).

This message has been edited. Last edited by: Francis Mariani,

Yes, I have N13 as a NOPRINT field in the print statement.

Actually, it works with the sample IBI CAR file with the code I created below. Then, I'm trying to figure out what's making it not work with my other code. Keep suggestions coming if you have them.

TABLE FILE CAR
PRINT MODEL
BY CAR
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET WEBVIEWER ON
ON TABLE SET WEBVIEWTARG OFF
ON TABLE SET HTMLCSS ON
ON TABLE SET TITLELINE SKIP

ON TABLE SET STYLE *
UNITS=IN,
PAGESIZE='Letter',
LEFTMARGIN=0.250000,
RIGHTMARGIN=0.250000,
TOPMARGIN=0.250000,
BOTTOMMARGIN=0.250000,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
TYPE=DATA,
COLUMN=N2,
WHEN=N1 EQ 'BMW',
COLOR=RED,
$
ENDSTYLE
END

Post you code so we can take a look.

Please always post code between

[code]

[/code]

(Click on the </> button of the forum reply window).

Here is pretty much all of the code....down to where it does not work in the stylesheeting and where I am testing.

  
-DEFAULT &EDITABLE = 'TRUE';

SET NODATA=' '

SET JSURL = ../javascript/footnote.js

-INCLUDE cs_part3_chapter_data_iadod_report.fex

TABLE FILE CS_FOOTNOTED_DATA
PRINT SECTION_NUM
WHERE SECTION_NUM EQ '2';
ON TABLE HOLD
END
-RUN

-SET &SECTION_FLAG = &LINES;

DEFINE FILE CS_FOOTNOTED_DATA
EDT_FLG/A5V = '&EDITABLE';
TOTAL_CHAPTER_TITLE/A200V='    Total,  ' | CS_FOOTNOTED_DATA.CS_FOOTN.CHAPTER_TITLE;

TXT_AGNCY_ID/A20 MISSING ON =IF AGNCY_ID IS MISSING THEN ' ' ELSE AGNCY_ID;
TXT_XFER_AGNCY_ID/A20 MISSING ON =IF XFER_AGNCY_ID IS MISSING THEN ' ' ELSE XFER_AGNCY_ID;
TXT_MAIN_ACCT_CD/A20V MISSING ON =IF MAIN_ACCT_CD IS MISSING THEN ' ' ELSE MAIN_ACCT_CD;
TXT_SUB_ACCT_CD/A20V=SUB_ACCT_CD;
TXT_BUS_LINE_TITLE/A375='  ' || CS_FOOTNOTED_DATA.CS_FOOTN.BUS_LINE_TITLE;
TXT_ACCOUNT_TITLE/A375 MISSING ON =ACCOUNT_TITLE;
TXT_AGENCY_TITLE/A375 MISSING ON =AGENCY_TITLE;
TXT_BUREAU_TITLE/A375 MISSING ON =BUREAU_TITLE;
XFUND_RESOURCE_EQUITY_IND/A20 MISSING ON =IF XFER_AGNCY_ID NE ' ' THEN '      Transfer To:' ELSE FUND_RESOURCE_EQUITY_IND | ':';
SPACES/A8 = ' ';
BUS_LINE_TITLE1/A700 = IF SECTION_NUM EQ '2' THEN '            ' | RECEIPT_TYPE_TITLE
     ELSE IF XFER_AGNCY_ID NE ' ' THEN SPACES | TXT_ACCOUNT_TITLE ELSE BUS_LINE_TITLE;
BUS_LINE_TITLE2/A700 MISSING ON =IF BUS_LINE_TITLE1 IS MISSING OR BUS_LINE_TITLE1 EQ ' '
           THEN ' '
       ELSE BUS_LINE_TITLE1 ;

POA_FLAG/I1 MISSING ON = IF POA IS MISSING THEN 0 ELSE 1;
LEN/I9=LENV(POA, LEN);
POA/A12 MISSING ON = IF POA EQ 'NoYear' THEN 'No Year' ELSE POA;
XA_FLAG/I1 MISSING ON = IF XFER_AGNCY_ID IS MISSING THEN 0 ELSE 1;
-*MN_ACCT_FLAG/I1 = 0;
MN_ACCT_FLAG/I1 = IF MAIN_ACCT_CD IS MISSING THEN 0 ELSE 1;
SECTION_BLOCK/I1= IF SECTION_NUM LT '3' THEN 0 ELSE 5;

DISP_SH_04/A1 = IF NOSHOW EQ 'HEAD' THEN 'N' ELSE IF NOSHOW EQ 'BOTH' THEN 'N'
           ELSE IF SECTION_NUM EQ '1' THEN 'Y' ELSE 'N';
DISP_SF_04/A1 = IF NOSHOW EQ 'FOOT' THEN 'N' ELSE IF NOSHOW EQ 'BOTH' THEN 'N'
           ELSE IF SECTION_NUM EQ '1' THEN 'Y' ELSE 'N';
-*
DISP_SF_06/A1 = IF (SECTION_NUM EQ '1') THEN 'Y' ELSE 'N';
-*
AGENCY_DISPLAY/A15 = AGNCY_ID | MAIN_ACCT_CD | SUB_ACCT_CD | XFER_AGNCY_ID;
END

TABLE FILE CS_FOOTNOTED_DATA
HEADING
"Appropriations, Outlays, and Balances - Continued"
PRINT
     EDT_FLG 
     POA AS 'Period of Availability'
COMPUTE TXT_XFER_AGNCY_ID/A20 = IF AGENCY_DISPLAY EQ LAST AGENCY_DISPLAY
        AND XFER_AGNCY_ID EQ LAST XFER_AGNCY_ID THEN ' ' ELSE XFER_AGNCY_ID; AS 'ATA'
-*     TXT_XFER_AGNCY_ID         AS ''
COMPUTE TXT_AGNCY_ID/A20 = IF AGENCY_DISPLAY EQ LAST AGENCY_DISPLAY
        AND TXT_XFER_AGNCY_ID EQ ' '
        AND AGNCY_ID EQ LAST AGNCY_ID THEN ' ' ELSE AGNCY_ID; AS 'AID'
COMPUTE TXT_MAIN_ACCT_CD/A20 = IF AGENCY_DISPLAY EQ LAST AGENCY_DISPLAY
        AND TXT_XFER_AGNCY_ID EQ ' '
        AND MAIN_ACCT_CD EQ LAST MAIN_ACCT_CD THEN ' ' ELSE MAIN_ACCT_CD; AS 'MAIN'
COMPUTE TXT_SUB_ACCT_CD/A20 = IF AGENCY_DISPLAY EQ LAST AGENCY_DISPLAY
        AND TXT_XFER_AGNCY_ID EQ ' '
        AND SUB_ACCT_CD EQ LAST SUB_ACCT_CD THEN ' ' ELSE SUB_ACCT_CD; AS 'SUB'
     TXT_OPENING_BAL AS 'Balances, Beginning of, Fiscal year'
     TXT_APPROP AS 'Appropriations, and Other, Obligational, Authority <sup>1</sup>'
     TXT_TRANSFER AS 'Transfers, Borrowings, and, Investment, (Net) <sup>2</sup>'
     TXT_OUTLAYS AS 'Outlays,(Net)'
     TXT_BALANCE_WITHDRAWN AS 'Balances, Withdrawn, and Other, Transactions <sup>3</sup>'
     TXT_CLOSING_BAL AS 'Balances End of, Fiscal Year <sup>4</sup>'
     'CS_FOOTNOTED_DATA.CS_FOOTN.OPENING_BAL'       NOPRINT
     'CS_FOOTNOTED_DATA.CS_FOOTN.APPROP'            NOPRINT
     'CS_FOOTNOTED_DATA.CS_FOOTN.TRANSFER'          NOPRINT
     'CS_FOOTNOTED_DATA.CS_FOOTN.OUTLAYS'           NOPRINT
     'CS_FOOTNOTED_DATA.CS_FOOTN.BALANCE_WITHDRAWN' NOPRINT
     'CS_FOOTNOTED_DATA.CS_FOOTN.CLOSING_BAL'       NOPRINT
   'CS_FOOTNOTED_DATA.CS_FOOTN.BUREAU_TITLE'       NOPRINT
TXT_ACCOUNT_TITLE             NOPRINT
 CHAPTER_IND    NOPRINT
 FUND_TYPE_TITLE         NOPRINT
 AGENCY_COUNT_BY_CHAPTER       NOPRINT
 POA_FLAG          NOPRINT
 DISP_SH_04 NOPRINT
 DISP_SF_04 NOPRINT
 DISP_SF_06 NOPRINT
 BUREAU_COUNT_BY_AGENCY NOPRINT
COMPUTE BLNK/A1 = ' '; NOPRINT
COMPUTE SHTEXT1/A50='Deductions for Offsetting Receipts'; NOPRINT
COMPUTE SHTEXT2/A50='Memorandum'; NOPRINT
COMPUTE SHTEXT3/A50='Financing Accounts'; NOPRINT
COMPUTE SHTEXT4/A50='Public Enterprise Funds'; NOPRINT
  RECORD_ID NOPRINT
BY SECTION_BLOCK NOPRINT
BY SECTION_NUM              NOPRINT
BY AGENCY_ORDER_IND               NOPRINT
BY BUREAU_ORDER_IND         NOPRINT
BY GWA_AGENCY_TITLE    NOPRINT
BY FUND_TYPE_ORDER_IND        NOPRINT
BY AGENCY_DISPLAY NOPRINT
BY XFUND_RESOURCE_EQUITY_IND      NOPRINT
BY BUS_LINE_ORDER_IND        NOPRINT
BY RECEIPT_ORDER_IND NOPRINT
BY BUS_LINE_TITLE2             AS 'Appropriation or Fund Account, , Title'
BY HIGHEST POA_ORD                 NOPRINT
-*********************************************************************************************
-* There are many different 'display' requirements for the sub head and sub foot sections
-* defined feilds calculate reduce the display requirements to 'Y' / 'N' and are used below
-*********************************************************************************************

-*********************************************************************************************
-* SORT ORDER 01 - BY SECTION_BLOCK
-*********************************************************************************************

ON SECTION_BLOCK SUBHEAD
-*"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<CS_FOOTNOTED_DATA.CS_FOOTN.CHAPTER_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
WHEN SECTION_NUM EQ '1';

-IF &SECTION_FLAG EQ 0 GOTO DATA2;
ON SECTION_BLOCK RECAP
ST_C_OPENING_BAL/A30 = IF OPENING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OPENING_BAL, '(D17.2)', 'A30');
ST_C_APPROP/A30 = IF APPROP FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(APPROP, '(D17.2)', 'A30');
ST_C_TRANSFER/A30 = IF TRANSFER FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(TRANSFER, '(D17.2)', 'A30');
ST_C_OUTLAYS/A30 = IF OUTLAYS FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OUTLAYS, '(D17.2)', 'A30');
ST_C_BALANCE_WITHDRAWN/A30 = IF BALANCE_WITHDRAWN FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(BALANCE_WITHDRAWN, '(D17.2)', 'A30');
ST_C_CLOSING_BAL/A30 = IF CLOSING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(CLOSING_BAL, '(D17.2)', 'A30');

ON SECTION_BLOCK SUBFOOT
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<TOTAL_CHAPTER_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<ST_C_OPENING_BAL<ST_C_APPROP<ST_C_TRANSFER<ST_C_OUTLAYS<ST_C_BALANCE_WITHDRAWN<ST_C_CLOSING_BAL"
WHEN SECTION_NUM EQ '2';
-GOTO BYPASS;

-DATA2
ON SECTION_BLOCK RECAP
ST_F_OPENING_BAL/A30 = IF OPENING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OPENING_BAL, '(D17.2)', 'A30');
ST_F_APPROP/A30 = IF APPROP FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(APPROP, '(D17.2)', 'A30');
ST_F_TRANSFER/A30 = IF TRANSFER FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(TRANSFER, '(D17.2)', 'A30');
ST_F_OUTLAYS/A30 = IF OUTLAYS FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OUTLAYS, '(D17.2)', 'A30');
ST_F_BALANCE_WITHDRAWN/A30 = IF BALANCE_WITHDRAWN FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(BALANCE_WITHDRAWN, '(D17.2)', 'A30');
ST_F_CLOSING_BAL/A30 = IF CLOSING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(CLOSING_BAL, '(D17.2)', 'A30');
SF_F_TEXT/A50 = IF SECTION_NUM EQ '2' THEN '   Total, Offsetting Receipts' ELSE '   Total, Financing Accounts';

ON SECTION_BLOCK SUBFOOT
"<SF_F_TEXT<BLNK<BLNK<BLNK<BLNK<BLNK<ST_F_OPENING_BAL<ST_F_APPROP<ST_F_TRANSFER<ST_F_OUTLAYS<ST_F_BALANCE_WITHDRAWN<ST_F_CLOSING_BAL"
WHEN SECTION_NUM EQ '3';

-*********************************************************************************************
-* SORT ORDER 02 - BY SECTION_NUM
-*********************************************************************************************
-BYPASS
ON SECTION_NUM SUBHEAD
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<SHTEXT1<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
WHEN SECTION_NUM EQ '2';

-IF &SECTION_FLAG EQ 0 GOTO BYPASS2;
ON SECTION_NUM SUBHEAD
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<SHTEXT2<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<SHTEXT3<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<SHTEXT4<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
WHEN SECTION_NUM EQ '3';

ON SECTION_NUM RECAP
ST_F_OPENING_BAL/A30 = IF OPENING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OPENING_BAL, '(D17.2)', 'A30');
ST_F_APPROP/A30 = IF APPROP FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(APPROP, '(D17.2)', 'A30');
ST_F_TRANSFER/A30 = IF TRANSFER FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(TRANSFER, '(D17.2)', 'A30');
ST_F_OUTLAYS/A30 = IF OUTLAYS FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OUTLAYS, '(D17.2)', 'A30');
ST_F_BALANCE_WITHDRAWN/A30 = IF BALANCE_WITHDRAWN FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(BALANCE_WITHDRAWN, '(D17.2)', 'A30');
ST_F_CLOSING_BAL/A30 = IF CLOSING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(CLOSING_BAL, '(D17.2)', 'A30');
SF_F_TEXT/A50 = IF SECTION_NUM EQ '2' THEN '   Total, Offsetting Receipts' ELSE '   Total, Financing Accounts';

ON SECTION_NUM SUBFOOT
"<SF_F_TEXT<BLNK<BLNK<BLNK<BLNK<BLNK<ST_F_OPENING_BAL<ST_F_APPROP<ST_F_TRANSFER<ST_F_OUTLAYS<ST_F_BALANCE_WITHDRAWN<ST_F_CLOSING_BAL"
WHEN SECTION_NUM NE '1';


ON AGENCY_ORDER_IND SUBHEAD
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<TXT_AGENCY_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
-*<BLNK<BLNK "
-*WHEN DISP_SH_03 EQ 'Y';
WHEN SECTION_NUM EQ '1';
-*
ON AGENCY_ORDER_IND RECAP
 ST_03_OPENING_BAL/A30 = IF OPENING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OPENING_BAL, '(D17.2)', 'A30');
 ST_03_APPROP/A30 = IF APPROP FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(APPROP, '(D17.2)', 'A30');
 ST_03_TRANSFER/A30 = IF TRANSFER FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(TRANSFER, '(D17.2)', 'A30');
 ST_03_OUTLAYS/A30 = IF OUTLAYS FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OUTLAYS, '(D17.2)', 'A30');
 ST_03_BALANCE_WITHDRAWN/A30 = IF BALANCE_WITHDRAWN FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(BALANCE_WITHDRAWN, '(D17.2)', 'A30');
 ST_03_CLOSING_BAL/A30 = IF CLOSING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(CLOSING_BAL, '(D17.2)', 'A30');
 SF_03_TEXT/A400 = '   Total, ' | TXT_AGENCY_TITLE;
-*
 ON AGENCY_ORDER_IND SUBFOOT
 "<SF_03_TEXT<BLNK<BLNK<BLNK<BLNK<BLNK<ST_03_OPENING_BAL<ST_03_APPROP<ST_03_TRANSFER<ST_03_OUTLAYS<ST_03_BALANCE_WITHDRAWN<ST_03_CLOSING_BAL"
WHEN SECTION_NUM EQ '1';


-*********************************************************************************************
-* SORT ORDER 04 - BY BUREAU_ORDER_IND
-*********************************************************************************************
-BYPASS2
ON BUREAU_ORDER_IND SUBHEAD
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<TXT_BUREAU_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
WHEN DISP_SH_04 EQ 'Y';

ON BUREAU_ORDER_IND RECAP
ST_B_OPENING_BAL/A30 =       IF OPENING_BAL       FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OPENING_BAL, '(D17.2)', 'A30');
ST_B_APPROP/A30      =       IF APPROP            FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(APPROP, '(D17.2)', 'A30');
ST_B_TRANSFER/A30    =       IF TRANSFER          FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(TRANSFER, '(D17.2)', 'A30');
ST_B_OUTLAYS/A30     =       IF OUTLAYS           FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OUTLAYS, '(D17.2)', 'A30');
ST_B_BALANCE_WITHDRAWN/A30 = IF BALANCE_WITHDRAWN FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(BALANCE_WITHDRAWN, '(D17.2)', 'A30');
ST_B_CLOSING_BAL/A30 =       IF CLOSING_BAL       FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(CLOSING_BAL, '(D17.2)', 'A30');
ST_B_TITLE/A300='    Total,  ' | BUREAU_TITLE ;

ON BUREAU_ORDER_IND SUBFOOT WITHIN
" "
"<ST_B_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<ST_B_OPENING_BAL<ST_B_APPROP<ST_B_TRANSFER<ST_B_OUTLAYS<ST_B_BALANCE_WITHDRAWN<ST_B_CLOSING_BAL"
WHEN DISP_SF_04 EQ 'Y';
-*
-*********************************************************************************************
-* SORT ORDER 05 - BY GWA_AGENCY_TITLE
-*********************************************************************************************

ON GWA_AGENCY_TITLE SUBHEAD
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<GWA_AGENCY_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
WHEN SECTION_NUM EQ '1';

ON GWA_AGENCY_TITLE RECAP
AT_A_AGENCY_TITLE/A200 = '     Total, ' | BUREAU_TITLE | ', ' | GWA_AGENCY_TITLE ;
AT_A_OPENING_BAL/A30 = IF OPENING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OPENING_BAL, '(D17.2)', 'A30');
AT_A_APPROP/A30      = IF APPROP FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(APPROP, '(D17.2)', 'A30');
AT_A_TRANSFER/A30    = IF TRANSFER FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(TRANSFER, '(D17.2)', 'A30');
AT_A_OUTLAYS/A30     = IF OUTLAYS FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(OUTLAYS, '(D17.2)', 'A30');
AT_A_BALANCE_WITHDRAWN/A30 = IF BALANCE_WITHDRAWN FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(BALANCE_WITHDRAWN, '(D17.2)', 'A30');
AT_A_CLOSING_BAL/A30 = IF CLOSING_BAL FROM -0.95 TO 0.01 THEN '----------' ELSE FTOA(CLOSING_BAL, '(D17.2)', 'A30');
ON GWA_AGENCY_TITLE SUBFOOT WITHIN MULTILINES
"<AT_A_AGENCY_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<AT_A_OPENING_BAL<AT_A_APPROP<AT_A_TRANSFER<AT_A_OUTLAYS<AT_A_BALANCE_WITHDRAWN<AT_A_CLOSING_BAL"
WHEN SECTION_NUM EQ '1';


-*********************************************************************************************
-* SORT ORDER 06 - BY FUND_TYPE_ORDER_IND
-*********************************************************************************************

ON CS_FOOTNOTED_DATA.CS_FOOTN.FUND_TYPE_ORDER_IND SUBHEAD
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<FUND_TYPE_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
WHEN SECTION_NUM EQ '1';
-*


-*********************************************************************************************
-* SORT ORDER 07 - BY AGENCY_DISPLAY
-*********************************************************************************************

ON AGENCY_DISPLAY SUBHEAD
"<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
"<TXT_ACCOUNT_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
WHEN SECTION_NUM NE '2';

ON AGENCY_DISPLAY SUBHEAD
"<FUND_RESOURCE_EQUITY_IND<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
WHEN XFER_AGNCY_ID NE ' ';

ON AGENCY_DISPLAY SUBHEAD
"<BUS_LINE_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
WHEN XFER_AGNCY_ID NE ' ';

ON AGENCY_DISPLAY RECAP
AT_OPENING_BAL/A30 = IF OPENING_BAL FROM -0.95 TO 0.01 THEN ' '  ELSE FTOA(OPENING_BAL, '(D17.2)', 'A30');
AT_APPROP/A30 = IF APPROP FROM -0.95 TO 0.01 THEN '- 0 -'     ELSE FTOA(APPROP, '(D17.2)', 'A30');
AT_TRANSFER/A30 = IF TRANSFER FROM -0.95 TO 0.01 THEN ' ' ELSE FTOA(TRANSFER, '(D17.2)', 'A30');
AT_OUTLAYS/A30 = IF OUTLAYS FROM -0.95 TO 0.01 THEN ' '   ELSE FTOA(OUTLAYS, '(D17.2)', 'A30');
AT_BALANCE_WITHDRAWN/A30 = IF BALANCE_WITHDRAWN FROM -0.95 TO 0.01 THEN ' ' ELSE FTOA(BALANCE_WITHDRAWN, '(D17.2)', 'A30');
AT_CLOSING_BAL/A30 = IF CLOSING_BAL FROM -0.95 TO 0.01 THEN '- 0 -' ELSE FTOA(CLOSING_BAL, '(D17.2)', 'A30');
AT_TEXT/A11='   Subtotal';
ON AGENCY_DISPLAY SUBFOOT WITHIN MULTILINES
"<BLNK<AT_TEXT<BLNK<TXT_AGNCY_ID<TXT_MAIN_ACCT_CD<TXT_SUB_ACCT_CD<AT_OPENING_BAL<AT_APPROP<AT_TRANSFER<AT_OUTLAYS<AT_BALANCE_WITHDRAWN<AT_CLOSING_BAL"
-*"<BLNK<AT_TEXT<BLNK<BLNK<BLNK<BLNK<AT_OPENING_BAL<AT_APPROP<AT_TRANSFER<AT_OUTLAYS<AT_BALANCE_WITHDRAWN<AT_CLOSING_BAL"
WHEN SECTION_NUM NE '2';

-*********************************************************************************************
-* SORT ORDER 08 - BY XFUND_RESOURCE_EQUITY_IND
-*********************************************************************************************

ON XFUND_RESOURCE_EQUITY_IND SUBHEAD
"<XFUND_RESOURCE_EQUITY_IND<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
-*WHEN SECTION_NUM NE '2';



ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET WEBVIEWER ON
ON TABLE SET WEBVIEWTARG OFF
ON TABLE SET HTMLCSS ON
ON TABLE SET TITLELINE SKIP

ON TABLE SET STYLE *
     UNITS=IN,
     PAGESIZE='Letter',
     LEFTMARGIN=0.250000,
     RIGHTMARGIN=0.250000,
     TOPMARGIN=0.250000,
     BOTTOMMARGIN=0.250000,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$

 INCLUDE = GWA_STND,

$
TYPE=REPORT,
     SIZE=8,
$
TYPE=HEADING,
     SIZE=12,
$
TYPE=TITLE,
     SIZE=9,
$
TYPE=SUBHEAD,BY=SECTION_BLOCK,OBJECT=FIELD,ITEM=1,JUSTIFY=CENTER,COLSPAN=1,STYLE=BOLD,$
TYPE=SUBHEAD,BY=SECTION_NUM,OBJECT=FIELD,ITEM=1,JUSTIFY=CENTER,COLSPAN=1,STYLE=BOLD,$
TYPE=SUBHEAD,BY=AGENCY_ORDER_IND,OBJECT=FIELD,ITEM=1,JUSTIFY=CENTER,COLSPAN=1,STYLE=BOLD,$
TYPE=SUBHEAD,BY=BUREAU_ORDER_IND,OBJECT=FIELD,ITEM=1,JUSTIFY=CENTER,COLSPAN=1,STYLE=BOLD,$
TYPE=SUBHEAD,BY=FUND_TYPE_ORDER_IND,OBJECT=FIELD,ITEM=1,JUSTIFY=CENTER,COLSPAN=1,STYLE=BOLD,$
TYPE=SUBHEAD,BY=GWA_AGENCY_TITLE,OBJECT=FIELD,ITEM=1,JUSTIFY=CENTER,COLSPAN=1,$
TYPE=SUBHEAD,BY=AGENCY_TITLE,OBJECT=FIELD,ITEM=1,JUSTIFY=CENTER,COLSPAN=1,$
TYPE=SUBHEAD,BY=AGENCY_DISPLAY, OBJECT=FIELD, ITEM=1, POSITION=BUS_LINE_TITLE2,JUSTIFY=LEFT,HEADALIGN=BODY,COLSPAN=1,STYLE=NORMAL,$
TYPE=SUBHEAD,BY=XFUND_RESOURCE_EQUITY_IND, OBJECT=FIELD, ITEM=1, POSITION=BUS_LINE_TITLE2,JUSTIFY=LEFT,HEADALIGN=BODY,COLSPAN=1,STYLE=NORMAL,$
TYPE=SUBHEAD,BY=ACCOUNT_TITLE,OBJECT=FIELD,ITEM=1,JUSTIFY=LEFT,$
-*
-*TYPE=SUBHEAD,BY=ACCOUNT_TITLE,OBJECT=FIELD,ITEM=1,POSITION=BUS_LINE_TITLE2,JUSTIFY=LEFT,$



TYPE=DATA, COLUMN=P12,
     BORDER-TOP=OFF,
  BORDER-BOTTOM=OFF,
  BORDER-LEFT=OFF,
  BORDER-RIGHT=LIGHT,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
$
-*
TYPE=DATA, COLUMN=P1, JUSTIFY=LEFT,$
TYPE=DATA, COLUMN=P2, JUSTIFY=RIGHT,$
TYPE=DATA, COLUMN=P3, JUSTIFY=CENTER,$
TYPE=DATA, COLUMN=P4, JUSTIFY=CENTER,$
TYPE=DATA, COLUMN=P5, JUSTIFY=CENTER,$
TYPE=DATA, COLUMN=P6, JUSTIFY=CENTER,$
TYPE=DATA, COLUMN=P7, JUSTIFY=RIGHT,$
TYPE=DATA, COLUMN=P8, JUSTIFY=RIGHT,$
TYPE=DATA, COLUMN=P9, JUSTIFY=RIGHT,$
TYPE=DATA, COLUMN=P10, JUSTIFY=RIGHT,$
TYPE=DATA, COLUMN=P11, JUSTIFY=RIGHT,$
TYPE=DATA, COLUMN=P12, JUSTIFY=RIGHT,$


TYPE=DATA, COLUMN=POA, COLOR=WHITE, WHEN = POA_FLAG EQ 0,$
TYPE=DATA, COLUMN=TXT_XFER_AGNCY_ID, COLOR=WHITE, WHEN = XA_FLAG EQ 0,$
TYPE=DATA, COLUMN=TXT_MAIN_ACCT_CD, COLOR=WHITE, WHEN = MN_ACCT_FLAG EQ 0,$


TYPE=SUBFOOT, OBJECT=FIELD,ITEM=1, JUSTIFY=LEFT,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=2, JUSTIFY=RIGHT,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=3, JUSTIFY=CENTER,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=4, JUSTIFY=CENTER,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=5, JUSTIFY=CENTER,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=6, JUSTIFY=CENTER,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=7, JUSTIFY=RIGHT,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=8, JUSTIFY=RIGHT,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=9, JUSTIFY=RIGHT,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=10, JUSTIFY=RIGHT,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=11, JUSTIFY=RIGHT,$
TYPE=SUBFOOT, OBJECT=FIELD,ITEM=12, JUSTIFY=RIGHT,$

TYPE=SUBFOOT, BY=SECTION_BLOCK, COLUMN=P7, BORDER-TOP=LIGHT, BORDER-BOTTOM=LIGHT, BORDER-TOP-STYLE=SOLID, BORDER-BOTTOM-STYLE=DOUBLE,$
TYPE=SUBFOOT, BY=SECTION_BLOCK, COLUMN=P8, BORDER-TOP=LIGHT, BORDER-BOTTOM=LIGHT, BORDER-TOP-STYLE=SOLID, BORDER-BOTTOM-STYLE=DOUBLE,$
TYPE=SUBFOOT, BY=SECTION_BLOCK, COLUMN=P9, BORDER-TOP=LIGHT, BORDER-BOTTOM=LIGHT, BORDER-TOP-STYLE=SOLID, BORDER-BOTTOM-STYLE=DOUBLE,$
TYPE=SUBFOOT, BY=SECTION_BLOCK, COLUMN=P10, BORDER-TOP=LIGHT, BORDER-BOTTOM=LIGHT, BORDER-TOP-STYLE=SOLID, BORDER-BOTTOM-STYLE=DOUBLE,$
TYPE=SUBFOOT, BY=SECTION_BLOCK, COLUMN=P11, BORDER-TOP=LIGHT, BORDER-BOTTOM=LIGHT, BORDER-TOP-STYLE=SOLID, BORDER-BOTTOM-STYLE=DOUBLE,$
TYPE=SUBFOOT, BY=SECTION_BLOCK, COLUMN=P12, BORDER-TOP=LIGHT, BORDER-BOTTOM=LIGHT, BORDER-TOP-STYLE=SOLID, BORDER-BOTTOM-STYLE=DOUBLE,$

TYPE=DATA, 
COLUMN=N17,
WHEN=N13 EQ 'TRUE', 
COLOR=RED, 

$
TYPE=DATA,
     COLUMN=N17,
     WHEN=N13 EQ 'TRUE',
     DRILLMENUITEM='View PenInk Footnote Changes',
          JAVASCRIPT=viewPenInkFootnoteChanges(RECORD_ID 1),
     DRILLMENUITEM='Pen Ink Change',
          JAVASCRIPT=PenInkChange(RECORD_ID 1),
     DRILLMENUITEM='Standard Footnote View',
          JAVASCRIPT=StandardFootnoteView(RECORD_ID 1),
     DRILLMENUITEM='User Footnote',
          JAVASCRIPT=UserFootnote(RECORD_ID 1),
$
TYPE=DATA,
     COLUMN=N13,
	 COLOR=RED,
$

ENDSTYLE
END
-EXIT

Which field is N13? Is it EDT_FLG? I would try not making it a variable length field.

Also, I always try to use real field names, it's annoying that the GUI generates these N99 field references.

I waited for Francis to answer. Yes, EDT_FLG is the 13th column.

Change:

EDT_FLG/A5V = '&EDITABLE';

to:

EDT_FLG/A5 = '&EDITABLE.EVAL';

Why are you making the field a VARCHAR/Variable, as Francis asks?

hth

Well, that's not it.

That did not work?

What does

INCLUDE = GWA_STND,

have in it?

Tom, the A5V works in my test fex.

AHHH OK.

My approach to solving this would be to comment out all the complicated stuff, then start adding lines back in - bit by bit, until the styling stops working. Comment out all the subheading and subfooting code and related stylesheet. All the COMPUTES...

Try adding another COMPUTE to your code. Add it as the last COMPUTE in your code.

COMPUTE LINK_TRUE/A1 = IF EDT_FLG EQ 'True' THEN '1' ELSE '0';
-*You may also want to try it with the space before True...
COMPUTE LINK_TRUE/A1 = IF EDT_FLG EQ ' True' THEN '1' ELSE '0';
 

Then use the TRUE_LINK in your WHEN statement:

 
TYPE=DATA,
COLUMN=N17,

WHEN = TRUE_LINK EQ '1',

DRILLMENUITEM='View PenInk Footnote Changes',
JAVASCRIPT=viewPenInkFootnoteChanges(RECORD_ID 1),
DRILLMENUITEM='Pen Ink Change',
JAVASCRIPT=PenInkChange(RECORD_ID 1),
DRILLMENUITEM='Standard Footnote View',
JAVASCRIPT=StandardFootnoteView(RECORD_ID 1),
DRILLMENUITEM='User Footnote',
JAVASCRIPT=UserFootnote(RECORD_ID 1),
 

Hopefully that resolves the issue

I think I have found the main issue here based on analysis from IBI as well. INCLUDE = GWA_STND has additonal styling which makes references to columns with 'P' values. However, the styling at the bottom of the main fex which I added makes references to columns with 'N' values for the conditional styling. Well, the styling in the include fex referenced by the 'P' values offsets the WHEN conditional styling at the bottom of the main fex for some odd reason.

Therefore, it made it seem like it was not evaluating my WHEN condition in the styling in the main fex. IBI had recommended just using 'P' values in the conditional styling in main fex to make it consistent with the include fex. However, the 'P' value only references PRINT fields and not NOPRINT fields. The minor issue now is that my conditional styling needs to be based on a NOPRINT field because I don't want this field to be displayed in the report.
Here is the code to the include GWA_STND:

  
TYPE=REPORT,
     FONT='ARIAL',
     COLOR='BLACK',
     BACKCOLOR=RGB(240 240 240),
     STYLE=NORMAL,
     RIGHTGAP=0.125000,
   GRID=OFF,
$
TYPE=REPORT, 
 COLUMN=P1,
     BORDER-TOP=OFF,
  BORDER-BOTTOM=OFF,
  BORDER-LEFT=LIGHT,
  BORDER-RIGHT=OFF,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
$
TYPE=HEADING,
     BORDER=LIGHT,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
     COLOR='WHITE',
     BACKCOLOR=RGB(102 153 153),
     STYLE=BOLD,
     JUSTIFY=CENTER,
$
TYPE=TITLE,
     BORDER=LIGHT,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
     COLOR='WHITE',
     BACKCOLOR=RGB(102 153 153),
     STYLE=BOLD ,
  JUSTIFY=CENTER,
$
TYPE=SUBHEAD ,HEADALIGN=BODY,MARKUP=ON,$
 
TYPE=SUBHEAD,
     BORDER-TOP=OFF,
  BORDER-BOTTOM=OFF,
  BORDER-LEFT=LIGHT,
  BORDER-RIGHT=LIGHT,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
$ 
-*-*
-*************************************************************************************
-* Bad news on the SUBHEAD styling.  Just as the columns need to alternate colors
-* so do the components od the subfoot.  So, while the colors are set, the developer
-* MUST have a field in every position across the page, such as the use of a computed
-* field:
-*
-*  COMPUTE BLNK/A1 = ' '; NOPRINT
-*
-*  AND WORSE YET... ALL text to be included in subhead or subfoot sections, must 
-*  be in fiels as well :-(
-*
-*  and using that as a placeholder
-*
-*  ON AGENCY_DISPLAY SUBHEAD
-*  "<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
-*  "<TXT_ACCOUNT_TITLE<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK<BLNK"
-*
-*
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=2,BACKCOLOR=RGB(223 223 223),$
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=4,BACKCOLOR=RGB(223 223 223),$
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=6,BACKCOLOR=RGB(223 223 223),$
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=8,BACKCOLOR=RGB(223 223 223),$
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=10,BACKCOLOR=RGB(223 223 223),$
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=12,BACKCOLOR=RGB(223 223 223),$
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=14,BACKCOLOR=RGB(223 223 223),$
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=16,BACKCOLOR=RGB(223 223 223),$
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=18,BACKCOLOR=RGB(223 223 223),$
 TYPE=SUBHEAD,OBJECT=FIELD,ITEM=20,BACKCOLOR=RGB(223 223 223),$
-*
-*************************************************************************************
-*
TYPE=DATA,
 COLUMN=P1,
     BORDER-TOP=OFF,
  BORDER-BOTTOM=OFF,
  BORDER-LEFT=LIGHT,
  BORDER-RIGHT=OFF,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
$
-*
-*************************************************************************************
-* The GWA standards call for alternating COLUMN colors, rather than the alternating
-*  ROW colors supported by EebFOCUS.  This style sheet supports the first 20 col.
-* 
-*************************************************************************************
-*
TYPE=DATA,BORDER=OFF,
 COLUMN=P2,
 BACKCOLOR=RGB(223 223 223),
$
TYPE=DATA,BORDER=OFF,
 COLUMN=P4,
 BACKCOLOR=RGB(223 223 223),
$
TYPE=DATA,BORDER=OFF,
 COLUMN=P6,
 BACKCOLOR=RGB(223 223 223),
$
TYPE=DATA,BORDER=OFF,
 COLUMN=P8,
 BACKCOLOR=RGB(223 223 223),
$
TYPE=DATA,BORDER=OFF,
 COLUMN=P10,
 BACKCOLOR=RGB(223 223 223),
$
TYPE=DATA,BORDER=OFF,
 COLUMN=P12,
 BACKCOLOR=RGB(223 223 223),
$
TYPE=DATA,BORDER=OFF,
 COLUMN=P14,
 BACKCOLOR=RGB(223 223 223),
$
TYPE=DATA,BORDER=OFF,
 COLUMN=P16,
 BACKCOLOR=RGB(223 223 223),
$
TYPE=DATA,BORDER=OFF,
 COLUMN=P18,
 BACKCOLOR=RGB(223 223 223),
$
TYPE=DATA,BORDER=OFF,
 COLUMN=P20,
 BACKCOLOR=RGB(223 223 223),
$
-*
TYPE=SUBFOOT ,HEADALIGN=BODY,MARKUP=ON,$
 
TYPE=SUBFOOT,
     BORDER-TOP=OFF,
  BORDER-BOTTOM=OFF,
  BORDER-LEFT=LIGHT,
  BORDER-RIGHT=LIGHT,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
$ 
-*-*
-*************************************************************************************
-* Bad news on the subfoot styling.  Just as the columns need to alternate colors
-* so do the components od the subfoot.  So, while the colors are set, the developer
-* MUST have a field in every position across the page such as:
-*
-*  ON AGENCY_DISPLAY SUBFOOT
-*  "<BLNK<AT_TEXT<BLNK<BLNK<BLNK<BLNK<AT_OPENING_BAL<AT_APPROP<AT_TRANSFER<AT_OUTLAYS<AT_BALANCE_WITHDRAWN<AT_CLOSING_BAL"
 
-*
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=1,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=2,BACKCOLOR=RGB(193 197 167),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=3,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=4,BACKCOLOR=RGB(193 197 167),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=5,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=6,BACKCOLOR=RGB(193 197 167),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=7,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=8,BACKCOLOR=RGB(193 197 167),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=9,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=10,BACKCOLOR=RGB(193 197 167),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=11,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=12,BACKCOLOR=RGB(193 197 167),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=13,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=14,BACKCOLOR=RGB(193 197 167),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=15,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=16,BACKCOLOR=RGB(193 197 167),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=17,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=18,BACKCOLOR=RGB(193 197 167),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=19,BACKCOLOR=RGB(202 205 179),$
 TYPE=SUBFOOT,OBJECT=FIELD,ITEM=20,BACKCOLOR=RGB(193 197 167),$
-*
-* 
-*************************************************************************************
 

I found a technical note on the subject:

How to make a conditional multidrill

You can only impose a condition by defining the condition as a macro, and referencing the macro before the first menu item -- as in the following code from the cited note.

ON TABLE SET STYLE *
DEFMACRO=COND0001,MACTYPE=RULE,WHEN=N1 EQ 'BMW',$
TYPE=DATA,COLUMN=N1,MACRO=COND0001,
DRILLMENUITEM='DrillDown 1',FOCEXEC=50342517,TARGET='_blank',
DRILLMENUITEM='DrillDown 2',FOCEXEC=50342517,TARGET='_blank',$

The condition will apply to the drilldown menu as a whole: rows where the condition is True will have the hyperink (and it will bring up the entire list); rows where it is False will have no hyperlink.

Unfortunately, that does not give the ability to place separate conditions on each DrillMenuItem in the list -- which is what I need for my application: I want to be able to turn drilldown reports on or off, on a per-drill-item, per-row basis.

Any suggestions?

This message has been edited. Last edited by: j.gross,

Jack,

This could be a solution:

  
-* File jgross02.fex
TABLE FILE CAR
SUM SALES
BY COUNTRY 
BY SEATS
ON TABLE SET STYLE *
DEFMACRO=JG4,MACTYPE=RULE,WHEN=N2 EQ 4,$
DEFMACRO=JG2,MACTYPE=RULE,WHEN=N2 EQ 2,$

TYPE=DATA, COLUMN=SALES, MACRO=JG4,
DRILLMENUITEM=DD1, FOCEXEC=DD1,
DRILLMENUITEM=DD2, FOCEXEC=DD2,
DRILLMENUITEM=DD3, FOCEXEC=DD3,
$
TYPE=DATA, COLUMN=SALES, MACRO=JG2,
DRILLMENUITEM=DD1, FOCEXEC=DD1,
DRILLMENUITEM=DD2, FOCEXEC=DD2,
$
ENDSTYLE
END

Yes, that seems to be the indicated direction.

But, in my application, it is desired to have the report data-driven, so that the list of widgets for the rows is table driven AND whether each of the pool of available drilldown reports applies to a given row is also table-driven.

I would have to generate the code for the MACRO declarations and the conditional multidrill declarations dynamically (via DEFINE and TABLE) as a -INCLUDE file, so as to have

(a) a set of mutually exclusive conditions based on the widget-key (I get a CRASH if several single or multi drilldowns apply to the same column)

(b) corresponding conditional multidrill declarations to suit each widget (or each equivalence class of widgets).

The -INCLUDE, of course, renders the report incompatible with the GUI editor. Such is life.

Such is life when the GUI is a reflection of the code.
It is time to separate and make the "Assist" a stand alone and have all the generated code done under cover, with the -INCLUDEs when necessary.
Mayeb a tall order but I feel that this is the way users will want to go.