Component Interface Example
Component Interface Example This is an example of a CI code written in AE program for a CI with 2 scroll levels. =========================================================== Local ApiObject &MYSESSION; Local ApiObject &MYCI; &MYSESSION = %Session; &MYCI = &MYSESSION.GetCompIntfc(CompIntfc.STUDENT_CI); &MYCI.STUDENT_ID = "213"; rem &MYCI.STUDENT_NAME = "fald"; If Not &MYCI.get() Then &MYCI.Create(); End-If; &MYCI.STUDENT_NAME = "fald,robert jam"; &MYLEVEL1 = &MYCI.STUDENT_COU; For &I = 1 To &MYLEVEL1.Count &ITEM = &MYLEVEL1.Item(&I); &ITEM.COURSE = "ORACLE"; &MYLEVEL2 = &ITEM.STUD_ADDR; &COUNT = &MYLEVEL2.Count; For &J = 1 To &COUNT &LVL2ITEM = &MYLEVEL2.Item(&J); ...