Skip to main content

Notifications

Announcements

No record found.

News and Announcements icon
Dynamics 365 Community / Forums / Microsoft Dynamics GP (Archived) / Simple Macro Question
Microsoft Dynamics GP (Archived)

Simple Macro Question

(0) ShareShare
ReportReport
Posted on by Community Member Microsoft Employee

My first Macro...

I want to drop the current date in a "Note" window (not a field per se).

 

We constantly have to enter notes in our system in various "yellow" Note windows (e.g. clicking the yellow Note button in the Item Maintenance window (next to the part number)).

 

We always start by entering today's date and then a colon (:) and then a "space" after the colon.  Then we type custom notes about actions relating to the part number.  We also do this for the "yellow" Note window in Vendor Maintenance window.  Can someone tell me the correct exact text to put in a MAC file that I can open in Notepad to drop in system date (or just a new date that I edit into Notepad every morning).  I tried manually typing the date into a Note window while running the manual Macro record function and then using the Macro play function with this info recorded "03.03.2016: " but the system did not record this for whatever reason.  So maybe I can create this "date stamp" Macro in Notepad.

 

Please help.

 

Thanks, Mark

*This post is locked for comments

  • L Vail Profile Picture
    L Vail 65,271 on at
    RE: Simple Macro Question

    Mark,

    Did this macro work for you?

    Kind regards,

    Leslie

  • Suggested answer
    L Vail Profile Picture
    L Vail 65,271 on at
    RE: Simple Macro Question

    Hi Mark,

    Try the macro below after you have opened the 'Note' window.

    ActivateWindow dictionary 'default'  form 'Form_Note_1' window 'Form_Note_1'

    NewActiveWin dictionary 'default'  form sheLL window sheLL

     CommandExec dictionary 'default'  form 'Command_System' command UserDate

    NewActiveWin dictionary 'default'  form 'Switch Date' window 'SY_Set_User_Date'

     ContextMenu dictionary 'default'  field '(L) Acc_Sys_Date' form 'Switch Date' window 'SY_Set_User_Date'

     CommandExec form BuiLtin command cmdEditSelectAll

     ContextMenu dictionary 'default'  field '(L) Acc_Sys_Date' form 'Switch Date' window 'SY_Set_User_Date'

     CommandExec form BuiLtin command cmdEditCopy

    CloseWindow dictionary 'default'  form 'Switch Date' window 'SY_Set_User_Date'

    NewActiveWin dictionary 'default'  form sheLL window sheLL

    ActivateWindow dictionary 'default'  form 'Form_Note_1' window 'Form_Note_1'

     ContextMenu dictionary 'default'  field 'Text Field' form 'Form_Note_1' window 'Form_Note_1'

     CommandExec form BuiLtin command cmdEditPaste

     TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

     TypeTo field 'Text Field' , '/'

     TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

     TypeTo field 'Text Field' , '/'

     TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

     TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

     TypeTo field 'Text Field' , ':  '

    You could also open the note window from the macro, but you'd need a different macro for each window that you opened the note window from.

    Kind regards,

    Leslie

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

December Spotlight Star - Muhammad Affan

Congratulations to a top community star!

Top 10 leaders for November!

Congratulations to our November super stars!

Tips for Writing Effective Suggested Answers

Best practices for providing successful forum answers ✍️

Leaderboard

#1
André Arnaud de Calavon Profile Picture

André Arnaud de Cal... 291,280 Super User 2024 Season 2

#2
Martin Dráb Profile Picture

Martin Dráb 230,235 Most Valuable Professional

#3
nmaenpaa Profile Picture

nmaenpaa 101,156

Leaderboard

Featured topics

Product updates

Dynamics 365 release plans