Versions Compared

Old Version 1

changes.mady.by.user Corby Nagel

Saved on

compared with

New Version 2

changes.mady.by.user Corby Nagel

Saved on

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Repository() function, SETMODULE method, ADDMODULE method, CLEARMODULE method, GETMODULE method

Example

 
Code Block
* Remove a Module Name from an Entity
 
Declare Function Repository
 
* Create an array of entities to use Module methods against
reposStack  = ""
reposStack := @appid<1> : "*OIWIN**CUSTOMERS" : @fm
reposStack := @appid<1> : "*OIWINEXE**CUSTOMERS" : @fm
reposStack := @appid<1> : "*POPUP**CUSTOMERS"
 
removeThisModuleName = "CUSTOMER_INVOICE"
 
* Remove a Module name to the entities
 
rPos = 0
rFlag = ""
module = ""
 
Loop
   Remove thisEntity From reposStack at rPos setting rFlag
      var = Repository( "REMOVEMODULE", thisEntity, removeThisModuleName )
      If Get_Status(ErrCode) then
         call msg(@window, 'Error Message returned: ' : ErrCode)
      end
   While rFlag
Repeat