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() 

しかし、。