{
    "header": {
        "version": 1,
        "type": "record"
    },
    "body": {
        "record1": {
            "<1>": "\r\nDeclare function Get_Property\r\nDeclare subroutine Set_Property\r\n\r\nRDSNo = Get_Property(CtrlEntID, 'TEXT')\r\nIf RDSNo[1,2] EQ '1T' then RDSNo[1,2] = ''\r\nSet_Property(CtrlEntID, 'TEXT', RDSNo)\r\n\r\n\r\nRETURN 1"
        }
    }
}