Macro IFSCLOUD R1

Thanks mathias

here are the elements 

the database https://ifspsd1-d01.demo.ifs.cloud/landing-page/

document class :CRM_ACTIVIT

document template no : 1201828

I added a super simple macro and it works. You can try the same by viewing the document below and see if you get the message box popping up (it sometimes appear behind the web browser as well, so look for new windows in the Windows task bar):

I needed to enable the aurena agent for the site, of course.

Hi,

I don't have the time to debug those macros, sorry. What I do know is that there is one small thing that can be different in Aurena when working with macros and that is how to get the local file name of the file that have been checked out.

I once helped another consultant getting these macros to run in Aurena. I just had a look at some old notes I have from back then. It looks I change this code:

   ' ****** IFS_01_06_GENERAL_FILE_EXIST

   PUBLIC FUNCTION FILE_EXIST(I, APP)
      
      ON ERROR RESUME NEXT
      
      MsgBox "In File_Exist"
      
      SET FSO = CREATEOBJECT("SCRIPTING.FILESYSTEMOBJECT")
      IF I = 0 THEN
         O_FILENAME = SCRIPTVALUES.ITEM("LOCAL_FILE_NAME").VALUE
      ELSE

To this:

   ' ****** IFS_01_06_GENERAL_FILE_EXIST

   PUBLIC FUNCTION FILE_EXIST(I, APP)
      
      ON ERROR RESUME NEXT
      
      MsgBox "In File_Exist"
      
      SET FSO = CREATEOBJECT("SCRIPTING.FILESYSTEMOBJECT")
      IF I = 0 THEN
         O_FILENAME = Replace(ClientScriptValues.Item("LOCAL_FILE_1").Value, "/", "\")
         O_FILENAME = Mid(O_FILENAME, InstrRev(O_FILENAME, "\") + 1)
      ELSE

Perhaps that can help you? Disclaimer: I don't remember if I was able to make these macros working or not, but I think I made the change above for a reason.

If you cannot get it to work, you should contact James G, who wrote those macros. With the above change he might be able to get it to work for you.

/Mathias