Page History
...
Repository() function, COPY Method, TCOMPILE Method, Get_Repos_Entities().
Example
| Code Block |
|---|
//* Copy the window BTREEREADTEST to BTREEREADBACKUP */
/* NOTE: The code behind control events is copied, as contrasted with the COPY method, which only copies the window. */
debug
Declare Function Get_Repos_Entities, Repository, Get_Status
AppID = @APPID<1> ;* current application
TypeID = "OIWIN" ;* OpenInsight window
ClassID = "" ;* Not Applicable
Stored_Proc_Name = 'BTREEREADTEST'
Backup_Proc_Name = 'BTREEREADTEST_BACKUP'
entid = AppID : '*' : TypeID : '*' : ClassID : '*' : Stored_Proc_Name
backupid = AppID : '*' : TypeID : '*' : ClassID : '*' : Backup_Proc_Name
result = Repository("TCOPY", backupid, entid)
* test result
If Get_Status(ErrCode) then
call msg(@window, 'Error Message returned: ' : ErrCode)
end |
