home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
windows
/
demdat.zip
/
REPDEM.SBP
< prev
next >
Wrap
Text File
|
1990-02-11
|
3KB
|
79 lines
SBP
╜ REPDEM
╜ You can use the Maximize
╜ up arrow to bring the program
╜ editor window to full screen
╜ size, and the vertical scroll
╜ bar to view the entire program.
╜ With the exceptions noted below, the following DML program code
╜ is generated automatically when you save the report form described
╜ in the Form Designer section of the Trial Pack booklet. The
╜ exceptions are the addition of these REM statements, the addition
╜ of the NUMBASE command, and the removal of the path from the
╜ filename in the OPEN FILE command.
▓"z-,9999999.00"
╜ The ? command prints numeric values according to the format
╜ specified in the NUMBASE command. NUMBASE may be re-set by other
╜ programs or using the Set Number Format menu option. It is set here
╜ to the format required for printing the values in this report.
┤ Ö"CLIENTS"
╜ By default, the Report Generator inserts a full pathname into the
╜ OPEN FILE command. In the Trial Pack reports, this has been edited
╜ out, so that the OPEN FILE commands always refer to files in the
╜ current directory.
┬"Report to Printer?","",134,a%
╜ This is a REQUEST type 134. It displays a Windows-style ? dialog
╜ with three options, Yes, No and Cancel. The default option in type
╜ 134 is No. The variable a% returns the following values:
╜ Yes = 1, No = 2, Cancel = 0.
ía% 0 p Æ ^ ía% 1 p ╣;
╜ If the response to the dialog is Cancel, this statement terminates
╜ the program. If the response is Yes, then it executes a PRINT ;
╜ which re-directs output to the printer. Otherwise output remains
╜ directed to the display.
┴Net_Due.CLIENTS
╜ This line specifies the fields on which report functions will
╜ operate for the report as a whole, in this case Net_Due.
} ┴
{
{@1;"Total Due:";@61;&15 lNet_Due.CLIENTS
{
Æ ┴
╜ The AFTER REPORT marks the start of the AFTER REPORT section. This
╜ includes a ? blank line before and after the report SUM for the
╜ Net_Due. This SUM is printed starting at print position 61 for
╜ a length of up to 15 characters, preceded by some text at print
╜ position 1. END REPORT marks the end of an AFTER REPORT or BEFORE
╜ REPORT section.
ƒ
{@30;"Amounts Due Report"
{
Æ ƒ
╜ The HEADING command marks the sart of a HEADING section. This prints
╜ the text "Amounts Due Report" starting at print position 30, followed
╜ by a ? blank line. END HEADING marks the end of this section.
╔@1;&29Client.CLIENTS;@31;&29Location.CLIENTS;@61;&13Net_Due.CLIENTS
╜ The SELECT command is used to define the DML equivalent of the
╜ Fields section of a Query. In this SELECT command you can see the
╜ three fields you positioned in the Report Generator SELECT band,
╜ each with its @ start position and & length.