[KB功能解说] 在自动凭证中管理特殊的GACCENTRYD字段
[b]* 本文由赛捷软件（上海）有限公司翻译完成，未经授权不得转载。如需转载，请先联系相应版块的版主取得授权。[/b][b]适用产品版本[/b]
Sage X3 V140、V5、V6、V7
[b]模块[/b]
会计
[b]问题概要[/b]
在表GACCENTRYD中有一个特殊的字段。
虽然你可以通过会计接口来管理它，但是在自动凭证的[公式]页签中你却无法找到这个字段。
[b]详细信息
解决方法[/b]
要想在“公式”页签（自动凭证功能→“行”按钮）添加一个与表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]替换为另一个“日期”字段作为默认值）。
页:
[1]