Re: How to get all the PNLGRP features?

On 08/06/2004, at 7:16 AM, Chris Wolcott wrote:

I've got most of the panel group stuff under control, but I want to add
the 'Escape messages for ________' list at the bottom, as IBM screens
look.  I can not find the UIM source for that.

Can anyone help me with a few examples?

:help name='strsmbsvr/error/messages'.
:p.
:hp3.*ESCAPE messages:ehp3.
:dl compact.
:dt.SMB0101:dd.&msg(SMB0101,FBNGNAV).
:dt.SMB0101:dd.&msg(SMB0202,FBNGNAV).
:dt.SMB0101:dd.&msg(SMB0203,FBNGNAV).
:dt.SMB0101:dd.&msg(SMB9999,FBNGNAV).
:edl.
:ehelp.

:help name='strsmbsvr'.&msg(TXT2701). - &msg(TXT1010).
:p.
The &msg(TXT2701). (STRSMBSVR) command starts the jobs required
to support peer clients using the Server message Block (SMB)
protocol. If the jobs are already running, the command will fail.
The command will also start the QSERVER subsystem it it is not active.
:imhelp name='smbsvr/netsvr'.
:imhelp name='smbsvr/reqaut'
:imhelp name='com/asterisk'.
:p.
:xh3.Error messages for STRSMBSVR
:imhelp name='strsmbsvr/error/messages'.
:ehelp.

Regards,
Simon Coulter.
--------------------------------------------------------------------
   FlyByNight Software         AS/400 Technical Specialists

   http://www.flybynight.com.au/
   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175                                   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------