综合业务原操作-pl

1、.1.1 pAccount 记帐功能模块名pAccount相关程序plAccount.ec描述分户帐总帐记帐操作ACGEN(select)INMR(update)ACMR(update)INHTRCURR(insert)作者职责时间描述杨嘉威Initial段志宏Update魏海波Update功能流程描述接口：输入：typedef structintiActid;charsBrcodeDLEN_BRID+1;charsCurcdDLEN_CURCD+1;charsCrdbDLEN_TYPE+1;charsTxtypeDLEN_TXTYPE+1;doubledAmount;doubledRate;

2、charsDesccdDLEN_DESCCD+1;charsVocnoDLEN_VOCNO+1;charsCommentDLEN_DESC+1;charsCashItemDLEN_CASHITEM+1;intiPrint;intiOpActid; ACDTL;#define MAX_ACDTL10typedef structcharsTlsrnoExtDLEN_TLSRNOEXT+1;charsOpcodeDLEN_TXTYPE+1;charsKinbrDLEN_BRID+1;charsCurcdDLEN_CURCD+1;charsDesccdDLEN_DESCCD+1;charsVocnoD

3、LEN_VOCNO+1;charsCommentDLEN_DESC+1;ACDTLdtlMAX_ACDTL; pTisAccount;输出：typedef structstructintiActid;charsOpnbrDLEN_BRID+1;charsAccodeDLEN_ACCODE+1;charsCurcdDLEN_CURCD+1;charsTxtypeDLEN_TXTYPE+1;doubledAmount;doubledAvbal;charsClrtypeDLEN_GL_CLRTYPE+1;charsNameDLEN_CNAME+1; dtlMAX_ACDTL; pTosAccount

4、;流程：轧帐标志检查aGlStmGetProcess；for recordi in acgen do根据pTisAccount.dtli和recordi，填aTisGlJourRtm;调用总帐分户帐更新操作aGlJourRtmProcess记一条分录;操作员总帐更新aGlTlrAcProcess;if 交易行 <> 开户行 then 检查是否允许通存通兑，若不允许则退出; 开户行通存通兑记帐pAccount; 交易行通存通兑记帐pAccount; 记录通存通兑明细和汇总aGlInbrProcess;endif;if 有清算关系 then 上下级行清算记帐pAccount;endif

5、;enddo;1.2 pCancel 取消记帐模块名pCancel相关程序plCancel.c描述分户帐总帐记帐取消，pAccount的反操作INHTRCURR(insert, update)INMR(update)ACMR(update)作者职责时间描述杨嘉威Initial功能流程描述接口：输入：typedef structcharsTlsrnoDLEN_TLSRNO+1; pTisCancel;输出：typedef structcharsStatusDLEN_FLAG+1;charsTlsrnoDLEN_TLSRNO+1; /* 下一可用流水号 */ pTosCancel;流程：for r

6、ecordi in inhtrcurrdo根据recordi填aTisGlJourRtm;调用总帐分户帐更新操作aGlJourRtmProcess;操作员总帐更新aGlTlrAcProcess;enddo;for recordi in inbrdtldo根据recordi填aTisGlInbr;调用通存通兑明细和汇总操作aGlInbrProcess;enddo;1.3 pDpTaly 存款记帐功能模块名pDpTaly相关程序plDpTaly.c描述存款卡片记帐操作，同时登记未登折SVCARD(update)PBNB/IPBNB(insert)作者职责时间描述陈雷Initial功能流程描述接口：

7、输入：typedef struct intiActid; /* 帐号 */ char sTxtypeDLEN_TXTYPE + 1; /* 交易类型 */ char sCrdbDLEN_FLAG + 1; /* 借贷标志 */ char sHcodeDLEN_HCODE + 1; /* 取消标志 */ double dTxamt; /* 交易金额 */ char sDesccdDLEN_DESCCD + 1; /* 交易描述 */ char sCobridDLEN_BRID + 1; /* 相关行号 */ int iCoactid; /* 相关帐号 */ char sVocnoDLEN_VOC

8、NO + 1; /* 凭证号 */ char sMeditypeDLEN_TYPE + 1; /* 介质类型 */ char sMedisubtypeDLEN_DP_MEDISUBTP + 1; /* 介质子类型 */ char sMedinoDLEN_DP_MEDINO + 1; /* 介质编号 */ char sTlsrnoDLEN_TLSRNO + 1; /* 柜员流水号 */ char sCurcdDLEN_CURCD + 1; /* 币种代码 */ char sIsdateDLEN_DATE+1; /* 起息日,仅开户时填 */ charsTerm4; /* 存期,仅开户时填 */

