ONE-LINERS for [Web]FOCUS Efficiency

1
ONE-LINERS for WebFOCUS Efficiency
When Printing Handouts USE
Pure Black and White not
Grayscale Otherwise, all of the reverse-color
text will not show up.
ONE-LINERSfor WebFOCUS Efficiency
This block of pictures streams across the screen
repeatedly. Note the move-right Animation effect
(dotted line with arrow on each end).
This box exists only to allow you to access this
outlying region of the screen where the above
movement arrow line is visible when you click on
Custom Animation of the picture at left of
screen.
Joel Starkman Director of Operations, FOCUS
Division Information Builders, Inc. August, 2009
Pre-Music - start it and stop it Click on the
Music (speaker) icon the start the music. The
description text Appears on that click also, as
does the Stop icon. Click on the Stop icon to
stop the music. The stop works by Action Setting
Hyperlinking to the First Slide, which is itself
(very cool). The description text Disappears on
that click also, as does the Stop icon. Click
anywhere else to proceed to the next slide.
2
One-Liners For WebFOCUS Efficiency
CPU TIME
The CPU TIME is actually two halves, oppositely
cropped and re-attached, so that the bottom half
can fall off in time with the scissor reaching
the left side. Under them is a duplicate of the
whole word with no background color it gets
exposed when the bottom half falls off to leave
behind a shadow of the bottom half. Since the
checkmark is used as a theme on every
subsequent slide, it is emphasized here by
shrinking it into the bullets (in time with the
Wiping of the bullet list).

• Perform one extra pre-step in your process, or
• Replace one type of statement with another, or
• Add one line into or before your request, or
• Issue just one additional SET statement, or
• Increase the appropriate default limit value

3
Prove it - How do I see these savings?
OR
-SET STARTCPU FOCCPU TABLE, etc. -RUN -SET
ENDCPU FOCCPU -SET USED(ENDCPU -
STARTCPU) /1000 -TYPE Table used USED CPU
seconds
Capture CPU in-stream
Examine your post-execution operating system
statistics
OR
TABLE, etc. ? STAT
STATISTICS OF LAST COMMAND

RECORDS 0
SEGS DELTD 0 LINES
0 NOMATCH 0
BASEIO 0 DUPLICATES
0 SORTIO 0
FORMAT ERRORS 0 SORT PAGES
0 INVALID CONDTS 0
READS 0 OTHER REJECTS
0 TRANSACTIONS 0
CACHE READS 0 ACCEPTED
0 MERGES 0
SEGS INPUT 0 SORT STRINGS
0 SEGS CHNGD 0
INDEXIO 0

