RE: formatting message content

["Simonse, Arco \(CMK\)" <ArcoSimonse@xxxxxxxxxxxxxxxxx>]

Hi Richard,

I realize that I did not make myself very clear. Sorry for that.
I do already use QMHRTVM. I get the message text from the message file,
formatted with the format characters and containing the substituted
variables.
But once I have it, I want to display the message text to the user. And
there is the problem. Do I have to parse the text into display fields
and show it by executing a display format, or is there somewhere an API
or command that displays a message to the user? It is not enough to add
the message to the msgq of the user, it has to be a kind of
break-message because it's neccessary that the user takes notice of the
message immediately.

Thanks, Arco Simonse

> -----Oorspronkelijk bericht-----
> Van: rpg400-l-bounces@xxxxxxxxxxxx 
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Namens Richard ECUYER
> Verzonden: zaterdag 18 juni 2005 09:41
> Aan: RPG programming on the AS400 / iSeries
> Onderwerp: Re: formatting message content
> 
> There is an APi that retrieve a message formatted with 
> variables : QMHRTVM Here is a sample :
> 
>  *
>  * Variables locales 
> ......................................................
> d   RcvTxt        s           1024
> d   RcvLen        s             10u 0
> d   FmtName       s              8
> d   QualName      s             20
> d   RplData       s           1024    Varying
> d   RplLen        s             10u 0
> d   RplValue      s             10
> d   Rtnctl        s             10
>  *
> D Dsmessage       ds
> D   Len1                        10u 0
> D   Len2                        10u 0
> D   Len3                        10u 0
> D   Len4                        10u 0
> D   Len5                        10u 0
> D   Len6                        10u 0
> D   TxtHlp                    1024
>  *
> c                   Eval      QualName = MsgFil + MsgLib
> c                   Eval      FmtName  = 'RTVM0100'
> c                   Eval      RcvLen   = %len(DsMessage)
> c                   Eval      RplData  = MsgDta
> c                   Eval      RplLen   = %len(MsgDta)
> c                   Eval      RplValue = '*YES'
> c                   Eval      RtnCtl   = '*NO'
>  *
> c                   Callp     QMHRTVM(
> c                                DsMessage:
> c                                RcvLen   :
> c                                FmtName  :
> c                                MsgId    :
> c                                QualName :
> c                                RplData  :
> c                                RplLen   :
> c                                RplValue :
> c                                Rtnctl   :
> c                                ApiError)
> 
> 
> ----- Original Message -----
> From: "Simonse, Arco (CMK)" <ArcoSimonse@xxxxxxxxxxxxxxxxx>
> To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
> Sent: Friday, June 17, 2005 11:19 PM
> Subject: RE: formatting message content
> 
> 
> > Hi Carel,
> >
> > Thanks for pointing me to this API. I hadn't thought of 
> really putting
> > the message on a message queue, my first intentention was 
> to retrieve
> > the message description directly from the message file. But via the
> > queue is better I realize now. And thank you for explaining me the
> > CNTFLD/WRDWRAP keywords, they were new for me.
> >
> > Best regards,
> > Arco Simonse
> > -- 
> > > -----Oorspronkelijk bericht-----
> > > Van: rpg400-l-bounces@xxxxxxxxxxxx
> > > [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Namens Carel Teijgeler
> > > Verzonden: vrijdag 17 juni 2005 22:44
> > > Aan: rpg400-l@xxxxxxxxxxxx
> > > Onderwerp: Re: formatting message content
> > >
> > > Arco,
> > >
> > > If you know the MSGID and the MSGDTA for those substitutuion
> > > variables, then you can use the Send Programme Message and
> > > Receive Programme Message APIs. In the receiver variable of
> > > the second API you get the message in subbfield MSG (IIRC).
> > >
> > > Show the text in a display field with CNTFLD(60) and WRDWRAP,
> > > no formatting required.
> > >
> > > Success.
> > >
> > > Regards,
> > > Carel Teijgeler.
> > >
> > > *********** REPLY SEPARATOR  ***********
> > >
> > > On 17-6-05 at 18:14 Simonse, Arco \(CMK\) wrote:
> > >
> > > >I use the QMHRTVM API to retrieve message descriptions from
> > > the message
> > > >file. If I want to show the retrieved second-level message
> > > text in my
> > > >program to the user, I will have to reformat this retrieved
> > > text, because it is one long text.
> > > >Of course I can go and write my own text parser to reformat the
> > > >messagetext by the use of the formatting characters &N, &P,
> > > and &B that are in the messagetext.
> > > >But I wonder if there's another way to do it. Maybe an API
> > > or some other solution I don't know of.
> > > >
> > > >Any point would be appreciated.
> > >
> > >
> > >
> > > --
--  
DISCLAIMER:
This message contains information that may be privileged or
confidential and is the property of C.Meijer B.V. It is intended only for the 
person to whom it is addressed. If you are not the intended recipient, you are 
not authorized to read, print, retain, copy,disseminate, distribute, or use 
this message or any part thereof. If you
receive this message in error, please notify the sender immediately and delete 
all copies of this message. 

This footnote also confirms that this email message has been swept by the 
presence of computer viruses