Hey all,

I've got a report I'm bringing over from 7.6.11 to our 8.1 environment. I've fixed all the links (I think) to full paths/new reqd. formats, and made sure all needed synonyms it requests data through are created and available via the app path. When I go to run it, I am given the autoprompt facility with default values supplied to each parameter needed to be resolved. I hit run after such and get the following error:

<ibfsrpc _jt="IBFSResponseObject" language="EN" localizeddesc="Abnormal termination of reporting server agent (Crashed or extreme operator kill)" name="runAdHocFex" returncode="32027" returndesc="IBFSException 32027: local error" subreturncode="0" subsystem="SSYS" type="simple">
+ <ibfsparams size="7">
- <ibfserrorvalues size="3">
  <entry key="appName" value="server1 server2 server3 images ibisamp baseapp" /> 
  <entry key="edaNode" value="EDASERVE" /> 
  <entry key="MSG" value="local error" /> 
  </ibfserrorvalues>
  </ibfsrpc>

Does anyone here on the forums know what this error refers to or what would cause this kind of error to occur?

Thanks in advance!

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

That could be several things. The real error was probably hidden by setting SET ERROROUT = ON (No, I really didn't mean OFF):

• The process tried to create a FOCUS file larger than the maximam supported size (~2GB, IIRC)
  
• The agent ran out of memory
  
• The agent crashed for some other reason (probably a bug)

In the last two cases, there should be some evidence of what happened in the server's EDAPRINT.LOG file.

If this is reproducible, your best bet is to create a savediag and open a case with IBI.

For ways to debug this, start with SET ERROROUT = OFF. Then place -EXIT's (or -QUIT if you're in a subroutine) until you find at which point your procedure crashes.

Most efficient is to apply the principle of a binary search here; place the first -EXIT halfway in your fex (between statements of course). Do you get the crash? Place it halfway the first half. Didn't crash? Place it halfway the second half. Repeat.

Wep5622,

Thanks for your insights and tips. I will try your troubleshooting method and see what goes down.

What directory is the EDAPRINT.LOG file in? Or where would I find it? Is it different for every site? Or does it have a default location? Thanks!

quote:

returncode="32027"

This is the important piece of information.

T

Emily Max posted this in the early part of last year, which may be useful for you.

T

Tony,

quote:

Originally posted by Tony A:

quote:

returncode="32027"

This is the important piece of information.

Is there somewhere where these return codes are documented?

Also, thanks for the link! Way helpful! Appreciate it!

I don't know if there is written documentation, but we can get online documentation. Simply run the command question-mark error-number:

? 1001

This returns:

 (FOC1001) ACCESS NOT SUPPORTED. CHECK SUFFIX IN THE MASTER %1%2%3%4
 The ACCESS method for the file is not
 supported by FOCUS. The SUFFIX parameter in
 the Master File Description must specify
 VSAM, ISAM, FIX ,COM, OR XFOC.

Unfortunately, the newer numbers (generally 5-digit numbers) don't usually have an explanation (I'm not sure why):

? 32027
 (FOC32027) CONSOLE CONNECT TO %1 FAILED

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

Thanks Francis! Hopefully they will add some additional explanation here soon or docs for the various error codes.

Hey all,

So, after attempting to place -EXIT at various places to figure out where it crashes, I found that I get what follows after placing the -EXIT where it finally doesn't crash (which makes little sense to me as to why it doesn't based on where I put it).

For some reason it's saying it doesn't recognize a DEFINE field/word used in a WHERE clause within the code (SELL). Or at least that is what it claims it can't. Not sure why it had issue with SELL and not COST. Just above the WHERE line in question is an IF phrase line with unfamiliar syntax that when processes doesn't show a complete statement. I'm wondering if that is the real issue. Does it look like legit syntax to any of you? --> IF STRMEMBR EQ &MEMBR.(OR()).

Code in question (the WHERE is at the bottom of this snippet):

