IBI WebFOCUS - code for Looping concepts

Using Loops with WebFOCUS Code:
In our day to day reporting world in WebFOCUS, we might come across the need to use Looping concept to run some piece of WebFOCUS code for a number of times. I have documented the Solution and codes so that it can help all of us if similar requirement is there.

Problem description:
In Launch Page we have Location selection(drop down). Display field is Location Description and Value field is Location Number. Now when we selection few locations from launch page, location numbers are passed to the report. In this case if we need to display all location selected as header, how can we proceed?

Solution:
We need to pull it from Location Dimension table which has location name and location number as available columns. We can pull location names filtering on selected location numbers and save in a save file. Now we need to read location Name again and again and append it into a variable. Let's take an example of CAR file as given below:

-* File test_tricks.fex
-SET &ECHO=ALL;
TABLE FILE CAR
PRINT CAR
ON TABLE SAVE AS SAVE_CAR
END
-RUN
-SET &FIRST_TIME='Y';
-**********************Variable to hold the appended all Car Names
-SET &HEADER_CAR = '';
-SET &NO_RECS = &RECORDS;

-*************************STARTING THE LOOP FOR NO OF RECORDS TIMES
-REPEAT CAR_HEAD &NO_RECS TIMES
-READ SAVE_CAR &CAR_NAME1.A16
-SET &CAR_NAME = TRUNCATE(&CAR_NAME1);

-TYPE &CAR_NAME
-SET &HEADER_CAR = IF &FIRST_TIME EQ 'Y' THEN &CAR_NAME ELSE &HEADER_CAR||(', '|&CAR_NAME);
-*NAME_COM/A20=LAST_TOKEN || (' '|FIRST_INIT);
-SET &FIRST_TIME='N';
-CAR_HEAD
-TYPE (Final Header Variable)..........&HEADER_CAR
-EXIT
-****************Code ends here************************************************************************************************

So after executing the above piece of code, &HEADER_CAR will have list of all Cars from CAR file. The variable can be used anywhere in the file.

While and For loop can also be used if we don't know the no of times the code should get executed.

 
-REPEAT label WHILE condition;
or
-REPEAT label FOR &variable [FROM fromval] [TO toval] [STEP s]

 Any questions/Suggestions are welcome.

Comments

Post a Comment

Popular posts from this blog

IBI WebFOCUS - Functions available and syntax to use

Using Functions Functions operate on one or more arguments and return a single value. The returned value can be stored in a field, assigned to a Dialogue Manager variable, used in a calculation or other processing, or used in a selection or validation test. Functions provide a convenient way to perform certain calculations and manipulations. There are two types of functions: Internal functions. Built into the WebFOCUS language, requiring no extra work to access or use. The following reporting and Maintain functions are internal functions. You can not replace any of these internal functions with your own functions of the same name. All other functions are external. ABS ASIS DMY, MDY, and YMD DECODE EDIT FIND LAST LOG LOOKUP MAX and MIN SQRT All Maintain-specific functions External functions. Stored in an external library that must be accessed. When invoking these functions, an argument specifying the output fie
Read more

IBI WebFOCUS - Difference (Preference) between Join and Match:

For most of the reports in our WebFOCUS reporting world, we usually pull data from multiple tables and and generate the report. We all know that we can either Join Data Sources(JOIN) or Merge Data Sources(MATCH) to create report from multiple tables. Which one to choose from JOIN and MATCH? Now the question is what is the diffrence between the two and which one to choose from the 2 option. To explain this let's understand how does they process. JOIN: Basically JOIN is temporary, virtual connection between 2 or more physical or logical sources. Data in the first data source (host file) determines which records are retrieved from cross-reference file. When a record from the host file of a one-to-many join has no corresponding record(s) in the cross-reference file, the record is automatically excluded from the report output.  To control this, you can SET ALL to ON, in which case records from the host file, without corresponding records in the cross-reference file, will be disp
Read more

IBI WebFOCUS - Testing and Debugging in WebFOCUS codes

You can debug a Web FOCUS application by querying your environment to display information such as file status, release, server information, and joins, as well as by identifying files you are using. Other debugging methods are available in Web FOCUS, including specialized Dialogue Manager Variables and traces performed from the Web Console. Debugging Your Application with Query Commands You can use query commands to display information about your metadata, data sources, language environment, Developer Studio, and Web FOCUS. This is useful for determining any aspects of your application that may be preventing the proper behavior of your application. You can query your environment with a query command executed in Developer Studio or Web FOCUS. The result of a query command is returned in your browser window or as a comment in the HTML file. Use the applicable Web browser functions to view the HTML comments (for example, View Source in Microsoft Internet Explorer). How to Issue
Read more