INTERNAL MATRIX CREATED YES AUTOINDEX
USED NO SORT USED FOCUS
AUTOPATH USED NO AGGREGATION BY
EXT.SORT NO HOLD FROM EXTERNAL SORT NO
MODIFY/ MAINTAIN
TABLE/ MATCH
MODIFY/ MAINTAIN
4
Use TABLEF when appropriate
ALL SUBSEQUENT SLIDES The white area (actually a
freeform-line region) at the top of each slide
covers a comedians picture and one-liner -
-needed so they do not appear on handouts. The
white box itself never appears during the
presentation because the first animation on each
slide is to remove it.
I bought some batteries but they werent
included, so I had to buy them again.
F
TABLE FILE CAR SUM DCOST BY COUNTRY BY CAR
ON CAR SUBFOOT END
ALL SUBSEQUENT SLIDES Objects on most slides use
consistent coloration effects. Code samples and
boxes of diagrams usually use the gray Texture.
Informational boxes use either a light blue (or
blue-red) Texture, or a deep blue color either
solid if small or shaded if larger.
Steven Wright
Data already sorted in
the order of the report request? Use TABLEF !!
Sort and Merge data
Generate report
Extract data
ALL SUBSEQUENT SLIDES Most slides attempt to draw
attention to the key item, letter, word, line,
etc. by differentiating its color and/or size,
and/or by animating it. When it is underlined
too, it is totally for the benefit of the handout
which cannot see these effects (except size).
You can still use COMPUTE, SUM and WHERE TOTAL
5
Most of the time, you dont need the Internal
Matrix
"If you live to the age of a hundred you have it
made because very few people die past the age of
a hundred.
George Burns
born Nathan Birnbaum
SET SAVEMATRIX OFF TABLE FILE CAR SUM
DCOST BY COUNTRY END HOLD FORMAT EXL2K
No need to create or preserve the Internal Matrix
Matrix is needed only when result is re-used.
Use SAVEMATRIXON
6
Use an Variable constant instead of DEFINE
I was going to have cosmetic surgery until I
noticed that the doctor's office was full of
portraits by Picasso.
Recalculated for every record
Calculated once for entire report
Rita Rudner
DEFINE FILE CAR INCR/I3 WITH DCOST 5
END TABLE FILE CAR SUM DCOST COMPUTE
NEWCOSTDCOST INCR BY COUNTRY BY CAR END
Instead
-SET INCR 5 TABLE FILE CAR SUM
DCOST COMPUTE NEWCOSTDCOST INCR BY
COUNTRY BY CAR END
7
Dont read the entire Flat File
"My one regret in life is that I am not someone
else.
SET FIXRETRIEVEON TABLE FILE NAMES PRINT NAME
IF NAME LT E END
Allen Beatty Bullock Denver Kidman . . Zappa
Woody Allen
Ten Records
born Allen Stewart Konigsberg
One Million Records
Only for flat files
The flat file is sorted on the screened field
stop searching when you see a larger value.
8
Substitute DEFINE with COMPUTE
"Have you ever noticed that anybody driving
slower than you is an idiot, and anyone going
faster than you is a maniac?
Calculation done for every record extracted
Calculation done only for each SUMed line on the
report
George Carlin
DEFINE FILE CAR INCR/I7 DCOST 5 END TABLE
FILE CAR SUM DCOST INCR BY COUNTRY BY CAR END
TABLE FILE CAR SUM DCOST COMPUTE INCR/I7
DCOST 5 BY COUNTRY BY CAR END
Instead
Careful! You cannot always substitute DEFINE with
COMPUTE.
9
Do the HOLD After the END
Im not going to buy my kids an encyclopedia.
Let them walk to school like I did.
HOLDing the same results in 3 different formats?
TABLE FILE CAR PRINT COUNTRY CAR ON TABLE HOLD AS
HTML END TABLE FILE CAR PRINT COUNTRY CAR ON
TABLE HOLD AS EXL2K END TABLE FILE CAR PRINT
COUNTRY CAR ON TABLE HOLD AS PDF END
Yogi Berra
Instead
born Lawrence Peter Berra
SET SAVEMATRIX ON TABLE FILE CAR PRINT COUNTRY
CAR ON TABLE HOLD AS HTML END HOLD AS EXL2K HOLD
AS PDF
Re-uses internal matrix from first to generate
others
10
Reformat Fields in TABLE instead of DEFINE
The pen is mightier than the sword, and
considerably easier to write with.
DEFINE FILE CAR - DCOST is originally
D12.2 INTCOST/I6 DCOST END TABLE FILE CAR SUM
COST INTCOST BY CAR END
Marty Feldman
Instead
TABLE FILE CAR SUM DCOST DCOST/I6 AS
INTCOST BY CAR END
Hint Invisible field would appear in a HOLD
file. To remove, SET HOLDLISTPRINTONLY
No DEFINE needed. (does create invisible field in
matrix)
11
Flip to Alternate File View to elevate screening
criteria
Beauty may be skin deep, but ugly goes clear to
the bone.
Why follow pointers all the way to the bottom,
just to find that a DCOST does not fit the
criteria?
Redd Foxx
Lots of coordinated transitions on this slide.
The hierarchy rotates 180o and moves right while
the dotted line WIPEs on to follow it, and the
TABLE slides left at the same time. Then the
inverted permanent object appears directly on
top. If I didnt do that, this inverted image
would not appear on the printed handout. The
.DCOST is positioned to appear where it should
be once the TABLE slides left. But on the slide
and hardcopy, it does appear in the wrong
place cant figure an easy way around that.
born John Elroy Sanford
DCOST is NOT indexed
TABLE FILE CAR PRINT MODEL DCOST IF DCOST GE
20000 END
.DCOST
12
Use Indexed File View to elevate screening
criteria
I dont like watching golf on TV. I cant stand
whispering.
Same dot-syntax as alternate view uses index
automatically when present.
Lots of coordinated transitions on this slide.
The hierarchy rotates 180o and moves right while
the dotted line WIPEs on to follow it, and the
TABLE slides left at the same time. Then the
inverted permanent object appears directly on
top. If I didnt do that, this inverted image
would not appear on the printed handout. The
.DCOST is positioned to appear where it should
be once the TABLE slides left. But on the slide
and hardcopy, it does appear in the wrong
place cant figure an easy way around that.
David Brenner
DCOST IS indexed
TABLE FILE CAR PRINT MODEL DCOST IF DCOST GE
20000 END
.DCOST
13
Let your Sort Utility do the work and not just
the sorting!
We spend the first twelve months of our
childrens lives teaching them to walk and talk,
and the next twelve telling them to sit down and
shut up.
FOCUS Sort
Phyllis Diller
born Phyllis Ada Driver
SET EXTSORTON SET EXTAGGRON SET EXTHOLDON
System Sort SYNCSORT DFSORT VMSORT
HOLD File
14
Presort data before MODIFY FIXFORM
Im the kind of guy who will have nothing all my
life and then theyll discover oil while digging
my grave.
E H F G D
If its not ahead of me, I have to start from
the top. - FOCUS
George Gobel
Unsorted
A B C
D E
F G H
I J
P a g e 1
P a g e 2
P a g e 3
P a g e 4
Much faster
Call system sort
MODIFY FILE FIXFORM keyfield MATCH keyfield ON
NOMATCH UPDATE DATA ON
Sort the data file first
15
Extract once to HOLD, then multiple TABLEs
I have six locks on my door. When I go out, I
lock every other one. I figure no matter how
long somebody tries to pick the locks, they are
always locking three.
TABLE FILE HUGE SUM IF REGION EQ
NORTH END TABLE FILE HUGE SUM IF REGION EQ
SOUTH END TABLE FILE HUGE SUM IF REGION EQ
EAST END TABLE FILE HUGE SUM IF REGION EQ
WEST END
HOLD
Elayne Boosler
TABLE FILE HUGE SUM IF REGION EQ NORTH
OR SOUTH OR EAST OR WEST ON TABLE
HOLD END
HOLD
Why extract the entire database four times?
HOLD
Another One-Liner Solution
HOLD
POOLED TABLES
(see next slide)
16
Use POOLED TABLES for multiple TABLEs
Always get married in the morning. That way if
it doesnt work out, you havent wasted the whole
day.
TABLE FILE HUGE SUM IF REGION EQ
NORTH END TABLE FILE HUGE SUM IF REGION EQ
SOUTH END TABLE FILE HUGE SUM IF REGION EQ
EAST END TABLE FILE HUGE SUM IF REGION EQ
WEST END
This slide must follow the previous slide, since
that one has a reference to this slide as see
next slide. I also slowed the Slide Transition
to Medium to ensure the effect of leaving the one
box initially.
Mickey Rooney

