Stop blank screen when no more records to display
David Morrison - Corporate
dmorrison@mcbrideelectric.com
Mon, 9 Jun 2003 14:54:51 -0700
This is a multi-part message in MIME format.
------_=_NextPart_001_01C32ED1.C0B473BE
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Oh, thanks Conrad. Bummer about that; we've been using HOLD FIND on all =
of our panel screens, since we found out how handy it is.
=20
David Morrison
McBride Electric
=20
-----Original Message-----
From: Whittall, Conrad [mailto:Conrad.Whittall@Cognos.COM]
Sent: Monday, June 09, 2003 2:52 PM
To: powerh-l@lists.swau.edu
Cc: David Morrison - Corporate; brett@kinetix.co.nz
Subject: RE: Stop blank screen when no more records to display
=20
I'm afraid the HOLD FIND option of the SCREEN statement is a unique (and =
very useful) feature only found in the OS/400 versions of PowerHouse. =
Apparently it was very easy to implement on OS/400 due to the way that =
the file intrinsics work on that platform.
=20
As Allen points out in his message, the behaviour seen is the standard =
PowerHouse behaviour for all other platforms and would be pretty tricky =
to modify.
=20
Best regards,
Conrad=20
=20
-----Original Message-----
From: David Morrison - Corporate [mailto:dmorrison@mcbrideelectric.com]
Sent: 9 June 2003 11:20
To: brett@kinetix.co.nz; powerh-l@lists.swau.edu
Subject: RE: Stop blank screen when no more records to display
Are you using HOLD FIND in the screen statement? If not, try that.
=20
David Morrison
McBride Electric
=20
-----Original Message-----
From: Brett Greiner [mailto:brett@kinetix.co.nz]
Sent: Sunday, June 08, 2003 4:39 PM
To: powerh-l@lists.swau.edu
Subject: Stop blank screen when no more records to display
=20
=20
We are trying to stop the blank screen appearing when the number of =
records in the file matches the number of items on the screen (ie. There =
are no spare Powerhouse ids on the screen). The blank screen happens =
when the User presses the <Enter> key.
But, if you have say 12 records in the file and have 13 powerhouse ids =
on the screen, pressing the <Enter> key displays the 12 records.
=20
Does anybody know or has done this technique before?
=20
We are using version; AIX PowerHouse 8.13.D2.
=20
Cheers,
Brett.
=20
=20
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.488 / Virus Database: 287 - Release Date: 05-Jun-03
_________________________________________________=20
Scanned for viruses on 09 Jun 2003 00:05:56=20
No viruses found.=20
Virus scanning by http://erado.com
This message may contain privileged and/or confidential information. If =
you have received this e-mail in error or are not the intended =
recipient, you may not use, copy, disseminate or distribute it; do not =
open any attachments, delete it immediately from your system and notify =
the sender promptly by e-mail that you have done so. Thank you.
_________________________________________________=20
Scanned for viruses on 09 Jun 2003 21:51:24=20
No viruses found.=20
Virus scanning by http://erado.com
------_=_NextPart_001_01C32ED1.C0B473BE
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html xmlns:o=3D"urn:schemas-microsoft-com:office:office" =
xmlns:w=3D"urn:schemas-microsoft-com:office:word" =
xmlns=3D"http://www.w3.org/TR/REC-html40">
<head>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Diso-8859-1">
<meta name=3DProgId content=3DWord.Document>
<meta name=3DGenerator content=3D"Microsoft Word 9">
<meta name=3DOriginator content=3D"Microsoft Word 9">
<link rel=3DFile-List href=3D"cid:filelist.xml@01C32E97.146CCD40">
<!--[if gte mso 9]><xml>
<o:OfficeDocumentSettings>
<o:DoNotRelyOnCSS/>
</o:OfficeDocumentSettings>
</xml><![endif]--><!--[if gte mso 9]><xml>
<w:WordDocument>
<w:Zoom>0</w:Zoom>
<w:DocumentKind>DocumentEmail</w:DocumentKind>
<w:EnvelopeVis/>
</w:WordDocument>
</xml><![endif]-->
<style>
<!--
/* Font Definitions */
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;
mso-font-charset:0;
mso-generic-font-family:swiss;
mso-font-pitch:variable;
mso-font-signature:1627421319 -2147483648 8 0 66047 0;}
@font-face
{font-family:Verdana;
panose-1:2 11 6 4 3 5 4 4 2 4;
mso-font-charset:0;
mso-generic-font-family:swiss;
mso-font-pitch:variable;
mso-font-signature:536871559 0 0 0 415 0;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{mso-style-parent:"";
margin:0in;
margin-bottom:.0001pt;
mso-pagination:widow-orphan;
font-size:12.0pt;
font-family:"Times New Roman";
mso-fareast-font-family:"Times New Roman";}
a:link, span.MsoHyperlink
{color:blue;
text-decoration:underline;
text-underline:single;}
a:visited, span.MsoHyperlinkFollowed
{color:blue;
text-decoration:underline;
text-underline:single;}
p.MsoAutoSig, li.MsoAutoSig, div.MsoAutoSig
{margin:0in;
margin-bottom:.0001pt;
mso-pagination:widow-orphan;
font-size:12.0pt;
font-family:"Times New Roman";
mso-fareast-font-family:"Times New Roman";}
p
{margin-right:0in;
mso-margin-top-alt:auto;
mso-margin-bottom-alt:auto;
margin-left:0in;
mso-pagination:widow-orphan;
font-size:12.0pt;
font-family:"Times New Roman";
mso-fareast-font-family:"Times New Roman";}
span.EmailStyle16
{mso-style-type:personal;
mso-ansi-font-size:10.0pt;
mso-ascii-font-family:Arial;
mso-hansi-font-family:Arial;
mso-bidi-font-family:Arial;
color:navy;}
span.EmailStyle20
{mso-style-type:personal-reply;
mso-ansi-font-size:10.0pt;
mso-ascii-font-family:Arial;
mso-hansi-font-family:Arial;
mso-bidi-font-family:Arial;
color:#993366;}
@page Section1
{size:8.5in 11.0in;
margin:1.0in 1.25in 1.0in 1.25in;
mso-header-margin:.5in;
mso-footer-margin:.5in;
mso-paper-source:0;}
div.Section1
{page:Section1;}
-->
</style>
</head>
<body lang=3DEN-US link=3Dblue vlink=3Dblue style=3D'tab-interval:.5in'>
<div class=3DSection1>
<p class=3DMsoNormal><span class=3DEmailStyle20><font size=3D2 =
color=3D"#993366"
face=3DArial><span =
style=3D'font-size:10.0pt;mso-bidi-font-size:12.0pt;font-family:
Arial'>Oh, thanks Conrad.<span style=3D"mso-spacerun: yes"> =
</span>Bummer
about that; we’ve been using HOLD FIND on all of our panel =
screens, since we
found out how handy it is.<o:p></o:p></span></font></span></p>
<p class=3DMsoNormal><span class=3DEmailStyle20><font size=3D2 =
color=3D"#993366"
face=3DArial><span =
style=3D'font-size:10.0pt;mso-bidi-font-size:12.0pt;font-family:
Arial'><![if =
!supportEmptyParas]> <![endif]><o:p></o:p></span></font></span></p>
<p class=3DMsoAutoSig><!--[if supportFields]><span =
class=3DEmailStyle20><font=20
size=3D2 color=3D"#993366" face=3DArial><span =
style=3D'font-size:10.0pt;mso-bidi-font-size:
12.0pt;font-family:Arial'><span =
style=3D'mso-element:field-begin'></span><span=20
style=3D"mso-spacerun: yes"> </span>AUTOTEXTLIST \s "E-mail=20
Signature" <span =
style=3D'mso-element:field-separator'></span></span></font></span><![endi=
f]--><font
color=3D"#993366"><span style=3D'color:#993366'>David =
Morrison</span></font><font
color=3D"#993366"><span =
style=3D'color:#993366;mso-color-alt:windowtext'><o:p></o:p></span></font=
></p>
<p class=3DMsoAutoSig><font size=3D3 color=3D"#993366" face=3D"Times New =
Roman"><span
style=3D'font-size:12.0pt;color:#993366'>McBride =
Electric</span></font><font
color=3D"#993366"><span =
style=3D'color:#993366;mso-color-alt:windowtext'><o:p></o:p></span></font=
></p>
<p class=3DMsoNormal><!--[if supportFields]><span =
class=3DEmailStyle20><font=20
size=3D2 color=3D"#993366" face=3DArial><span =
style=3D'font-size:10.0pt;mso-bidi-font-size:
12.0pt;font-family:Arial'><span =
style=3D'mso-element:field-end'></span></span></font></span><![endif]--><=
span
class=3DEmailStyle20><font size=3D2 color=3D"#993366" face=3DArial><span
style=3D'font-size:10.0pt;mso-bidi-font-size:12.0pt;font-family:Arial'><!=
[if =
!supportEmptyParas]> <![endif]><o:p></o:p></span></font></span></p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D2 =
color=3Dblack
face=3DTahoma><span =
style=3D'font-size:10.0pt;font-family:Tahoma;color:black'>-----Original
Message-----<br>
<b><span style=3D'font-weight:bold'>From:</span></b> Whittall, Conrad
[mailto:Conrad.Whittall@Cognos.COM]<br>
<b><span style=3D'font-weight:bold'>Sent:</span></b> Monday, June 09, =
2003 2:52
PM<br>
<b><span style=3D'font-weight:bold'>To:</span></b> =
powerh-l@lists.swau.edu<br>
<b><span style=3D'font-weight:bold'>Cc:</span></b> David Morrison - =
Corporate;
brett@kinetix.co.nz<br>
<b><span style=3D'font-weight:bold'>Subject:</span></b> RE: Stop blank =
screen
when no more records to display</span></font></p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 =
face=3D"Times New Roman"><span
style=3D'font-size:12.0pt'><![if =
!supportEmptyParas]> <![endif]><o:p></o:p></span></font></p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D2 =
color=3Dblack
face=3DVerdana><span =
style=3D'font-size:10.0pt;font-family:Verdana;color:black'>I'm
afraid the HOLD FIND option of the SCREEN statement is a unique (and =
very
useful) feature only found in the OS/400 versions of PowerHouse. =
Apparently it
was very easy to implement on OS/400 due to the way that the file =
intrinsics
work on that platform.</span></font><font color=3Dblack><span =
style=3D'color:black;
mso-color-alt:windowtext'><o:p></o:p></span></font></p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'> </span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D2 =
color=3Dblack
face=3DVerdana><span =
style=3D'font-size:10.0pt;font-family:Verdana;color:black'>As
Allen points out in his message, the behaviour seen is the standard =
PowerHouse
behaviour for all other platforms and would be pretty tricky to =
modify.</span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'> </span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D2 =
color=3Dblack
face=3DVerdana><span =
style=3D'font-size:10.0pt;font-family:Verdana;color:black'>Best
regards,</span></font><font color=3Dblack><span =
style=3D'color:black'><br>
</span></font><b><i><font size=3D6 color=3Dnavy><span =
style=3D'font-size:24.0pt;
color:navy;font-weight:bold;font-style:italic'>Conrad</span></font></i></=
b><font
color=3Dblack><span style=3D'color:black'> </span></font><font =
color=3Dblack><span
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'> </span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal =
style=3D'mso-margin-top-alt:0in;margin-right:0in;margin-bottom:
12.0pt;margin-left:.5in'><font size=3D2 color=3Dblack =
face=3DTahoma><span
style=3D'font-size:10.0pt;font-family:Tahoma;color:black'>-----Original
Message-----<br>
<b><span style=3D'font-weight:bold'>From:</span></b> David Morrison - =
Corporate
[mailto:dmorrison@mcbrideelectric.com]<br>
<b><span style=3D'font-weight:bold'>Sent:</span></b> 9 June 2003 =
11:20<br>
<b><span style=3D'font-weight:bold'>To:</span></b> brett@kinetix.co.nz;
powerh-l@lists.swau.edu<br>
<b><span style=3D'font-weight:bold'>Subject:</span></b> RE: Stop blank =
screen
when no more records to display</span></font><font color=3Dblack><span
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><span =
class=3DEmailStyle16><font
size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:10.0pt;mso-bidi-font-size:
12.0pt;font-family:Arial'>Are you using HOLD FIND in the screen =
statement?<span
style=3D"mso-spacerun: yes"> </span>If not, try =
that.<o:p></o:p></span></font></span></p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><span =
class=3DEmailStyle16><font
size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:10.0pt;mso-bidi-font-size:
12.0pt;font-family:Arial'> <o:p></o:p></span></font></span></p>
<p class=3DMsoAutoSig style=3D'margin-left:.5in'><!--[if =
supportFields]><span=20
class=3DEmailStyle16><font size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:
10.0pt;mso-bidi-font-size:12.0pt;font-family:Arial'><span =
style=3D'mso-element:
field-begin'></span><span style=3D"mso-spacerun: =
yes"> </span>AUTOTEXTLIST=20
\s "E-mail Signature" <span =
style=3D'mso-element:field-separator'></span></span></font></span><![endi=
f]--><font
color=3Dnavy><span style=3D'color:navy'>David =
Morrison</span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoAutoSig style=3D'margin-left:.5in'><font size=3D3 =
color=3Dnavy
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:navy'>McBride
Electric</span></font><font color=3Dblack><span =
style=3D'color:black;mso-color-alt:
windowtext'><o:p></o:p></span></font></p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><!--[if =
supportFields]><span=20
class=3DEmailStyle16><font size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:
10.0pt;mso-bidi-font-size:12.0pt;font-family:Arial'><span =
style=3D'mso-element:
field-end'></span></span></font></span><![endif]--><span =
class=3DEmailStyle16><font
size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:10.0pt;mso-bidi-font-size:
12.0pt;font-family:Arial'> <o:p></o:p></span></font></span></p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D2 =
color=3Dblack
face=3DTahoma><span =
style=3D'font-size:10.0pt;font-family:Tahoma;color:black'>-----Original
Message-----<br>
<b><span style=3D'font-weight:bold'>From:</span></b> Brett Greiner
[mailto:brett@kinetix.co.nz]<br>
<b><span style=3D'font-weight:bold'>Sent:</span></b> Sunday, June 08, =
2003 4:39
PM<br>
<b><span style=3D'font-weight:bold'>To:</span></b> =
powerh-l@lists.swau.edu<br>
<b><span style=3D'font-weight:bold'>Subject:</span></b> Stop blank =
screen when no
more records to display</span></font><font color=3Dblack><span =
style=3D'color:black;
mso-color-alt:windowtext'><o:p></o:p></span></font></p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'> </span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'> </span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D2 =
color=3Dblack
face=3DArial><span =
style=3D'font-size:10.0pt;font-family:Arial;color:black'>We are trying
to stop the blank screen appearing when the number of records in the =
file
matches the number of items on the screen (ie. There are no spare =
Powerhouse
ids on the screen). The blank screen happens when the User presses the
<Enter> key.</span></font><font color=3Dblack><span =
style=3D'color:black;
mso-color-alt:windowtext'><o:p></o:p></span></font></p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D2 =
color=3Dblack
face=3DArial><span =
style=3D'font-size:10.0pt;font-family:Arial;color:black'>But, if
you have say 12 records in the file and have 13 powerhouse ids on the =
screen,
pressing the <Enter> key displays the 12 =
records.</span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'> </span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D2 =
color=3Dblack
face=3DArial><span =
style=3D'font-size:10.0pt;font-family:Arial;color:black'>Does
anybody know or has done this technique before?</span></font><font =
color=3Dblack><span
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'> </span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D2 =
color=3Dblack
face=3DArial><span =
style=3D'font-size:10.0pt;font-family:Arial;color:black'>We are
using version; AIX PowerHouse 8.13.D2.</span></font><font =
color=3Dblack><span
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'> </span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D2 =
color=3Dblack
face=3DArial><span =
style=3D'font-size:10.0pt;font-family:Arial;color:black'>Cheers,</span></=
font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D2 =
color=3Dblack
face=3DArial><span =
style=3D'font-size:10.0pt;font-family:Arial;color:black'>Brett.</span></f=
ont><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:1.0in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'> </span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'><![if =
!supportEmptyParas]> <![endif]></span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p style=3D'margin-left:.5in'><font size=3D2 color=3Dblack face=3D"Times =
New Roman"><span
style=3D'font-size:10.0pt;color:black'>---<br>
Outgoing mail is certified Virus Free.<br>
Checked by AVG anti-virus system (http://www.grisoft.com).<br>
Version: 6.0.488 / Virus Database: 287 - Release Date: =
05-Jun-03</span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
<p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 =
color=3Dblack
face=3D"Times New Roman"><span =
style=3D'font-size:12.0pt;color:black'><br>
<br>
_________________________________________________ <br>
Scanned for viruses on 09 Jun 2003 00:05:56 <br>
No viruses found. <br>
Virus scanning by <a =
href=3D"http://erado.com">http://erado.com</a></span></font><font
color=3Dblack><span =
style=3D'color:black;mso-color-alt:windowtext'><o:p></o:p></span></font><=
/p>
</div>
</body>
</html>
<BR>
<P><FONT SIZE=3D2 FACE=3D"Arial">This message may contain privileged =
and/or confidential information. If you have received this e-mail in =
error or are not the intended recipient, you may not use, copy, =
disseminate or distribute it; do not open any attachments, delete it =
immediately from your system and notify the sender promptly by e-mail =
that you have done so. Thank you.</FONT></P>
<BR><BR>_________________________________________________
<BR>Scanned for viruses on 09 Jun 2003 21:51:24
<BR>No viruses found.
<BR>Virus scanning by <A href=3Dhttp://erado.com>http://erado.com</A>
------_=_NextPart_001_01C32ED1.C0B473BE--