alexsandro9
Programmer
Hi experts,
just starting to develop something with Oscript and i'm having the very same unexpected behavior
that i found in this post here : and that i couldn't figure out how to avoid yet even with given suggestions.
In short after i created and installed my new ospace module on our development server, i can no
longer proceed since every time i try to unlock the newly created ospace (or even others already installed and developed)
the Debugger starts off with the 'A Wrong argument type was specified' error in the function LockUnlockOSpace() in the very same
point of the above post : if OS.IsFeature( OS.Root( spec ), "Startup") && ( Type( OS.Root( spec ).Startup ) == ScriptType)
spec is the string 'D:\\LL_Archieve\\Opentext\\module\\custmodwf_1_0_0\\ospace\\custmodwf.oll'
obj is #31000001 (unknown)
LockUnlockOSpace() is quite the same as in the other post :
function Void LockUnlockOSpace()
Boolean lockVal
Dynamic x
List data
String s
Boolean thisOSpace = False
Dynamic obj = .fObject
if $OSpaceTools.IsOSpace( obj )
obj = OS.Root( obj )
end
if OS.IsObject( obj )
data = OS.MapInfo( obj )
if data[ 3 ]
s = 'Lock'
lockVal = True
else
s = 'Unlock'
lockVal = False
end
if $DialogUtils.Confirm( Str.Format( '%1 OSpace %2?', s, Str.Upper( data[ 1 ] ) ) )
for x in Vis.gProgram().pWindows
if OS.IsObject( x.pContext ) && Str.CmpI( OS.Filename( x.pContext ), data[ 1 ] ) == 0
if x.pContext != this
Vis.Delete( x )
else
thisOSpace = True
end
end
end
string spec = OS.FileSpec( obj )
if thisOSpace
Vis.Delete( .window )
end
OS.CloseOSpace( spec )
OS.OpenOSpace( spec, True, lockVal )
// Run startup if it is there...
if OS.IsFeature( OS.Root( spec ), "Startup" ) && \ // XDBs have no startup feature
( Type( OS.Root( spec ).Startup ) == ScriptType )
OS.Root( spec ).Startup()
end
if !thisOSpace
.Post( 'UpdateOSpace', spec )
else
$BuilderProgram.Run()
$Browser.Create()
end
end
end
end
How can this be? Faulty server installation or anything i'm doing wrong?
Lack of permissions to unlock my own module (and others as well?)
I tried closing the Ospace and reopening it in unlocked mode with no luck.
I also tried implementing the external script WebModule.lxe as tipped in the
Developer's guide to automatically start my ospace in unlocked mode but still no luck.
Anything else i could try to solve this?
Thank you in advance for your time and preciuos help.
Best regards
Alexsandro
just starting to develop something with Oscript and i'm having the very same unexpected behavior
that i found in this post here : and that i couldn't figure out how to avoid yet even with given suggestions.
In short after i created and installed my new ospace module on our development server, i can no
longer proceed since every time i try to unlock the newly created ospace (or even others already installed and developed)
the Debugger starts off with the 'A Wrong argument type was specified' error in the function LockUnlockOSpace() in the very same
point of the above post : if OS.IsFeature( OS.Root( spec ), "Startup") && ( Type( OS.Root( spec ).Startup ) == ScriptType)
spec is the string 'D:\\LL_Archieve\\Opentext\\module\\custmodwf_1_0_0\\ospace\\custmodwf.oll'
obj is #31000001 (unknown)
LockUnlockOSpace() is quite the same as in the other post :
function Void LockUnlockOSpace()
Boolean lockVal
Dynamic x
List data
String s
Boolean thisOSpace = False
Dynamic obj = .fObject
if $OSpaceTools.IsOSpace( obj )
obj = OS.Root( obj )
end
if OS.IsObject( obj )
data = OS.MapInfo( obj )
if data[ 3 ]
s = 'Lock'
lockVal = True
else
s = 'Unlock'
lockVal = False
end
if $DialogUtils.Confirm( Str.Format( '%1 OSpace %2?', s, Str.Upper( data[ 1 ] ) ) )
for x in Vis.gProgram().pWindows
if OS.IsObject( x.pContext ) && Str.CmpI( OS.Filename( x.pContext ), data[ 1 ] ) == 0
if x.pContext != this
Vis.Delete( x )
else
thisOSpace = True
end
end
end
string spec = OS.FileSpec( obj )
if thisOSpace
Vis.Delete( .window )
end
OS.CloseOSpace( spec )
OS.OpenOSpace( spec, True, lockVal )
// Run startup if it is there...
if OS.IsFeature( OS.Root( spec ), "Startup" ) && \ // XDBs have no startup feature
( Type( OS.Root( spec ).Startup ) == ScriptType )
OS.Root( spec ).Startup()
end
if !thisOSpace
.Post( 'UpdateOSpace', spec )
else
$BuilderProgram.Run()
$Browser.Create()
end
end
end
end
How can this be? Faulty server installation or anything i'm doing wrong?
Lack of permissions to unlock my own module (and others as well?)
I tried closing the Ospace and reopening it in unlocked mode with no luck.
I also tried implementing the external script WebModule.lxe as tipped in the
Developer's guide to automatically start my ospace in unlocked mode but still no luck.
Anything else i could try to solve this?
Thank you in advance for your time and preciuos help.
Best regards
Alexsandro