Overriding Credit Limit Password


I found an interesting post in the newsgroup, the user wanted to override the credit limit password for predefined customers or classes using VBA, code below will run temporary runtime created macro to fill the password as required and proceed:

Private Sub ExtendedPrice_AfterLostFocus()

‘Fill you if condition here.
Set CompilerApp = CreateObject(“Dynamics.Application”)
Commands = “”
Commands = Commands & “local integer l_file_id; ” & vbCrLf
Commands = Commands & “local string pathname; ” & vbCrLf
Commands = Commands & “pathname = “”C:\CreditLimitPassword.mac””; ” & vbCrLf
Commands = Commands & “l_file_id = TextFile_Open(pathname, 0, 0); ” & vbCrLf

Commands = Commands & “TextFile_WriteLine(l_file_id, “”  Logging filemacro.log‘ “”); ” & vbCrLf

Commands = Commands & “TextFile_WriteLine(l_file_id, “”  NewActiveWin dictionary ‘default’ form DiaLog window DiaLog  “”); ” & vbCrLf
Commands = Commands & “TextFile_WriteLine(l_file_id, “”  TypeTo field ANSWER , ‘ACCESS’ “”); ” & vbCrLf
Commands = Commands & “TextFile_WriteLine(l_file_id, “”  MoveTo field OK  “”); ” & vbCrLf
Commands = Commands & “TextFile_WriteLine(l_file_id, “”  ClickHit field OK   “”); ” & vbCrLf
Commands = Commands & “TextFile_Close(l_file_id); ” & vbCrLf
Commands = Commands & “if File_Probe(pathname) then ” & vbCrLf
Commands = Commands & ”  run macro pathname; ” & vbCrLf
Commands = Commands & “end if; ” & vbCrLf
‘Execute SanScript
CompilerError = CompilerApp.ExecuteSanscript(Commands, CompilerMessage)
If CompilerError 0 Then
MsgBox CompilerMessage
End If
End Sub

Hope that this helps.


Mohammad R. Daoud
Software Development Manager
+962 – 79 – 999 65 85
Great Package For Business Solutions


About Mohammad R. Daoud
Mohammad R. Daoud has been working as a Microsoft Dynamics GP consultant since 2004. His career path started with version 7.5; he studied every single tip of the application technicalities and did allot of successful implementations that includes functional consultations, analysis, and custom development projects. He holds a graduate degree in Computer Science and currently he is pursuing MBA degree in Accounting. In January 2007 he was nominated to the Microsoft Most Valuable Professional (MVP) certificate and was certified in April 2008 due to his online contributions in the Dynamics Community (Dynamics GP Newsgroups, Forums, User Groups and his blog: http://mohdaoud.blogspot.com). Worth to mention that he was also listed as one of the Microsoft Dynamics Top 100 Most Influential People in 2009 by DynamicsWorld. And more... • Demonstrated Passion for MS Products through participating in beta testing for some product versions, an effective member of Microsoft Connect. • Talented in securing strong high quality relationships with premier customers, partners and sales teams passionately and profitably. • Dedicated to meeting the expectations and requirements of internal and/or external customers • Problem Solver – Uses systematic approach to uncover true problem(s) and practical solution and can marshal resources to solve problem! • Proven record of effective account management, including Account Planning, Opportunity Management, and Business Management Excellence and working as part of a larger virtual team • Successful in delivering high quality technical engagements in the enterprise Dynamics GP implementations area according to customer requirements. • Dedicated, Committed, Self Motivated, Creative and highly focused with excellent communication, Negotiation, presentation, Active Listening and Objection Handling skills. • Experienced in Profitable researches and studies including white papers and technical presentations.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )


Connecting to %s

%d bloggers like this: