Kbase P83647: RemoveLink does not remove all links
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  05/07/2006 |
|
Status: Unverified
FACT(s) (Environment):
OpenEdge 10.0x
OpenEdge 10.1x
SYMPTOM(s):
ADM2
RemoveLink does not remove all custom links
Only last created custom link can be removed using removeLink
CAUSE:
This is a known issue being investigated by Development
FIX:
Workaround:
Change modifyUserLinks in smart.p:
...
ELSE IF pcMod = "REMOVE":U THEN
DO:
/* If this object is *not* already there, just exit. */
IF LOOKUP(STRING(phObject), cHandles) EQ 0 THEN
RETURN.
ASSIGN cHandles = REPLACE(",":U + cHandles + ",":U,
",":U + STRING(phObject) + ",":U, ",":U)
cHandles = SUBSTR(cHandles, 2, LENGTH(cHandles) - 2)
cNewEntry = pcLinkName + CHR(4) + cHandles.
LEAVE. /* Adding this leave statement fixes this issue */
END. /* END DO IF REMOVE */
...