playbook/docs/tsl/syntax/11_runtime_context_and_with.md

Runtime Context And With

文档类型：语法主线 是否可直接用于生成代码：仅部分 是否含已验证可执行示例：是 是否含已验证反例：是 遇到不确定时跳转到：07_expressions_and_operators.md、22_namespace_libpath_and_unit_runtime.md、../finance/market_data_context.md

手册位置：第 11 篇，共 32 篇。上一篇：10_units_and_scope.md。下一篇：12_pitfalls.md。

这一篇只处理运行时环境参数和 with 后缀，不处理任何金融业务语义。

这一篇解决什么问题

回答“SetSysParam / GetSysParam 怎样用、SysParams[...] 是什么、#Func() with array(...) 这种后缀环境调用在当前解释器里怎样写”。

必须记住的规则

• TSL 有一组运行时系统参数；当前页只写已经实际验证过的通用写法。
• 已验证：SetSysParam(key, value) 和 GetSysParam(key) 可以直接用字符串键。
• 已验证：SysParams[key] 可以直接读写这些运行时参数。
• 当前已验证的 with 形式，是写在函数文件调用后面：#Func() with array(...)。
• 当前已做双文件运行验证：with array(...) 只在该次调用里临时覆盖对应键，调用结束后会恢复外部原值。
• 当前已做双文件运行验证：如果外部原值本来不存在，with array(...) 调用结束后，对应键会恢复成 nil。
• 不要把上面的后缀 with 直接泛化成“任何本地函数调用后面都能接 with array(...)”；这一点当前没有通过。
• 当前页只收通用键的例子；像 pn_stock()、pn_date() 这类金融上下文参数，统一放到业务层文档里解释。

已验证语法

直接设置和读取系统参数：

代码块身份：已验证可执行示例

program test;
begin
    SetSysParam("a", 123);
    SetSysParam("b", "XYZ");
    WriteLn(GetSysParam("a"));
    WriteLn(GetSysParam("b"));
end.

已验证运行结果：

• 依次输出 123、XYZ

SysParams[...] 直接读写：

代码块身份：已验证可执行示例

program test;
begin
    SysParams["a"] := 321;
    SysParams["b"] := "QQ";
    WriteLn(SysParams["a"]);
    WriteLn(SysParams["b"]);
    WriteLn(GetSysParam("a"));
end.

已验证运行结果：

• 依次输出 321、QQ、321
• 说明 SysParams[...] 和 GetSysParam(...) / SetSysParam(...) 指向的是同一组运行时环境参数

沿用同一个 TestDo.tsf，看 with array(...) 的覆盖边界：

代码块身份：配置片段 / 概念骨架

// TestDo.tsf
function TestDo();
begin
    return array(GetSysParam("a"), GetSysParam("b"));
end;

// main.tsl
program test;
begin
    SetSysParam("a", 7);
    SetSysParam("b", 8);
    r := #TestDo() with array("a": 101, "b": 202);
    WriteLn(r[0]);
    WriteLn(r[1]);
    WriteLn(GetSysParam("a"));
    WriteLn(GetSysParam("b"));
end.

// command
tsl .\main.tsl -LIBPATH "D:\path\to\dir\"

已验证运行结果：

• r[0] 输出 101
• r[1] 输出 202
• 调用结束后，外层 GetSysParam("a") 输出 7
• 调用结束后，外层 GetSysParam("b") 输出 8
• 说明 with array(...) 是“只在该次调用里临时覆盖，再恢复外部原值”

沿用上一个 TestDo.tsf，只把 main.tsl 改成下面这样：

代码块身份：配置片段 / 概念骨架

// main.tsl
program test;
begin
    r := #TestDo() with array("a": 101, "b": 202);
    WriteLn(r[0]);
    WriteLn(r[1]);
    WriteLn(GetSysParam("a") = nil);
    WriteLn(GetSysParam("b") = nil);
end.

已验证运行结果：

• 依次输出 101、202、1、1
• 说明外层原值不存在时，调用后不是“泄露”成 101 / 202，而是恢复成 nil

最小可编译示例

如果你只是想先记住最小的运行时环境入口，用这个：

代码块身份：已验证可执行示例

program test;
begin
    SetSysParam("a", 1);
    WriteLn(GetSysParam("a"));
end.

常见误写

• 把系统参数页直接写成金融函数页。
• 把 #Func() with array(...) 误判成也能直接套在本地函数 Demo() 后面。
• 以为 with array(...) 改的是全局永久值，不会恢复外层原环境。

代码块身份：反例 / 不可照写

program test;
function Demo();
begin
    return GetSysParam("a");
end;
begin
    r := Demo() with array("a": 11);
end.

上面这种“本地函数后缀 with”写法在当前解释器里没有通过，会报 Statement missing terminator，随后出现 function compile error。

跳转指引

• 回看表达式与调用：见 07_expressions_and_operators.md
• 涉及函数文件查找路径：见 22_namespace_libpath_and_unit_runtime.md
• 业务层环境参数：见 ../finance/index.md