9、double dRate; /* 利率,仅开户时填 */ double dIntrt; /* 利息,仅产生利息时填 */ char sPbdscDLEN_DSCPT + 1; /* 存折摘要(交易摘要，必填)*/ charsSvacmrtxntypeDLEN_TYPE + 1;/* 开销户类别 */ pTisDpTaly;输出：typedef struct double dActbal; /* 帐户余额 */ double dAvbal; /* 可用余额 */intiPbcol; /* 存折行数 */ char sStatusDLEN_STATUS+1; /* 交易状态 */ pTosDpTa

10、ly;流程：存款卡片查询aDpActInqProcess;如果是对公活期户，检查是否允许取现;存款帐务操作aDpSvActHdlProcess;如果是存折，则存折登记未登折明细aDpMedRgtNtBkProcess;如果是一本通，则一本通登记未登折明细aDpPbRgtNtBkProcess;1.4 pFundSrc 资金来源模块名pFundSrc相关程序plFundSrc.c描述资金来源操作，更新各卡片余额作者职责时间描述杨嘉威Initial功能流程描述接口：输入：typedef structcharsFundTypeDLEN_TYPE+1;/* 0-现金1-转帐2-同城3-电子汇划 */i

11、ntiActid;/* 帐号 */charsCardnoDLEN_CARDNO+1;/* (销帐)顺序号 */charsPbFlgDLEN_FLAG+1; /* 一本通标志0-否1-是 */char sIpbnoDLEN_ACTNO+1; /* 一本通号 */char sPseqnoDLEN_PBACTSEQ+1; /* 打印顺序号(不输入则表示基本活期户)*/charsCashItemDLEN_CASHITEM+1;/* 现金项目 */charsVarPswdflgDLEN_FLAG+1;/* 是否检查密码，0否 1是 */charsPassflgDLEN_FLAG+1;/* 密印标志 */

12、charsPasswdDLEN_PASSWD+1;/* 密码 */charsChkpswdDLEN_CHK_PASSWD+1;/* 支付密码 */charsIdtypeDLEN_IDTYPE+1;/* 证件种类 */charsIdnoDLEN_IDNO+1;/* 证件号码 */charsVoctypeDLEN_VOCTYPE+1;/* 凭证类型 */charsVocnoDLEN_VOCNO+1;/* 凭证号 */doubledTxamt;/* 金额 */charsSvTypeDLEN_TYPE+1;/* 对应帐户类型，同城时填入 */intiSvActid; /* 对应帐号，同城时填入 */c

13、harsSvCardnoDLEN_CARDNO+1;/* 对应卡片号，同城时填入 */charsDesccdDLEN_DESCCD+1;/* 摘要 */charsCommentDLEN_DESC+1;/* 说明 */charsTlsrnoDLEN_TLSRNO+1;/* 流水号 */charsTxtypeDLEN_TXTYPE+1;/* 交易类型,只用于现金记帐借用 */ pTisFundSrc;输出：typedef structcharsAccodeDLEN_ACCODE+1;charpbflg;charmeditypeDLEN_TYPE+1;charmedisubtypeDLEN_DP_M

14、EDISUBTP+1;charmedinoDLEN_DP_MEDINO + 1; pTosFundSrc;流程：分户帐查询aGlInmrChkProcess;switch aTisFundSrc.sFundType docase 现金: 出纳库存操作aCaRpStOprProcess; 使用支票操作aDpChkUseProcess;case 转帐: switch aTosGlInmrChk.sCdtype do case 存款卡片: 密码和证件验证; 存款记帐操作pDpTaly; 使用支票操作aDpChkUseProcess; case 销帐卡片: 使用支票操作aDpChkUseProcess

15、; 销帐卡片记帐操作aSeWocardActProcess; endswitch;case 同城: 调用提出/提入交换票据操作aSeFetchProcess;endswitch;1.5 pFundUse 资金去向模块名pFundUse相关程序plFundUse.c描述资金去向操作，更新各卡片余额作者职责时间描述杨嘉威Initial功能流程描述接口：输入：typedef structcharsFundTypeDLEN_TYPE+1;/* 资金去向, 0-现金1-转帐2-同城 */intiActid;/* 帐号 */charsCardnoDLEN_CARDNO+1;/* (销帐)顺序号 */cha

