{ "header": { "version": 1, "type": "record" }, "body": { "record1": { "<1>": "declare function dialog_box\r\n\r\nValsToPass = .surface_info->array\r\nOrigVals = ValsToPass\r\nRetVal = dialog_box( 'NCR_SURFACE_INFO', @window, ValsToPass:char(245):'*CENTER' )\r\n\r\nif RetVal <> 'CANCEL' and RetVal <> ValsToPass then\r\n .surface_info->array = RetVal\r\nend\r\nRETURN 0" } } }