Re: One for the display file gurus: window on both 80-col. and 132-col. screens?

James,
In your DDS for the window, you need to add the *DS4 at the file level.
A DSPSIZ(27 132 *DS4
A 24 80 *DS3)

This will allow the window to function correctly when called from a 132 col display panel.

Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2
IBM Certified Specialist- e(logo) server i5Series Technical Solutions Designer V5R3
IBM Certified Specialist- e(logo)server i5Series Technical Solutions Implementer V5R3









----- Original Message ----
From: James Lampert <jamesl@xxxxxxxxxxxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Sent: Monday, December 31, 2007 1:28:09 PM
Subject: One for the display file gurus: window on both 80-col. and 132-col. screens?

Anybody out there know how to make a window work properly on a
132-column screen?

I have both 80-column and 132-column versions of the base screen
(subfile, subfile control, and a plain ordinary record for the function
key legends). I have a window that comes up fine over the 80-col.
version, but if I try to bring it up over the 132-col. version, it
blanks the base screen.

Anybody know what I could be doing wrong? The original window record
code, from the 2.04 version of Dave McKenzie's UNDEL2, is:

R UNDELW1 WINDOW(7 15 14 61)
OVERLAY
CA03
CA06
CA12
HELP
HLPTITLE('Member Data Locked')
H HLPPNLGRP('UNDELR/LOCKED' UNDEL2DU)
HLPARA(01 001 12 061)
H HLPPNLGRP('UNDELR/LKFKYS' UNDEL2DU)
HLPARA(13 001 14 061)
1 21'Member Data Locked'
DSPATR(HI)
3 2'Another job is holding a *SHRN-
UP, *SHRUPD, *EXCLRD or *EXCL '
4 2'member data lock. While the l-
ock is held, retrieved deleted'
5 2'records will contain default v-
alues (blanks or zeros). The '
6 2'lock could be held by a job th-
at has the file open for '
7 2'update. -
'

9 2'To retrieve the actual data in-
deleted records, wait until '
10 2'no such lock is held, or use t-
he BAKFILE command paremeter '
11 2'to get records from a backup f-
ile. '

13 2'F6=Display locks'
COLOR(BLU)
13 21'F12=Cancel'
COLOR(BLU)

I had to remove the CAxx lines, since I've got the function keys defined
at file level. I tried adding a second "WINDOW(7 15 14 61)" conditioned
on *DS4, but that had no effect.