• No HOLD file needed
• Extracts from database once
• Feeds all TABLEs at one time
• Output identical to no pooling
• Set ESTLINES/ESTRECORDS for even more
  efficiency

born Joseph Yule, Jr.
Why extract the entire database four times?
Note Pooled Tables is a chargeable feature. SET
POOLFEATUREON in FOCPARM
17
REBUILD without the Index first
"I know a man who is a diamond cutter. He mows
the lawn at Yankee Stadium.
FILE SEGMENT FIELDABC,,I5, FIELDTYPEI
, FIELDDEF,,A12, FIELDGHI,,D12.2, FIELDTYPEI
, FIELDJKL,,F5,
Henny Youngman
S T E P S

1. Remove indexes and save as alternate master
2. REBUILD REBUILD with no-index master
3. Put back original master with indexes
4. REBUILD INDEX

18
Eliminate 1000s of REBUILD messages
I set records that will never be equaled. In
fact, I hope 90 of them dont ever get printed.
SET REBUILDMSG 100000 REBUILD REORG DUMP or
LOAD
Bob Uecker
(Default is 1000)
CAR FOCUS A1 ON 09/23/2005 AT 16.19.05
REFERENCE...AT TRANS
100000
REFERENCE...AT TRANS 200000
REFERENCE...AT TRANS
300000
TRANSACTIONS TOTAL 302000
ACCEPTED302000 REJECTED 0 SEGMENTS
INPUT 302000 UPDATED 0 DELETED
0
19
Reduce MODIFY update notices
I found the secret to the work week. Ive
convinced myself that everything after Monday is
almost Friday.
Joel Starkman
MODIFY FILE CAR FIXFORM MATCH field ON MATCH
REJECT ON NOMATCH INCLUDE DATA ON file CHECK
99999 END
Default write to database every 1000 records
(1 for CRTFORM)
Hey! Whos this guy?
Or just CHECK OFF
HintMidstream recovery? Use START
TRANS
20
JOIN in the faster direction
I find television very educating. Every time
somebody turns on the set, I go into the other
room and read a book.
Diego Alcazar Operator Lorenzo
Alcazar President Nicolas Cassadine Vice
President Carly Corinthos Operator Michael
Corinthos, III Operator Sonny Corinthos President
Alexis Davis Technical Noah Drake Manager Patric
k Drake Operator Jasper "Jax" Jacks President Geo
rgie/Maxie Jones Operators Ric Lansing Technical
Reese Marshall Operator Samantha
McCall Operator Jason Morgan Technical Dillon
Quartermaine Technical Edward Quartermaine Manager
Tracy Quartermaine Operator Skye
Quartermaine Secretary Emily Quartermaine Manager
Dr. Alan Quartermaine Vice President Dr. Monica
Quartermaine Technical Malcolm Mac
Scorpio Manager Robert Scorpio Technical Dr.
Robin Scorpio Technical Bobbie Spencer Secretary E
lizabeth Spenser Secretary Lucky/Lulu
Spencer Operators Luke Spencer President Lainey
Winters Technical
Manager A1 Operator C2 President C2 Secretary B3 T
echnical C2 Vice Pres A1
TABLE FILE ???? PRINT NAME WHERE BLDG IS C2
END
JOB File
JOB
Groucho Marx
born Julius Henry Marx
G H File
JOIN POS IN GH TO POS IN JOB
On this slide only, the check Spirals In instead
of Faded Zoom and is not last to appear.
JOIN POS IN JOB TO POS IN GH
FILEJOB SEGMENTJOB1, FIELDPOS, ,
INDEXI, FIELDBLDG,
FILEGH SEGMENTGH1, FIELDNAME, FIELDPOS,
INDEXI,
21
Build your own External Index when you dont
have write access to the file
Zsa Zsa Gabor got married as a one-off, and it
was so successful she turned it into a series.
- AHP F - - - - - - - - -
- FGJH J IDSA E JSDQR W LFS Z - - - -
- - - - - - - ZWIO H
gtgt rebuild ENTER OPTION External index NEW OR ADD
TO EXISTING? . . .
A A A C D D E F H H H J . . . . U W X Y Z Z
E X T E R N A L I N D E X
Bob Hope
Arrows are drawn With Previous at 0.1 sec delay
sequentially.
Non-writeable file, no index
born Leslie Towne Hope
External Index is static must rebuild if file
changes.
Build your own index
One Million Records
USE mastername extindexname INDEX mastername
END TABLE FILE filename
.indexfield
22
Index Your HOLD File
Im this centurys Dennis The Menace.
HOLD extracts might be used more efficiently if
you could index important search fields for
subsequent reports.
Bart Simpson
born Bartholomew Jo-Jo Simpson