DEFINE FILE HOLD
COST/D14.4=IF &B3 EQ 3330 OR &B3 EQ 3190 THEN 0 ELSE &S2;
-* Here's where SELL is defined:
SELL/D14.4=IF &B3 EQ 3330 OR &B3 EQ 3190 THEN 0 ELSE &S1;
-*CE/D14=IF &B3 EQ 3330 OR &B3 EQ 3190 THEN 0 ELSE &S4;
QTY/D14=IF &B3 EQ 3330 OR &B3 EQ 3190 THEN 0 ELSE &S3;
-*DRPCE/D14=IF &B3 EQ 3190 THEN &S4 ELSE 0;
DRPQTY/D14=IF &B3 EQ 3190 THEN &S3 ELSE 0;
ADJ/D14.4=IF &B3 EQ 3330 THEN -&S2 ELSE 0;
DRPCOST/D14.4=IF &B3 EQ 3190 THEN &S2 ELSE 0;
DRPSELL/D14.4=IF &B3 EQ 3190 THEN &S1 ELSE 0;
Division/A10=DECODE DIV ( 1 'city 1' 3 city2 6 city3 0 'Adj' ELSE 'Bad Code' );
Mbr/A3='Mbr';
END

TABLE FILE HOLD
SUM
  &S2
  &S1
  SELL
  COST
  ADJ
  DRPCOST
  DRPSELL
  QTY
DRPQTY
BY DIV
BY STR
BY Division
BY Mbr
ON TABLE HOLD AS ATHLD FORMAT FOCUS INDEX DIV STR
END

JOIN
 ATHLD.SEG01.DIV AND ATHLD.SEG01.STR IN ATHLD
 TO UNIQUE STORE.STORE.STRDIVNO AND STORE.STORE.STRSTOREID IN STORE AS J0
 END

TABLE FILE ATHLD
SUM
     SELL/P15C AS 'Reg,Sales'
     COST/P15C AS 'CostOf,Sales'
     COMPUTE RegMarginPct/D7.1% = ( (SELL - COST ) / SELL ) * 100; AS 'Reg,Margin'
     DRPSELL/P15C AS 'Drop,Sales'
     DRPCOST/P15C AS 'CostOf,DropSales'
     COMPUTE DropMarginPct/D7.1% = ( (DRPSELL - DRPCOST) / DRPSELL ) * 100; AS 'Drop,Margin'
     ADJ/P15C AS 'Inv,Adj'
     COMPUTE NetMargin/D12 = (SELL + DRPSELL); AS 'Net,Sales'
     COMPUTE MarginPct/D7.1% = ( (SELL + DRPSELL + ADJ - COST - DRPCOST) / &S1 ) * 100; AS 'Net,Margin'
     PCT.&S1/P12.2% AS 'Mix'
  QTY/P15C AS 'InvUnits'
  DRPQTY/P15C AS 'Drop,InvUnits'
BY Mbr AS ''
BY DIV NOPRINT AS 'Division'
BY Division
IF STRMEMBR EQ &MEMBR.(OR()).
WHERE STRMEMBR NE '8' &AFM;
WHERE SELL NE 0 OR COST NE 0 OR DRPSELL NE 0 OR DRPCOST NE 0 OR ADJ NE 0;

Output of the IF and WHERE statements in question:

  
BY Division
 IF STRMEMBR EQ
 WHERE STRMEMBR NE '8' FOC_NONE;
 WHERE SELL NE 0 OR COST NE 0 OR DRPSELL NE 0 OR DRPCOST NE 0 OR ADJ NE 0;

Here's the entirety of the code for the procedure if this helps:

  
-INCLUDE IBFS:/EDA/EDASERVE/baseapp/getdatescal.fex
-INCLUDE IBFS:/EDA/EDASERVE/baseapp/sql_trace.fex

SET BYDISPLAY = ON

-DEFAULT &Rec_Code    = 'K'
-DEFAULT &Nat_Code    = 'E'
-DEFAULT &DIV         = 'FOC_NONE'
-DEFAULT &DIV_TEXT    = 'All'
-DEFAULT &MEMBR       = 'FOC_NONE'
-DEFAULT &MEMBR_TEXT  = 'All'
-DEFAULT &DTFMT       = 'Default'
-DEFAULT &ARS         = 'FOC_NONE'
-DEFAULT &AFM         = 'FOC_NONE'

-DEFAULT &T_DATE_STR  = &YESTERDAY
-DEFAULT &T_DATE_END  = &YESTERDAY

-DEFAULT &T_DATE_STR2 = 'X'
-DEFAULT &T_DATE_END2 = 'X'
-DEFAULT &T_DATE_STR2_TEXT = 'X'
-DEFAULT &T_DATE_END2_TEXT = 'X'