16、rsPbFlgDLEN_FLAG+1; /* 一本通标志0-否1-是 */char sIpbnoDLEN_ACTNO+1; /* 一本通号 */char sPseqnoDLEN_PBACTSEQ+1; /* 打印顺序号(不输入则表示基本活期户)*/charsCashItemDLEN_CASHITEM+1;/* 现金项目 */charsVoctypeDLEN_VOCTYPE+1;/* 凭证类型 */charsVocnoDLEN_VOCNO+1;/* 凭证号 */doubledTxamt;/* 金额 */charsSvTypeDLEN_TYPE+1;/* 对应帐户类型，同城时填入 */intiSv

17、Actid; /* 对应帐号，同城时填入 */charsSvCardnoDLEN_CARDNO+1;/* 对应卡片号，同城时填入 */charsDesccdDLEN_DESCCD+1;/* 摘要 */charsCommentDLEN_DESC+1;/* 说明 */charsTlsrnoDLEN_TLSRNO+1;/* 流水号 */charsTxtypeDLEN_TXTYPE+1;/* 交易类型,只用于现金记帐借用 */ pTisFundUse;输出：typedef structcharsAccodeDLEN_ACCODE+1;charpbflg;charmeditypeDLEN_TYPE+1;

18、charmedisubtypeDLEN_DP_MEDISUBTP+1;charmedinoDLEN_DP_MEDINO + 1; pTosFundUse;流程：分户帐查询aGlInmrChkProcess;switch aTisFundSrc.sFundType docase 现金: 出纳库存操作aCaRpStOprProcess;case 转帐: switch aTosGlInmrChk.sCdtype do case 存款卡片: 存款记帐操作pDpTaly; case 销帐卡片: 销帐卡片记帐操作aSeWocardActProcess; endswitch;case 同城: 调用提出/提入

19、交换票据操作aSeFetchProcess;endswitch;1.6 pClrInt 贷款结息功能模块名pClrInt相关程序plClrInt.c描述贷款结息操作作者职责时间描述张强Initial陈劲松Update功能流程描述接口：输入：typedef struct char sCardnoDLEN_CINO + 1; int iActid; double dTxamt; char sHcodeDLEN_HCODE + 1; pTisClrInt;输出：typedef structdoubledRealInt;/* 可还利息 */doubledTotIoiInt;/* 累计表内息 */dou

20、bledTotMoiInt;/* 累计表外息 */doubledBalint;/* 本金利息 */doubledBalaccum;/* 本金积数 */doubledBalrate;/* 本金利率 */charsBalsdateDLEN_DATE+1;/* 本金起始日期 */ char sBalOcflgDLEN_TYPE + 1;doubledIoiint;/* 表内欠息复利 */doubledIoiaccum;/* 表内欠息积数 */doubledIoirate;/* 表内欠息利率 */charsIoisdateDLEN_DATE+1;/* 表内欠息起始日期 */ char sIoiOcfl

21、gDLEN_TYPE + 1;doubledMoiint;/* 表外欠息复利 */doubledMoiaccum;/* 表外欠息积数 */doubledMoirate;/* 表外欠息利率 */charsMoisdateDLEN_DATE+1;/* 表外欠息起始日期 */ char sMoiOcflgDLEN_TYPE + 1;int miIoiRcvActid;/* 利息收入帐号 */int miMoiRcvActid; pTosClrInt;流程：本金利息计算操作aLnIntCalcProcess;表内欠息计算复利aLnAllOweCalcProcess;表外欠息计算复利aLnAllOweC

22、alcProcess;如果存款余额不够还本金利息，则本金利息入欠息aLnDbtIntNewProcess;表内欠息复利入欠息aLnDbtIntNewProcess;表外欠息复利入欠息aLnDbtIntNewProcess;本金及利率调整历史表清积数aLnClrRatehtrProcess;表内欠息及利率调整历史表清积数aLnClriRatehtrProcess;表外欠息及利率调整历史表清积数aLnClriRatehtrProcess;1.7 pAddIntDtl 贷款结息增加结息明细功能模块名pAddIntDtl相关程序plAddIntDtl.c描述贷款结息后增加结息明细操作，以pClrInt的输出为输入作者职责时间描述陈劲松Initial功能流程描述接口：输入：typedef struct char sCardnoDLEN_CINO + 1; int iActid; double dTxamt; char sHcodeDLEN_HCODE + 1; pTisClrInt;typedef structdoubledRealInt;/* 可还利息 */doubledTotIoiInt;