{ "header": { "version": 1, "type": "record" }, "body": { "record1": { "<1>": "DECLARE SUBROUTINE obj_Appwindow\r\n\r\nTubeID = Get_Property(@WINDOW:'.TUBE_ID','DEFPROP')\r\n\r\nIF TubeID NE '' THEN\r\n\tobj_Appwindow('ViewRelated','TUBE':@RM:TubeID)\r\nEND\r\nRETURN 0" } } }