-SET &Rec_Filter   = DECODE &Rec_Code ( 'A' 'S' 'B' 'A' 'C' 'J' 'D' 'I' 'E' 'W' 'F' 'T' 'G' 'S OR A OR J' 'H' 'S OR T' 'I' 'S OR A OR I OR J' 'J' 'B' 'K' 'S OR A OR I OR J OR X' 'FOC_NONE' 'FOC_NONE' ELSE 'X');
-SET &XRec_Code    = IF &Rec_Code EQ 'FOC_NONE' THEN 'X' ELSE &Rec_Code;

-SET &Rec_Descript = DECODE &Rec_Code ( 'A' 'Sales' 'B' 'Adjustments' 'C' 'J Entries' 'D' 'Interbranch' 'E' 'brand' 'F' 'Taxes' 'G' 'Sales, Adj, and J' 'H' 'Sales and Taxes' 'I' 'Sales, Adj, branch, and J' 'J' 'Trans' 'K' 'Sales, Adj, branch, Journal and P' 'X' 'FOC_NONE' 'FOC_NONE' 'FOC_NONE' ELSE 'Error');

-SET &Nat_Filter   = DECODE &Nat_Code ( 'A' 31000 'B' 31900 'C' 33300 'D' '31000 OR 31900' 'E' '31000 OR 31900 OR 33300' 'F' 32000 'X' 'FOC_NONE' 'FOC_NONE' 'FOC_NONE' ELSE 'X');
-SET &XNat_Code    = IF &Nat_Code EQ 'FOC_NONE' THEN 'X' ELSE &Nat_Code;

-SET &Nat_Descript = DECODE &Nat_Code ( 'A' Sales 'B' Drops 'C' Adj 'D' 'Sales and Drops' 'E' 'Sales, Drops, and Adj' 'F' 'Purchases' 'X' 'FOC_NONE' 'FOC_NONE' 'FOC_NONE' ELSE 'Error');

