I'm getting an error for a conditional statement I'm using, and I don't udderstand why webfocus is having problem with it. Here's my code:

COMPUTE DIVISIONCODE1/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$$9');

COMPUTE DIVISIONCODE2/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$9$');
PAYROLLORGANIZATIONCODE
L2NAME
POSITIONNAME
LUPOSITIONTYPEID
DISTRIBUTIONPERCENT
EXPANSIONOPTIONFULL
OCCUPANTNAME
GRANTNUMBER
CATEGORYCODENAME
WHERE L2NAME EQ '&DIVISIONNAME.().DIVISIONNAME.';
-IF &DIVISIONNAME EQ '5201'
WHERE PAYROLLORGANIZATIONCODE EQ DIVISIONCODE1;
-ELSE
WHERE PAYROLLORGANIZATIONCODE EQ DIVISIONCODE2;


Any help would be greatly appreciated .

Robab

I suppose you have left out some part of the program and this is a FEX that starts with TABLE FILE xxx

You are mixing DM commands (starting with - ) with TABLE commands.

As Frank says, you are mixing DM with core FOCUS. Check out the various posts that have already dealt with the differences between these two "languages".

Then you might understand why you need to do this -

COMPUTE DIVISIONCODE1/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$$9');

COMPUTE DIVISIONCODE2/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$9$');
PAYROLLORGANIZATIONCODE
L2NAME
POSITIONNAME
LUPOSITIONTYPEID
DISTRIBUTIONPERCENT
EXPANSIONOPTIONFULL
OCCUPANTNAME
GRANTNUMBER
CATEGORYCODENAME
WHERE L2NAME EQ '&DIVISIONNAME.().DIVISIONNAME.'
-SET &Div_Column = IF &DIVISIONNAME EQ '5201' THEN 'DIVISIONCODE1' ELSE 'DIVISIONCODE2';
WHERE PAYROLLORGANIZATIONCODE EQ &Div_Column

T

Hi Frank,

Thank you for responding.
What I'm trying to accomplish here is to filter my data based on the value of L2Name column. I am using a launch page that uses a drop down box generated with the L2Name, and once I capture that I want to filter the data based on it. Now I'm thinking may be I can use a procedure just to generate a combo box with L2Name and another procedures that checks for the value of L2Name(and I don't know how to refer to a variable in another procedure) and execute a different focexec based on the value of L2Name. I have a deadline to meet by the end of today. The idea seems to be easy, I just don't know how to make it work in Webfocus!!
Any advice?

What if you change:

-IF &DIVISIONNAME EQ '5201'
WHERE PAYROLLORGANIZATIONCODE EQ DIVISIONCODE1;
-ELSE
WHERE PAYROLLORGANIZATIONCODE EQ DIVISIONCODE2;

to:

]-IF &DIVISIONNAME EQ '5201' GOTO TEST1;
-GOTO TEST2
-TEST1
WHERE PAYROLLORGANIZATIONCODE EQ DIVISIONCODE1;
-GOTO CONT1
-TEST2
WHERE PAYROLLORGANIZATIONCODE EQ DIVISIONCODE2;
-GOTO CONT1
-CONT1

Oops!

The ] should be removed from the beginning of my code.

Sorry.

Tony, I took your suggestion. I modified my code to:

TABLE FILE spdisplaypositiondistributiontwo
PRINT
COMPUTE DIVISIONCODE1/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$$9');NOPRINT

COMPUTE DIVISIONCODE2/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$9$');NOPRINT
PAYROLLORGANIZATIONCODE
L2NAME
POSITIONNAME
LUPOSITIONTYPEID
DISTRIBUTIONPERCENT
EXPANSIONOPTIONFULL
OCCUPANTNAME
GRANTNUMBER
CATEGORYCODENAME
WHERE L2NAME EQ '&DIVISIONNAME.DIVISIONNAME.'
-SET &Div_Column = IF &DIVISIONNAME EQ '5201' THEN 'DIVISIONCODE1' ELSE 'DIVISIONCODE2';
WHERE PAYROLLORGANIZATIONCODE EQ &Div_Column


Now I'm getting this error:

COMPUTED FIELDS CAN ONLY BE REFERENCED IN A WHERE TOTAL
(FOC009) INCOMPLETE REQUEST STATEMENT
BYPASSING TO END OF COMMAND

This is what I ended up using and it worked( I had to use define instead of edit:

-DEFAULT &DIVISIONNAME = FOC_NONE;
-* File DisplayPositionDivisionAllReport.fex
DEFINE FILE spdisplaypositiondistributiontwo
-*DIVISIONCODE1/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$$9');
-*DIVISIONCODE2/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$9$');

PAY_ORG_CODE/A4 = IF L2NAME EQ '5201' THEN
EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$$9') ELSE
EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$9$');
END
TABLE FILE SPDISPLAYPOSITIONDISTRIBUTIONTWO
-*COMPUTE DIVISIONCODE1/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$$9');
-*COMPUTE DIVISIONCODE2/A4 = EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$9$');
-*-SET &Div_Column = IF &DIVISIONNAME EQ '5201' THEN 'DIVISIONCODE1' ELSE 'DIVISIONCODE2';
-*WHERE PAYROLLORGANIZATIONCODE EQ '&Div_Column.EVAL';
-*WHERE PAYROLLORGANIZATIONCODE EQ DIV_COLUMN;
PRINT
PAY_ORG_CODE AS 'Payroll Organization Code'
L2NAME NOPRINT
POSITIONNAME
LUPOSITIONTYPEID NOPRINT
DISTRIBUTIONPERCENT AS 'Distribution Percent'
EXPANSIONOPTIONFULL AS 'Expansion Option'
OCCUPANTNAME AS 'Occupant Name'
GRANTNUMBER AS 'Grant Number'
CATEGORYCODENAME AS 'Category Code Name'
WHERE L2NAME EQ '&DIVISIONNAME';

quote:

PAY_ORG_CODE/A4 = IF L2NAME EQ '5201' THEN
EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$$9') ELSE
EDIT(L2NAME, '99$$') || EDIT(L2NAME, '$$9$');

Unless I'm missing something, couldn't you simplify your EDIT to:

 PAY_ORG_CODE/A4 = IF L2NAME EQ '5201' THEN
EDIT(L2NAME, '99$9') ELSE EDIT(L2NAME, '999$');
 

Robab,
There are multiple ways you could handle this, with and without using DM code. If this works for you, great job.

One thing I noticed is that you've gone from two WHERE statements in you first fex (L2NAME and PAYROLLORGANIZATIONCODE) to only one in your last post (for L2NAME). You would get different results, but maybe that was intended because you've also changed the values of the output column (PAY_ORG_CODE)?

Hi Darin,

Thank you for responding, and yes I was going to eventually use one output column based on the selected value from L2Name.