标题: [KB功能解说] 在自动凭证中管理特殊的GACCENTRYD字段 [打印本页]

---

作者: lynn.yu    时间: 2019-7-29 11:35     标题: [KB功能解说] 在自动凭证中管理特殊的GACCENTRYD字段

* 本文由赛捷软件（上海）有限公司翻译完成，未经授权不得转载。如需转载，请先联系相应版块的版主取得授权。


适用产品版本
Sage X3 V140、V5、V6、V7


模块
会计


问题概要
在表GACCENTRYD中有一个特殊的字段。

虽然你可以通过会计接口来管理它，但是在自动凭证的[公式]页签中你却无法找到这个字段。


详细信息
解决方法
要想在“公式”页签（自动凭证功能→“行”按钮）添加一个与表GACCENTRYD中的新字段对应的新行，首先你必须：
——在表GACCTMPD中，添加与GACCENTRYD关联的特殊字段
在GACCENTR1屏幕中，在版块6中添加那个新的GACCENTRYD字段。
这个字段的名称必须以字母X、Y或者Z开头，且这个字段必须附加一个业务代码。
——最后，“保存”并“审核”GACCENTR1屏幕。

在此之后，每个自动凭证的“公式”页签中都会出现一个新的行。

第二步：自自动凭证的公式填入GACCENTRYD中新字段的值。

要做到这点，你需要：
——在屏幕的版块1中添加新的GACCENTRYD字段。
——“保存”并“审核”该屏幕。
——在CPTAUTO程序中使用录入点“LIGNE”（参见相关的在线帮助）
——参见以下特定程序的示例

在录入点“LIGNE”（CPTAUTO）中用来在表GACCENTRYD中填入特殊字段XCHAMP值的程序示例：

#################### Entry point LIGNE from CPTAUTO ####################
#
$ACTION
Case ACTION
When "LIGNE" : Gosub ZONSPE
When Default
Endcase
Return

$ZONSPE
# To populate field XCHAMP in GACCENTRYD.
Call EVAL_CHAR([M]XCHAMP(NOL),"XCHAMP",2,I,"",STAT) From CPTAUTO
If STAT : MESSA = "XCHAMP" : Return : Endif
Return


NOTA :
use instruction : Call EVAL_CHAR([M]XCHAMP(NOL),"XCHAMP",2,I,"",STAT) From CPTAUTO
if field XCHAMP is alphanumeric.
（你可以将""替换为任意字母数字型的默认值）

use instruction : Call EVAL_NUM([M]XCHAMP(NOL),"XCHAMP",2,I,0,STAT) From CPTAUTO
if field XCHAMP is numeric (amount for example).
(you may replace 0 by another numeric default value),

use instruction : Call EVAL_DATE([M]XCHAMP(NOL),"XCHAMP",2,I,[0/0/0],STAT) From CPTAUTO
if field XCHAMP is a date.
（你可以将[0/0/0]替换为另一个“日期”字段作为默认值）。

---

欢迎光临 赛捷软件论坛 (http://sagesoft.cn/bbs/)

Powered by Discuz! 7.2