-SET &MEMBR        = IF &MEMBR NE 'FOC_NONE' THEN STRREP(&MEMBR.LENGTH, &MEMBR, 1, '''', 0, 'X', &MEMBR.LENGTH, '&MEMBR') ELSE 'FOC_NONE';

-SET &XMEMBR       = IF &MEMBR EQ 'FOC_NONE' THEN 'X' ELSE &MEMBR;

-SET &ARS          = IF &ARS EQ 'Y' THEN '' ELSE 'FOC_NONE';
-SET &AFM          = IF &AFM EQ 'Y' THEN '' ELSE 'FOC_NONE';
-SET &ARSTEXT      = IF &ARS NE 'FOC_NONE' THEN 'Only y Stores' ELSE 'FOC_NONE';
-SET &AFMTEXT      = IF &AFM NE 'FOC_NONE' THEN 'Excluding x Stores' ELSE 'FOC_NONE';

-SET &XARS         = IF &ARS EQ 'FOC_NONE' THEN 'X' ELSE &ARS;
-SET &XAFM         = IF &AFM EQ 'FOC_NONE' THEN 'X' ELSE &AFM;

-SET &Division     = IF &DIV EQ 1 THEN 'city 1' ELSE IF &DIV EQ 3 THEN 'city 2' ELSE IF &DIV EQ 6 THEN 'city 3' ELSE 'FOC_NONE';

-GOTO &DTFMT;

-Default
-SET &TRANS_DATE_START = &YESTERDAY;
-SET &TRANS_DATE_END   = &TRANS_DATE_START;

-GOTO Daily2;

-Daily
-SET &TRANS_DATE_START = EDIT(&T_DATE_STR,'99/') | EDIT(&T_DATE_STR,'$$99/') | EDIT(&T_DATE_STR,'$$$$9999');
-SET &TRANS_DATE_END   = EDIT(&T_DATE_END,'99/') | EDIT(&T_DATE_END,'$$99/') | EDIT(&T_DATE_END,'$$$$9999');

-Daily2
-SET &ISWK   = 'N';
-SET &TAB    = 'ACTTRANS';
-SET &B1     = 'ATSTOREDIVNO';
-SET &B2     = 'ATALTSTOREID';
-SET &B3     = 'ATGLNATURALACCT';
-SET &W1     = 'ATRECORDTYPE';
-SET &W2     = 'ATTRANSDATE';
-SET &W3     = 'ATTRANSDATE';
-SET &W4     = 'ATGLDEPTCODE';
-SET &S1     = 'ATSELLAMT';
-SET &S2     = 'ATCOSTAMT';
-SET &S3     = 'ATQUANTITY';

-GOTO StartFex;

-Weekly
-IF &T_DATE_STR2 GT &T_DATE_END2 THEN GOTO WeekErr;

-SET &TRANS_DATE_START = EDIT(&T_DATE_STR2,'$$$$99/') | EDIT(&T_DATE_STR2,'$$$$$$99/') | EDIT(&T_DATE_STR2,'9999');
-SET &TRANS_DATE_END   = EDIT(&T_DATE_END2,'$$$$99/') | EDIT(&T_DATE_END2,'$$$$$$99/') | EDIT(&T_DATE_END2,'9999');

-SET &ISWK   = 'Y';
-SET &TAB    = 'ACTTRANSW';
-SET &B1     = 'ATWSTOREDIVNO';
-SET &B2     = 'ATWALTSTORENO';
-SET &B3     = 'ATWGLNATURALACCT';
-SET &W1     = 'ATWRECORDTYPE';
-SET &W2     = 'ATWBEGDATE';
-SET &W3     = 'ATWENDDATE';
-SET &W4     = 'ATWGLDEPTCODE';
-SET &S1     = 'ATWSELLAMT';
-SET &S2     = 'ATWCOSTAMT';
-SET &S3     = 'ATWQUANTITY';

-StartFex
SET ASNAMES = ON
TABLE FILE &TAB
SUM
     &S1
     &S2
  &S3
BY &B1 AS DIV
BY &B2 AS STR
BY &B3
IF &W1 EQ &Rec_Filter
WHERE &B1 EQ ÷
WHERE &B1 EQ 1 AND &B2 IN (55,57,83,85,86,84,87,94,91,97,98,99,998,101,105,104,102,109,130,147,142,174,176,14) &ARS;
WHERE &B3 EQ &Nat_Filter;
WHERE &W2 GE DT('&TRANS_DATE_START');
WHERE &W3 LE DT('&TRANS_DATE_END');
WHERE &W4 NE 500;
ON TABLE HOLD
END

-RUN

DEFINE FILE HOLD
COST/D14.4=IF &B3 EQ 3330 OR &B3 EQ 3190 THEN 0 ELSE &S2;
SELL/D14.4=IF &B3 EQ 3330 OR &B3 EQ 3190 THEN 0 ELSE &S1;
QTY/D14=IF &B3 EQ 3330 OR &B3 EQ 3190 THEN 0 ELSE &S3;
DRPQTY/D14=IF &B3 EQ 3190 THEN &S3 ELSE 0;
ADJ/D14.4=IF &B3 EQ 3330 THEN -&S2 ELSE 0;
DRPCOST/D14.4=IF &B3 EQ 3190 THEN &S2 ELSE 0;
DRPSELL/D14.4=IF &B3 EQ 3190 THEN &S1 ELSE 0;
Division/A10=DECODE DIV ( 1 'city 1' 3 city2 6 city3 0 'Adj' ELSE 'Bad Code' );
Mbr/A3='Mbr';
END

TABLE FILE HOLD
SUM
  &S2
  &S1
  SELL
  COST
  ADJ
  DRPCOST
  DRPSELL
  QTY
DRPQTY
BY DIV
BY STR
BY Division
BY Mbr
ON TABLE HOLD AS ATHLD FORMAT FOCUS INDEX DIV STR
END

JOIN
 ATHLD.SEG01.DIV AND ATHLD.SEG01.STR IN ATHLD
 TO UNIQUE STORE.STORE.STRDIVNO AND STORE.STORE.STRSTOREID IN STORE AS J0
 END

TABLE FILE ATHLD
SUM
     SELL/P15C AS 'Reg,Sales'
     COST/P15C AS 'CostOf,Sales'
     COMPUTE RegMarginPct/D7.1% = ( (SELL - COST ) / SELL ) * 100; AS 'Reg,Margin'
     DRPSELL/P15C AS 'Drop,Sales'
     DRPCOST/P15C AS 'CostOf,DropSales'
     COMPUTE DropMarginPct/D7.1% = ( (DRPSELL - DRPCOST) / DRPSELL ) * 100; AS 'Drop,Margin'
     ADJ/P15C AS 'Inv,Adj'
     COMPUTE NetMargin/D12 = (SELL + DRPSELL); AS 'Net,Sales'
     COMPUTE MarginPct/D7.1% = ( (SELL + DRPSELL + ADJ - COST - DRPCOST) / &S1 ) * 100; AS 'Net,Margin'
     PCT.&S1/P12.2% AS 'Mix'
  QTY/P15C AS 'InvUnits'
  DRPQTY/P15C AS 'Drop,InvUnits'
BY Mbr AS ''
BY DIV NOPRINT AS 'Division'
BY Division
IF STRMEMBR EQ &MEMBR.(OR()).
WHERE STRMEMBR NE '8' &AFM;
WHERE SELL NE 0 OR COST NE 0 OR DRPSELL NE 0 OR DRPCOST NE 0 OR ADJ NE 0;
HEADING
"Summary"
FOOTING
"&FOCFEXNAME - Ran on <+0>&DATEtMDYY <+0> at: &TOD"
ON TABLE SET PAGE-NUM OFF
ON TABLE SUMMARIZE AS 'Totals'
ON TABLE PCHOLD FORMAT HTML
-* &WFFMT.(<HTML,HTML>,<Excel 2000,EXL2K>).Select type of display output.
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     LEFTMARGIN=0.250000,
     RIGHTMARGIN=0.250000,
     TOPMARGIN=0.250000,
     BOTTOMMARGIN=0.250000,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
     FONT='ARIAL',
     SIZE=9,
     COLOR='BLACK',
     BACKCOLOR='NONE',
     STYLE=NORMAL,
     TITLETEXT='Division',
$
TYPE=DATA,
     SIZE=8,
     BACKCOLOR=( RGB(234 234 255) 'WHITE' ),
$
TYPE=DATA,
     COLUMN=Division,
     FOCEXEC=IBFS:/WFC/Repository/f/d/dsdep.fex(ISWK='&ISWK' MEMBR='&XMEMBR' MEMBR_TEXT='&MEMBR_TEXT' ARS='&XARS' AFM='&XAFM' DIV=DIV Division=Division TRANS_DATE_START='&TRANS_DATE_START' TRANS_DATE_END='&TRANS_DATE_END' WFFMT='HTML' Rec_Code='&XRec_Code' Nat_Code='&XNat_Code'),
$
TYPE=DATA,
     COLUMN=DRPSELL,
     FOCEXEC=IBFS:/WFC/Repository/f/d/dsdrp.fex(MEMBR='&XMEMBR' MEMBR_TEXT='&MEMBR_TEXT' ARS='&XARS' AFM='&XAFM' DIV=DIV Division=Division TRANS_DATE_START='&TRANS_DATE_START' TRANS_DATE_END='&TRANS_DATE_END' WFFMT='HTML' Rec_Code='&XRec_Code'),
     WHEN=Division NE 'Adj',
$
TYPE=DATA,
     COLUMN=ADJ,
     FOCEXEC=IBFS:/WFC/Repository/f/d/dsadj.fex(MEMBR='&XMEMBR' MEMBR_TEXT='&MEMBR_TEXT' ARS='&XARS' AFM='&XAFM' DIV=DIV Division=Division TRANS_DATE_START='&TRANS_DATE_START' TRANS_DATE_END='&TRANS_DATE_END' WFFMT='HTML' Rec_Code='&XRec_Code'),
$
TYPE=DATA,
     COLUMN=Mbr,
     TARGET='_blank',
     FOCEXEC=IBFS:/WFC/Repository/f/d/dsmbr.fex(ISWK='&ISWK' MEMBR='&XMEMBR' MEMBR_TEXT='&MEMBR_TEXT' ARS='&XARS' AFM='&XAFM' DIV=DIV Division=Division TRANS_DATE_START='&TRANS_DATE_START' TRANS_DATE_END='&TRANS_DATE_END' WFFMT='HTML' Rec_Code='&XRec_Code' Nat_Code='&XNat_Code'),
$
TYPE=TITLE,
     BORDER=LIGHT,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
     SIZE=9,
     COLOR='WHITE',
     BACKCOLOR=RGB(147 172 219),
     STYLE=BOLD,
$
TYPE=TABHEADING,
     STYLE=BOLD,
$
TYPE=TABFOOTING,
     STYLE=BOLD,
$
TYPE=HEADING,
     BORDER=LIGHT,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
     SIZE=10,
     COLOR='WHITE',
     BACKCOLOR=RGB(147 172 219),
     JUSTIFY=CENTER,
$
TYPE=HEADING,
     LINE=1,
     SIZE=14,
     STYLE=BOLD,
$
TYPE=FOOTING,
     BORDER=LIGHT,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
     COLOR='WHITE',
     BACKCOLOR=RGB(147 172 219),
     STYLE=BOLD,
$
TYPE=SUBHEAD,
     STYLE=BOLD,
$
TYPE=SUBFOOT,
     BORDER=LIGHT,
     BORDER-STYLE=RIDGE,
     BORDER-COLOR=RGB(51 51 153),
     COLOR='WHITE',
     BACKCOLOR=RGB(147 172 219),
     STYLE=BOLD,
$
TYPE=SUBTOTAL,
     SIZE=8,
     STYLE=BOLD,
$
TYPE=ACROSSVALUE,
     SIZE=8,
     STYLE=BOLD,
$
TYPE=ACROSSTITLE,
     SIZE=8,
     STYLE=BOLD,
$
TYPE=GRANDTOTAL,
     SIZE=9,
     STYLE=BOLD,
$
TYPE=REPORT,
     IMAGE=IBFS:/EDA/EDASERVE/images/logo.gif,
     POSITION=(+0 +0),
$
ENDSTYLE
END

-* Where I am able to place a -EXIT without it crashing...
-EXIT

-SET &ERR = &FOCERRNUM;
-IF &ERR NE 0 GOTO FOCERROR;

-IF &LINES GT 0 THEN GOTO The_End;
EX IBFS:/EDA/EDASERVE/baseapp/message.fex MESSAGE=Your selection criteria failed to select any records.
-GOTO The_End;

-WeekErr
EX IBFS:/EDA/EDASERVE/baseapp/message.fex MESSAGE='Start week must be prior or equal to end week.'
-GOTO The_End;

-FOCERROR
EX IBFS:/EDA/EDASERVE/baseapp/message.fex MESSAGE=An error occurred in &FOCFEXNAME ( &ERR)
-The_End

Any ideas on what could be the issue?

Sometimes, when you post code, you ned to post the result of the execution, which includes the translated Dialogue Manager variables.

IF STRMEMBR EQ &MEMBR.(OR()).
WHERE STRMEMBR NE '8' &AFM;

I don't know what the first statement above means.

I don't know what would happen if &AFM equals FOC_NONE.

quote:

Originally posted by CoolGuy:
Output of the IF and WHERE statements in question:

  
BY Division
 IF STRMEMBR EQ
 WHERE STRMEMBR NE '8' FOC_NONE;
 WHERE SELL NE 0 OR COST NE 0 OR DRPSELL NE 0 OR DRPCOST NE 0 OR ADJ NE 0;

I'm pretty sure that IF statement isn't valid the way it ended up after parsing by DM. What that line was supposed to do was to prompt with a multi-select list of values in autoprompt, or something like that. We use neither IF clauses nor autoprompt hints, so I'm not 100% on that.

The next line contains FOC_NONE, so that line gets ignored.

So I think that the result is:

 IF STRMEMBR EQ WHERE SELL NE 0 OR COST NE 0 OR DRPSELL NE 0 OR DRPCOST NE 0 OR ADJ NE 0;

The parser probably gets as far as IF STRMEMBR EQ WHERE and then trips over the next "statement", SELL: Syntax error. If it would have been able to carry on, the next problem would have been that the field WHERE does not exist.

Thanks Wep5622,

Yeah, I'm not sure what the original coder was trying to do here, but your guesses are probably close to spot on.

Are WHERE statements allowed in an IF statement? Never seen that used that way before.

Just add something to catch the situation where &MEMBR is blank:
After your "-DEFAULT" statements, add
-SET &MEMBR = IF &MEMBR EQ '' THEN 'FOC_NONE' ELSE &MEMBR;

Thanks Jack!

That's what we ended up similarly doing with:

-SET &MEMBR='FOC_NONE';

Once we placed that in there, the report ran without issue. This report relies on a set of filters and params being passed to it. It doesn't operate correctly without certain correct params being passed to it. That was the issue. &MEMBR wasn't getting what it needed. Once we can run the report from the filters html we should be good I believe.

Thanks!