CICS事务网关-CTG原理及操作4

          END-EXEC.

… COBOL code …
*end of program

1.5.2 JCA应用
Lab3 implements a simple internet banking.
Users can query/save/withdraw their money from the web application.

 1. Web client
(1)Operation Page s
Operation Types: Query,Save,Withdraw
(2)Return Page
Result: Name, Gender, Balance

2. DATA FORMAT — COMMAREA
(1)SNNNNNNNNNNXXXXXXXXXX
(2)S= 0,1,2(0-Query, 1-Save, 2-Withdraw)
(3) NNNNNNNNNN — UserName
XXXXXXXXXX   —  Money
struct CTGINPUT{
char signal;
char username??(10??);
char money??(10??);
char success;
char name??(12??);
char gender??(12??);
char balance??(12??);
};

3. CICS Program – VSAM1
(1)three operations
(Query,Save,Withdraw)
(2) Operate the VSAM files

4. CICS DATA – VSAM files
(1)VSAM file1–USERINFO
(Username:10), (Account:6)
(Name:12), (Gender:6)
(2)VSAM file2–ACCOUNT
(Account:6), (Balance:10)

 

 

以下文章点击率最高

Loading…

     

如果这文章对你有帮助,请扫左上角微信支付-支付宝,给于打赏,以助博客运营

发表评论

您的电子邮箱地址不会被公开。 必填项已用*标注