代码之家  ›  专栏  ›  技术社区  ›  Cátia Matos

传递给报表的变量值未被打印

  •  0
  • Cátia Matos  · 技术社区  · 7 年前

    所以我想在报告中显示我的变量值。但它打印在消息“numerario”中,但在报告中没有显示任何内容。

    我更改了代码并在下面的触发器中插入,但报表没有在页面中打印消息

    中国科学技术大学。分类帐分录-OnAfterGetRecord())

    Cust.GET("Customer No.");
    FormatAddr.Customer(CustAddr,Cust);
    
    IF NOT Currency.GET("Currency Code") THEN
      Currency.InitRoundingPrecision;
    
    IF "Document Type" = "Document Type"::Payment THEN BEGIN
      ReportTitle := Text003;
      PaymentDiscountTitle := Text006;
    END ELSE BEGIN
      ReportTitle := Text004;
      PaymentDiscountTitle := Text007;
    END;
    
    CALCFIELDS("Original Amount");
    RemainingAmount := -"Original Amount";
    
    Signature := ReportCertificate + CompanyInfo."Soft. Certificate Number" + ReportCode;
    
       IF "Cust. Ledger Entry"."Payment Method Code"= '' THEN
      PaymentMethod.INIT
      MESSAGE('Empty Payment Method Code');
    END ELSE BEGIN
      PaymentMethodCode:="Cust. Ledger Entry"."Payment Method Code";
      PaymentMethod.GET(PaymentMethodCode);
      PaymentMethodDescription:=PaymentMethod.Description;
      Message('PaymentMethodCode %1',"Cust. Ledger Entry"."Payment Method Code");
    END;
    

    我的var paymentMethodDescription具有“将数据集中的include设置为true”选项。

    enter image description here

    2 回复  |  直到 7 年前
        1
  •  0
  •   Mak Sim    7 年前

    您正在设置onPostReport的变量,但尝试在数据集第一条记录的头中打印该变量。只是还没有。

        2
  •  0
  •   Cátia Matos    7 年前
    IF "Cust. Ledger Entry"."Payment Method Code"= '' THEN
      PaymentMethod.INIT
      MESSAGE('Empty Payment Method Code');
    END ELSE BEGIN
      PaymentMethodCode:="Cust. Ledger Entry"."Payment Method Code";
      PaymentMethod.GET(PaymentMethodCode);
      PaymentMethodDescription:=PaymentMethod.Description;
      Message('PaymentMethodCode %1',"Cust. Ledger Entry"."Payment Method Code");
    END;