• TABLE FILE
• PRINT CITY TITLE
• BY EMPL_NO
• ON TABLE HOLD
• END
• TABLE FILE HOLD
• COUNT EMPL_NO BY TITLE IF CITY EQ ORLANDO
• END

Sequential file sorted by EMPL_NO
FORMAT FOCUS INDEX CITY
23
JOIN WHERE - when two files have nothing in
common!
With kids, the days are long, but the years are
short.
Which employees can afford to buy a BMW?
JOIN FILE CAR AT RETAIL_COST TO ALL
FILE EMPLOYEE AT CURR_SAL AS CAREMP WHERE
CURRSAL GT (RETAIL_COST 3) END TABLE FILE
CAR PRINT FIRSTNAME LASTNAME BY CAR IF CAR EQ
BMW' END
JOIN files on any fields without indexes
John Leguizamo
Interpretation You have to earn at least 90,000
to afford a car of 30,000. Example only not the
opinion of the presenter or Information Builders
CAR FIRSTNAME LASTNAME ----- ---------
-------- BMW JOHN BANNING
JOAN IRVING BARBARA CROSS
24
BY TOTAL Sort by computed columns in one pass
When I see the Ten Most Wanted Lists, I always
have this thought If wed made them feel wanted
earlier, they wouldnt be wanted now.
Sort by Average Sales COUNTRY CAR AVE SALES
SALES ENGLAND JENSEN 17650 73000
TRIUMPH 24200 122000 JAPAN HONDA
17480 235000 TOYOTA 18250
197300
Eddie Cantor
born Edward Israel Iskowitz
No HOLD !
TABLE FILE CAR SUM SALES AVE.SALES BY COUNTRY
BY CAR ON TABLE HOLD END TABLE FILE HOLD SUM E03
BY COUNTRY BY CAR BY E04 AS Ave Sales END

