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
