web
You’re offline. This is a read only version of the page.
close
Skip to main content

Notifications

Announcements

No record found.

News and Announcements icon
Community site session details

Community site session details

Session Id :
Dynamics 365 Community / Forums / Microsoft Dynamics SL (Archived) / Customization in Accou...
Microsoft Dynamics SL (Archived)

Customization in Accounts Payable

(0) ShareShare
ReportReport
Posted on by Cynthia Audain 1,348

Hi All

I have a customization issue and I do hope that someone could point me in the right direction.

I recently started doing customizations in SL but it is certainly not my strong point.  There was an existing customizations on the voucher and adjustment screen, specifically on the subaccount field that the description in the last segment will go over as the transaction description.

Now this was working fine, until I did a customization on the invoice field to stop the user from entering the same invoice number for the same vendor.  Right now the system by default, alerts the user but does not stop them.  The client wants to stop the user.

The code is working but for some reason that totally escapes me, when it works, it is preventing the other customization from firing.   Is there something that I am missing, could some one point me in the right direction on what could be the problem?

If you need further clarification let me know.  Thanks so much in advance.

Lisa 

*This post is locked for comments

I have the same question (0)
  • Community Member Profile Picture
    Community Member on at

    Lisa,

    If you post the VB code for both the sub-account field and for your added  logic on the invoice number field, I will take a look and see if I can answer your question.

  • Sunita Profile Picture
    Sunita 10 on at

    Hello Lisa, can you please provide further details. If you have the code within check event of the field then using retval = errnomess will prevent the subsequent code to fire.

  • Cynthia Audain Profile Picture
    Cynthia Audain 1,348 on at

    Thanks Rick & Sunita, for both your responses.

    To elaborate a bit on the code.  Both codes are on the check event and for the invoice code, I am using retval = ErrNoMess.     The tail end of the code is as follows:

    If serr1 <> NOTFOUND Then

           Call MsgBox ("Invoice number has already been entered for this vendor.  Please enter a new number.",  vbOKOnly, "ERROR")

           retval = ErrNoMess

    The code for the subaccount is as follows:

    SqlStr = "Select Description from SegDef where FieldClassName = 'SUBACCOUNT' and SegNumber = '6' and ID " = " + SParm(Mid(ChkStrg, 9, 2))"

    serrl = SqlFetch1(c1, SqlStr, StrDesc, LenB(StrDesc))

    If serr1 <> NOTFOUND Then

       sivMyApp.Controls("cTranDesc").value = StrDesc.Descr

    Let me know where I when wrong. Thanks again

  • Sunita Profile Picture
    Sunita 10 on at

    I have tested the code and it works fine. Invoice Nbr is in the header whereas the Subaccount and TranDesc are in the grid, hence handled at completely different levels and check events. Did you turn on the Database Calls in Tools/Options in SL and look at the log file. You may want to verify the SQL statement to see if there are records with description is available for the corresponding rows in SegDef. On a side note, there seems to be a typo in the code excerpt pasted in your post for the SQL query. Below is what I have used. Alternatively, you can use MessBox calls for debugging purposes to see your SQL string or the result from it to see if there was data retrieved.

    sqlstr = "Select Description from SegDef where FieldClassName = 'SUBACCOUNT' and SegNumber = '3' and ID = " & SParm(Mid(ChkStrg, 4, 2))

  • Sunita Profile Picture
    Sunita 10 on at

    Lisa, please do note that the query I have tested with is on a system with different subaccount segments, which explains the SegNumber = 3 and the Mid function using starting position of 4. But the general statement construct is conveyed.

  • Cynthia Audain Profile Picture
    Cynthia Audain 1,348 on at

    Hi Sunita, from what you discovered are you saying that both codes together are working properly on your end?

    I have tested both codes separately and they work fine so I know nothing is wrong with the code itself.  The problem is when I put them together, only the invoice customization works and not the subaccount.  I am still a bit confused on what is causing this and how to go about to fix it.

    I will turn on the database calls and see if that shows something that will help...

  • Cynthia Audain Profile Picture
    Cynthia Audain 1,348 on at

    Hi Sunita,

    You mentioned in your previous post that retval = errnomess will prevent previous code from firing.  Could this be the issue here?  

    If not, is there someway I could specify the level that both code relate to, or this is not needed?

    I turn on the database calls and I am seeing a couple of errors but I am not sure I could make any sense out of it.  Below are two, I saw

    schk(pmsg=dbsqlexec,SqlCompile - Execute,poption=acctxref_acct  'HIPAC',  '90000' ,cursor=83,err=501)

    sqlcursor(cursor=83,name=83)

    Sql(cursor=83,"select acctxref.acct,acctxref.descr from acctxref WITH (NOLOCK)  where cpnyid = @parm1 and active = 1 and acct like @parm2 and (acctxref.acct between '90000' and 'zzzzzzzzzz') order by acct OPTION(FAST 500)")

    schk(pmsg=SqlCompile - dbcursoropen,poption=select acctxref.acct,acctxref.descr fro,cursor=83,err=10215)

    I am not sure if that means anything....  Any further suggestions?

    Thanks

    Lisa

  • Sunita Profile Picture
    Sunita 10 on at

    Hi Lisa, have you tried running a SQL Profiler trace. The templates provided by MS are well laid out with columns that will make the profiler data very consumable. They have a template for each version of SQL server. Yes, I have tried both sections of the code provided in your post, and they both work without any error. What version of SL are you working with? If you like, please post the complete code for Invoice Nbr and Sub Acct check event, and I will help review.

  • Cynthia Audain Profile Picture
    Cynthia Audain 1,348 on at

    Hi Sunita, after confirming that the SQL script was pulling data from the database, I had to dissect each line of the code to see what I may have missed and I figured out what was the problem.

    On looking closely at the second code, I realized that on the serr1 line, I put a "l" instead of a "1" and that was throwing off everything.   Now it is working perfectly.  

    Although I am not a programmer, I think simply things like this could be a programmer's nightmare if it is not picked up.

    Thanks a lot for your input though, it was greatly appreciated.

  • Sunita Profile Picture
    Sunita 10 on at

    Lisa, it may be a good idea to use Option Explicit as first line in your Form/Module code. It will enforce variable declarations and checks.

Under review

Thank you for your reply! To ensure a great experience for everyone, your content is awaiting approval by our Community Managers. Please check back later.

Helpful resources

Quick Links

Responsible AI policies

As AI tools become more common, we’re introducing a Responsible AI Use…

Neeraj Kumar – Community Spotlight

We are honored to recognize Neeraj Kumar as our Community Spotlight honoree for…

Congratulations to the November Top 10 Community Leaders!

These are the community rock stars!

Leaderboard > 🔒一 Microsoft Dynamics SL (Archived)

Last 30 days Overall leaderboard

Featured topics

Product updates

Dynamics 365 release plans