BOTP中使用自定义变量

场景：

应付暂估凭证由采购入库单直接生成，正式应付凭证由采购发票核销记录生成。

需求：

冲回凭证的摘要需要体现冲回的是往期的哪一期凭证号。

实现：

在单据转换规则中使用弱关联函数__BOTGetPropert（）或者使用sql查询核销记录中采购入库单凭证单据编号和业务日期。这里使用sql语句查询。

最终实现效果：

Botp配置截图

凭证id = #sql_val("select FVOUCHERID from T_IM_PurInWarehsBill where fid = '" + 核销记录.分录.来源单据ID + "'" );
公式结果  = "【车间材料冲回："   +   left( convertJavaDate ( #sql_val("select Fbizdate from T_GL_Voucher where fid =  '" + 凭证id + "'")),7) + __BOTGetObjectNumberFromCussent( #sql_val("select FVOUCHERID from T_IM_PurInWarehsBill where fid = '" + 核销记录.分录.来源单据ID + "'" )) + "】";

可以使用右键导出脚本然后再编辑，最后再导入，导出的为txt格式文件，以上传附件，仅供参考。

txt内容：

凭证id = #sql_val("select FVOUCHERID from T_IM_PurInWarehsBill where fid = '" + 核销记录.分录.来源单据ID + "'" );
公式结果  = "【车间材料冲回："   +   left( convertJavaDate ( #sql_val("select Fbizdate from T_GL_Voucher where fid =  '" + 凭证id + "'")),7) + __BOTGetObjectNumberFromCussent( #sql_val("select FVOUCHERID from T_IM_PurInWarehsBill where fid = '" + 核销记录.分录.来源单据ID + "'" )) + "】";
--comments end
var formula_result; //{bos_formula_comments_var:var_name=formula_result|var_type=|var_scope=return|var_alias=公式结果|var_desc=公式返回结果}
var WriteOffGroupInfo; //{bos_formula_comments_var:var_name=WriteOffGroupInfo|var_type=com.kingdee.eas.scm.cal.WriteOffGroupInfo|var_scope=in|var_alias=核销记录|var_desc=}
var var1; //{bos_formula_comments_var:var_name=var1|var_type=STRING|var_scope=local|var_alias=凭证id|var_desc=}
var formula_result; //{bos_formula_comments_var:var_name=formula_result|var_type=|var_scope=return|var_alias=公式结果|var_desc=公式返回结果}
var WriteOffGroupInfo; //{bos_formula_comments_var:var_name=WriteOffGroupInfo|var_type=com.kingdee.eas.scm.cal.WriteOffGroupInfo|var_scope=in|var_alias=核销记录|var_desc=}
var var1; //{bos_formula_comments_var:var_name=var1|var_type=STRING|var_scope=local|var_alias=凭证id|var_desc=}
var1 = #sql_val("select FVOUCHERID from T_IM_PurInWarehsBill where fid = '" + WriteOffGroupInfo.entry.billID + "'" );
formula_result  = "【车间材料冲回："   +   left( convertJavaDate ( #sql_val("select Fbizdate from T_GL_Voucher where fid =  '" + var1 + "'")),7) + __BOTGetObjectNumberFromCussent( #sql_val("select FVOUCHERID from T_IM_PurInWarehsBill where fid = '" + WriteOffGroupInfo.entry.billID + "'" )) + "】";
return formula_result;