dBase III報告中的新增內容是什麼？

Question

在生成的報告中，我無法進入新行。我只能並排添加4個字段，但我想將它們添加到新行中。

Answer 1

如果您只是將打印機（LPT1）作爲設備打印，輸入代碼將設備從屏幕切換到打印機後，只需引用要打印的行號。以下是我用來打印頁面標題的舊程序的代碼，以及後續標題。

1. 早在你的代碼：

   SET CONSOLE OFF && so your output doesn't echo to the screen while printing. 
   SET PRINTER ON 
   SET PRINTER TO LPT1 
   

2. 然後調用Prt_Header()功能打印第一頁標題。在打印詳細記錄時，您必須跟上行號，當您到達頁面底部時，請使用EJECT命令將該頁面踢出並將另一個呼叫發送到Prt_Header()。

**************************** 
STATIC FUNCTION Prt_Header() 
**************************** 

    nPage += 1 

    @ 1, 4 SAY DATE() 
    @ 1, 55 SAY "MyCompany INTERNATIONAL, INC." 
    @ 1,121 SAY "Page " + STR(nPage, 4, 0) 

    @ 2, 51 SAY "MY Report Name" 
    @ 3, 4 SAY "Pay Group: " + cPayGroup 
    @ 3, 58 SAY "For Period: " + cPeriodMon + "/" + cPeriodYr 
    @ 4, 4 SAY cLines 
    @ 5, 4 SAY "EXECUTIVE " + "(" + cParTitle + "): " + cName 
    @ 5, 70 SAY "Member #:" + cDist 
    @ 5,100 SAY "Sponsored: " + STR(nNoSponsored, 5, 0) 

    @ 6, 21 SAY cAddress 

    @ 6,100 SAY "Qualified: " + STR(nQualified, 5, 0) 

    if .not. empty(cAddress2) 
     @ 7, 21 SAY cAddress2 
     nLine_no := 8 
    else 
     nLine_no := 7 
    endif 

    @ nLine_no, 21 SAY TRIM(cCity) + ", "+ cState + " " + cZip + " " + = 
    cFullName 

    nLine_no += 2 

    @ nLine_no, 4 SAY "LN LEVEL I. D.  NAME" 
    @ nLine_no, 70 SAY "SALES BONUS PCT" 
    @ nLine_no, 93 SAY "PHONE   LAST ORDER STATUS" 
    @ nLine_no + 1, 4 SAY cLines 
    nLine_no += 2 

    nItem := 0 

    RETURN NIL 

* EOP: Prt_Header() 

但是，如果您使用的是報告生成器，這是不是你要找的東西。