Steve,
You are working too hard here!
SET VAR vmsg = (''''+.vmsg + 'Date Billed = ' & (CTXT(.vbilldate)) +
.vcrlf+'''')
PAUSE 2 USING &vmsg +
OPTION MESSAGE_FONT_NAME ARIAL FB|MESSAGE_FONT_SIZE 15|MESSAGE_BOLD OFF
Instead, thy this
SET VAR vmsg = (.vmsg + 'Date Billed = ' & (CTXT(.vbilldate)) + .vcrlf)
PAUSE 2 USING .vmsg +
OPTION MESSAGE_FONT_NAME ARIAL FB|MESSAGE_FONT_SIZE 15|MESSAGE_BOLD OFF
.vmsg will use the text you have built without any problem interpreting it.
Dennis McGrath
________________________________
From: [email protected] [mailto:[email protected]] On Behalf Of Steve Breen
Sent: Tuesday, November 16, 2010 10:38 PM
To: RBASE-L Mailing List
Subject: [RBASE-L] - Can not get message display to work any recommendations
Can I get some help here. Trying to get this message to display
CLEAR VAR vcnt
CLEAR VAR vsum
CLEAR VAR vtranscnt
CLEAR VAR vtranssum
CLEAR VAR vpapercnt
CLEAR VAR vpapersum
COMPUTE vtranscnt AS COUNT pon FROM attinv_master_cust +
WHERE (parentcustid = 164 or parentcustid = 110 or parentcustid = 193)
COMPUTE vtranssum AS SUM camount FROM attinv_charge_desc +
WHERE (parentcustid = 164 or parentcustid = 110 or parentcustid = 193)
COMPUTE vpapercnt AS COUNT pon FROM attinv_master_cust +
WHERE (parentcustid NE 164 AND parentcustid NE 110 AND parentcustid = 193)
COMPUTE vpapersum AS SUM camount FROM attinv_charge_desc +
WHERE (parentcustid NE 164 AND parentcustid NE 110 AND parentcustid = 193)
COMPUTE vcnt AS COUNT pon FROM attinv_master_cust
COMPUTE vsum AS SUM camount FROM attinv_charge_desc
SET VAR vcrlf = ((CHAR(10)) + (CHAR(13)))
CLEAR VAR vmsg
SET VAR vmsg = ('Total TransAdvantage Invoices for Billing Date = '
&(CTXT(.vtranscnt))+.vcrlf)
SET VAR vmsg = (.vmsg + 'Total Amount Billed to TransAdvantage For Billing Date
= ' + &(CTXT(.vtranssum))+.vcrlf)
SET VAR vmsg = ('Total Other Invoices for Billing Date = ' &(CTXT(.vpapercnt))+
.vcrlf)
SET VAR vmsg = (.vmsg + 'Total Other Amount Billed For Billing Date = '
&(CTXT(.vpapersum))+.vcrlf)
SET VAR vmsg = ('Total Invoices for Billing Date = ' &(CTXT(.vcnt))+ .vcrlf)
SET VAR vmsg = (.vmsg + 'Total Amount Billed For Billing Date = '
&(CTXT(.vsum))+.vcrlf)
SET VAR vmsg = (''''+.vmsg + 'Date Billed = ' & (CTXT(.vbilldate)) +
.vcrlf+'''')
PAUSE 2 USING &vmsg +
OPTION MESSAGE_FONT_NAME ARIAL FB|MESSAGE_FONT_SIZE 15|MESSAGE_BOLD OFF
Thanks for any help
