Options

SetUpNewLine() Van Tabel 97 / Form 124

rowixrowix Member Posts: 27
edited 2006-08-03 in NAV Dutch speaking only
Graag zou ik deze functie uit tabel 97 willen gebruiken:
SetUpNewLine()

CommentLine.SETRANGE("Table Name","Table Name");
CommentLine.SETRANGE("No.","No.");
CommentLine.SETRANGE(Date,WORKDATE);
IF NOT CommentLine.FIND('-') THEN
  Date := WORKDATE;

Nu zie ik in formulier 124 de aanroep van de functie als volgt staan:
Form - OnNewRecord(BelowxRec : Boolean)

SetUpNewLine;
Verder zie ik niks. Alleen Bij locals staat de BelowxRec : Boolean

Ik heb de functie nagemaakt maar dan met mijn veldnamen.

En als ik dan mijn formulier wil compileren geeft hij een foutmelding
Deze luidt als volgt:

Bij de aanroep van de functie moet tenminste het minimale aantal parameters worden gebruikt.

Maar ik zie in form 124 ook geen Parameters Gedeclareerd ](*,)

Answers

  • Options
    2tje2tje Member Posts: 80
    Gebruik je een maatwerk tabel?
    Heeft je nieuwe form dezelfde properties als Form 124?
    Zijn je variabelen in de functie goed gedefinieerd?
    Het lijkt erop dat je vanuit het form een andere functie aanroept dan je wilt.
  • Options
    rowixrowix Member Posts: 27
    2tje wrote:
    Gebruik je een maatwerk tabel?
    Ja ik heb hem zelf gemaakt.
    2tje wrote:
    Heeft je nieuwe form dezelfde properties als Form 124
    Zover ik kan zien zijn alleen die properties anders die het ook moeten zijn de rest heb ik "gepikt" van form 124
    2tje wrote:
    Zijn je variabelen in de functie goed gedefinieerd?
    Ik heb in form 124 en in mijn form maar een variabele en dat is (BelowxRec [Boolean])
    2tje wrote:
    Het lijkt erop dat je vanuit het form een andere functie aanroept dan je wilt.

    Na het proberen te compileren springt hij gelijk naar de regel waar ik SetUpNewLine; heb neergezet en hij zet dan de cursos tussen de e en ; zou dan het probleem in de tabel moeten zitten?

    Wat ik niet aangepast/gemaakt heb in mijn eigen tabel zijn de variabele :
    (WebSite [Record] Web Site)
    (SynchMgt [Codeunit] Synchronization Management)

    Die laaste word wel aangeroepen onder
    OnInsert()
    IF "Table Name" = "Table Name"::Customer THEN
      IF WebSite.FIND('-') THEN
        SynchMgt.InsertCustomerCommentLine(Rec);
    
    OnModify()
    IF "Table Name" = "Table Name"::Customer THEN
      IF WebSite.FIND('-') THEN
        SynchMgt.ModifyCustomerCommentLine(Rec,xRec);
    
    OnDelete()
    IF "Table Name" = "Table Name"::Customer THEN
      IF WebSite.FIND('-') THEN
        SynchMgt.DeleteCustomerCommentLine(Rec);
    

    Zou het hier aan liggen ?
  • Options
    rowixrowix Member Posts: 27
    De code die ik gebruik is :
    DocOpm.SETRANGE(Tabelnaam,Tabelnaam);
    DocOpm.SETRANGE(Nummer,Nummer);
    DocOpm.SETRANGE(Datum,WORKDATE);
    IF NOT DocOpm.FIND('-') THEN
      Datum := WORKDATE;
    

    Misschien doe ik hier iets verkeerd, op het forum wordt ook verwezen naar tabel 81 als je zoekt op SetUpNewLine doet deze het zelfde (Alleen iets meer)? #-o
  • Options
    Marije_BrummelMarije_Brummel Member, Moderators Design Patterns Posts: 4,262
    rowix wrote:
    OnInsert()
    IF "Table Name" = "Table Name"::Customer THEN
      IF WebSite.FIND('-') THEN
        SynchMgt.InsertCustomerCommentLine(Rec);
    
    OnModify()
    IF "Table Name" = "Table Name"::Customer THEN
      IF WebSite.FIND('-') THEN
        SynchMgt.ModifyCustomerCommentLine(Rec,xRec);
    
    OnDelete()
    IF "Table Name" = "Table Name"::Customer THEN
      IF WebSite.FIND('-') THEN
        SynchMgt.DeleteCustomerCommentLine(Rec);
    

    Zou het hier aan liggen ?

    Ik denk dat dit wegkan.
  • Options
    rowixrowix Member Posts: 27
    Ben er uit heb :oops: een foutje gemaakt in de tabel ik heb de variable per ongeluk ook onder het hoofdstukje parameter gezet en dat vind hij niet fijn :cry:

    Maar het is opgelost dus bedankt voor de tips =D>
Sign In or Register to comment.