在App Engine 中实现动态调用Section

来源:互联网 发布:五大流氓国笑话知乎 编辑:程序博客网 时间:2024/04/23 22:28
 

  在APP Engine的运行机制中,默认是从Main Section开始,根据内在的Step排列,从上往下执行的。这种机制能满足我们大多数的工作,但是面对比较复杂的逻辑时,顺序执行就会显得有些苍白无力,这时我们就可以在peoplecode中根据我们的逻辑需求,动态调用section来满足我们的逻辑了。

 

  在我们的App Engine中,有如下几个Section,在Main Section中,添加If Else 逻辑,即 如果有银行账户,则用银行打款(call GIRO_CHK Section)的方式,否则就用支票付款(Call CXP_CHK Section)的方式。

 

  首先,在该Application Engine的state record中添加AE_Section 和AE_ApplID 字段,在你的逻辑中,将您要调用的section id 赋给AE_Section即可,如果要调用的Section是在同一个application Engine中,则不需要指定AE_ApplID,否则将您要调用的App Engine赋给AE_ApplID。 如下图所示:

 

在Step2的peoplecode中,添加如下代码

&Count_SQL = CreateSQL("SELECT COUNT(REMIT_BANK_ACCOUNT) FROM PS_PAYMENT_TBL WHERE PAY_CYCLE = :1 AND RTRIM(REMIT_BANK_ACCOUNT) = ''", DBS_TRANS_AET.PAY_CYCLE);

If &Count_SQL.Fetch(&SQL_Rows) Then
   If &SQL_Rows > 0 Then
      DBS_TRANS_AET.AE_SECTION = "CXP_CHK";
   Else
      DBS_TRANS_AET.AE_SECTION = "GIRO_CHK"
   End-If;
End-If;

&Count_SQL.Close();

 

如代码所示,如果返回的行数为零,则将CXP_CHK赋给AE_SECTION, else GIRO_CHK.

完成这一步后,只需要添加一个动态调用section的方法就可以了,如上图所示。将ProgramID设置成current(当前),将Dynamic选中,这样将程序运行到这一步时,则会调用当前AE_SECTION所存储的值。