OnPageBottom()
This also works, using expressions instead of Get. Shorter but harder to read
Procedure OnBody
String sText
Send WriteHtmlRowBegin
Get AddRowIdLink (FormatNumber(ddValue(self,"Customer.Customer_Number"),0)) to sText
Send WriteHtmlCell sText 'Class="Data" Align="right"'
Send WriteHtmlCell (ddValue(self,"Customer.Name")) 'Class="Data" Align="left"'
Send WriteHtmlCell (ddValue(self,"Customer.Phone_Number")) 'Class="Data" Align="left"'
Send WriteHtmlCell (FormatNumber(ddValue(self,"Customer.Balance"),2)) 'Class="Data" Align="right"'
Send WriteHtmlRowEnd
End_Procedure // OnBody