• TABLE FILE CAR
• SUM SALES
• BY COUNTRY BY CAR
• BY TOTAL AVE.SALES
• END

BY AVE.SALES
Invented numbers
25
Test Higher-Hit Fields First
If your ship doesnt come in, swim out to it.
DEFINE FILE ... EXCHANGE/A3
EDIT(PHONE,'999') FLAG/A1 IF (SALARY
BENEFITS GT 50000) AND (EXCHANGE EQ '736)
THEN 'Y' ELSE 'N' END
Jonathan Winters
Do real fields first, or those most likely to
eliminate records
Calculated first for every record -- and often
false
TABLE FILE ... PRINT ... IF LASTNAME EQ M'
IF EXCHANGE EQ '736' WHERE FLAG EQ 'Y END
TABLE FILE ... PRINT ... WHERE FLAG EQ 'Y IF
EXCHANGE EQ '736 IF LASTNAME EQ M' END
Complicated calc done only when all other
criteria pass
Technique applies to fields on the same level.
Higher level screens are always done first,
regardless of the order coded.
26
Do String Manipulation Inside the TABLE When
Possible
????.
means any one character means all remaining
chars
This slide is a continuation of the previous
slide, supposed to look like were still on the
same slide where it just clears everything but
the right box initially. I also slowed the Wipe
Transition to this slide to Medium for better
effect.
Marcel Marceau
DEFINE FILE ... LASTNAME2/A1
EDIT(LASTNAME,9) END TABLE FILE ... PRINT
... IF LASTNAME2 EQ M' IF EXCHANGE EQ '736'
IF FLAG EQ 'Y END
born Marcel Mangel
TABLE FILE ... PRINT ... IF LASTNAME EQ M'
IF EXCHANGE EQ '736' IF FLAG EQ 'Y END
By the way,
27
Replace Compound-IF in DEFINE with WHERE
When I was born my father spent three weeks
trying to find a loophole in my birth
certificate.
DEFINE FILE ... TESTFIELD/A1 IF (F1 EQ
ABC) OR (F2 GE 27) THEN Y ELSE N END
TABLE FILE ... IF TESTFIELD EQ Y' END
Jackie Vernon
Instead
TABLE FILE ... WHERE (F1 EQ ABC) OR (F2 GE 27)
END
Must use WHERE, not IF, in this compound situation
28
Avoid reparsing Masters over and over again
Its no longer a question of staying healthy.
Its a question of finding a sickness you like.
Store up to 99 parsed masters in memory, so no
reparsing
SET SAVEDMASTERS 99 TABLE FILE CAR PRINT
END TABLE FILE CAR TABLE FILE EMPLOYEE
TABLE FILE CAR TABLE FILE SALES TABLE FILE
EMPLOYEE
Jackie Mason
born Jacob Maza
Never reparses on consecutive use

• Without the SET, would -- dump CAR
  master,
• - parse EMPLOYEE,
• - reparse CAR again
• - parse SALES .

29
Split a field into pieces for instantaneous
searches
Fame comes with its own standards. A guy who
twitches his lips is just another guy with a lip
twitch unless hes Humphrey Bogart.
SSN 123-45-6789
SSN1TO3
QUESTION How many pages would I have to search to
find the last of 999,999,999 SSN combinations?
Sammy Davis Jr.
SSN
5Mil pages
I could index SSN, but an index wont help on
partial searches
SSN4TO5
DATA
SSN6TO9
Store full SSN here too

• Social Security Numbers
• Phone Numbers
• Credit Card Numbers
• Hottrack Numbers (we do!)

DATA
30
Build an alternate master with large alphas
when you need only a few fields out of hundreds
When you go into court you are putting your fate
into the hands of twelve people who werent smart
enough to get out of jury duty.
FILELOTSOF SEGMENTONE FIELDABC,,A10
FIELDDEF,,I9 FIELDGHI,,F4.1
FIELDJKL,,D12.2 FIELDMNO,,A5
FILELOTSOF SEGMENTONE FIELDABC,,A10
FIELDDEF,,I9 FIELDLAST3,,A17
Norm Crosby
Make sure you count the bytes properly
!
SEGMENTTWO FIELDPQR,,I9
FIELDSTU,,F4.1 FIELDVWX,,D12.2
FIELDYZA,,A5 FIELDPQR,,I9
FIELDSTU,,F4.1 FIELDVWX,,D12.2
FIELDYZA,,A5 FIELDPQR,,I9
FIELDSTU,,F4.1 FIELDVWX,,D12.2
FIELDYZA,,A5
SEGMENTTWO FIELDALLONE,,A65
. . .
TABLE FILE SUM ABC BY DEF END
. . .
31
Display the number of the last page (Finally!)
A girl phoned me the other day and said Come on
over, theres nobody home. I went over.
Nobody was home.
TABLE FILE CAR HEADING
"PAGE ltTABPAGENO OF ltTABLASTPAGE lt/1" SUM DCOST
BY COUNTRY PAGE-BREAK ON TABLE HOLD FORMAT
HTML ON TABLE SET STYLE
TYPEREPORT,FONTARIAL,
ENDSTYLE END
Rodney Dangerfield
born Jacob Cohen
Page 4 of 4
Page 3 of 4
Page 2 of 4
Page 1 of 4 REPORT

Notes FOCNEXTPAGE is set to TABLASTPAGE
Supported for FORMAT HTML/PDF/PS only
32
EDIT is faster than comparable subroutines
The guy who invented the first wheel was an
idiot. The guy who invented the other three he
was a genius.
Extract the exchange
DEFINE/COMPUTE PHONE/A12 123-567-9012
EXCH/A3 EDIT (PHONE, 999)
EXCH/A3 SUBSTR (12, PHONE, 5, 7, 3,
EXCH) EXCH/A3 GETTOK (PHONE, 12, 2,
-, 3, EXCH)
Sid Caesar
born Isaac Sidney Caesar
EDIT does not apply to all situations of partial
extractions
33
Minimize test-run time during development
"I think I did pretty well, considering I started
out with nothing but a bunch of blank paper.

• Stop retrieval after the nth satisfying record
• Generally for Developers to quick-test code
• Easy to turn on and off ignored in Production

Steve Martin

• -DEFAULT 1
• -SET IFRECORDLIMIT IF 1 NE TEST THEN
• - ELSE IF RECORDLIMIT EQ 1
• TABLE FILE
• PRINT
• BY
• IFRECORDLIMIT
• END

EX focexecname TEST
Parameter 1 of call
Hint Use global Set once for entire
application.
IFRECORDLIMIT is NOT a reserved variable could
be any name.
34
Pre-LOAD Your Application into Memory
When I adlib something, I laugh for the same
reason the audience does Ive never heard that
joke before and Im just as surprised as they
are.
LOAD FOCEXEC fex_name1 fex_name2 LOAD FOCCOMP
compiled_modify_name EX RUN
Steve Allen
Then,
LOAD Masters and Access Files too
Uses the image now in memory
? LOAD filetype UNLOAD filetype
filename1 filename2
35
Use REPEAT instead of IF loop
Randolph Duke Mother always said you were
greedy. Mortimer Duke She meant it as a
complement. Trading Places
-SET CNT 0 -LOOPTOP -SET CNT CNT 1
TABLE, MODIFY, etc. PRINT FIELDCNT -IF CNT
LE 10 GOTO LOOPTOP -AFTERLOOP
Ralph Don Bellamy Ameche
Dialog Manager dashes are Arial Black instead of
TNR to make them stand out.
Instead
-REPEAT LOOP FOR CNT FROM 1 TO 10 TABLE, MODIFY,
etc. PRINT FIELDCNT -LOOP
Easier to code than
increment/check. Can decrement. Can be negative.
Other options -REPEAT label n TIMES -REPEAT
label WHILE condition
36
Capture FOCUS Commands and Statistics with FOCLOG
As a child my familys menu consisted of two
choices take it or leave it.
F
ind applications and focexecs that could
significantly benefit from adjustment,
consolidation, redesign. versee how much FOCUS is
being used at your site.
O
Buddy Hackett
born Leonard Hacker
C
hart interactive activity versus batch activity
across all LPARs. ocate excessive or misguided
use by measuring CPU, paper output, extract
files, session length, frequency, repetition,
.... bserve how data is used by identifying the
most popular extract destinations via HOLD (like
HTML, Excel 2000, PDF). raph patterns and trends
of usage across any time period.
L
O
G
FOCLOG is a chargeable product. See your local
IBI Representative.
37

One-Liners for WebFOCUS Efficiency
"I'd rather be a could-be if I cannot be an are
because a could-be is a maybe who is reaching
for a star. I'd rather be a has-been than a
might-have-been, by far for a might-have-been
has never been, but a has was once
an are."
Milton Berle
born Milton Berlinger
I leave you with this gem
I left the Thank You box to an On Click
animation, intending that you will read this one
to the audience in a storybook tone, press Enter,
and roll into a Thank You. If you practice
it, the effect is cool. If you dont want to,
then change the last animation to After
Previous, or just be ready to press Enter.
38
(No Transcript)
39
Presentation Information

• Author Joel Starkman
• Company Information Builders
• Presentation Title One-Liners for WebFOCUS
  Efficiency
• Presentation Abstract Does your FOCUS job take
  hours to run, or absorb inordinate amounts of
  system resources, or barely fit into your nightly
  production window? This session presents over
  three dozen techniques, each virtually a minor
  one-line change to your focexec, that target
  hidden inefficiencies in your code. With a little
  help from history's greatest one-liner comedians,
  if even one tip helps you gain tremendous
  savings, it's worth attending this session.

40
One-Liners For WebFOCUS Efficiency
This slide requires speakers.
The video clip on this slide (sitting behind the
countdown box) must reside on the C drive at
that level, not in a sub-directory.
WARNING This slide has a transition to the next
slide after 11 seconds, specifically timed to
play only the first of Rodneys one-liners. The
rest is not appropriate. Even if this slide is
inserted into another presentation, the timer
goes with it (though not via cut-n-paste). Do not
remove or change the slide transition timing!
41
One-Liners For WebFOCUS Efficiency
This slide requires speakers. The volume
captured on this slide is much lower than the
previous slide adjust upward by hand during the
presentation. No sound requirements after this
slide.
The video clip on this slide must reside on the
C drive at that level, not in a sub-directory.
42
One-Liners For WebFOCUS Efficiency
One-Liners For (Web) FOCUS Efficiency