Hi,
I am having a little trouble using the component interface CI_DEPEND_BENEF to load dependents into the Peoplesoft.
It works well when loading one dependent, but not so well when loading multiple dependents for an employee. I understand that the CI code made need some adjustments to handle more than one dependent and I have tried to adjust.
Can someone tell me if I adjusted correctly because I can get an error trying to load second dependent.
/* ===>
This is a dynamically generated PeopleCode template to be used only as a helper
to the application developer.
You need to replace all references to '[*]' OR default values with references to
PeopleCode variables and/or a Rec.Fields. */
Component File &fileLog;
Local File &fileLog;
Local ApiObject &oSession, &oCiDependBenef;
Local ApiObject &oDepBenCollection, &oDepBen;
Local ApiObject &oDepBenNameCollection, &oDepBenName;
Local ApiObject &oDepBenAddrCollection, &oDepBenAddr;
Local ApiObject &oDepbenRiderCollection, &oDepbenRider;
Local ApiObject &oDependentPhoneCollection, &oDependentPhone;
Local ApiObject &oDepBenEffCollection, &oDepBenEff;
Local ApiObject &oDepBenefMysCollection, &oDepBenefMys;
Local ApiObject &oDepBenefArgCollection, &oDepBenefArg;
Local ApiObject &oDepBenefDeuCollection, &oDepBenefDeu;
Local ApiObject &oDepBenefBelCollection, &oDepBenefBel;
Local ApiObject &oDepBenefFraCollection, &oDepBenefFra;
Local ApiObject &oDepBenEffBraCollection, &oDepBenEffBra;
Local ApiObject &oDepBenefBraCollection, &oDepBenefBra;
Local ApiObject &oVaccinationBraCollection, &oVaccinationBra;
Local ApiObject &oBnDepbenEffdtCollection, &oBnDepbenEffdt;
Local ApiObject &oDepBenefNidCollection, &oDepBenefNid;
Local ApiObject &oDepBenefChnCollection, &oDepBenefChn;
Function errorHandler()
Local ApiObject &oPSMessageCollection, &oPSMessage;
Local number &i;
Local string &sErrMsgSetNum, &sErrMsgNum, &sErrMsgText, &sErrType;
&oPSMessageCollection = &oSession.PSMessages;
For &i = 1 To &oPSMessageCollection.Count
&oPSMessage = &oPSMessageCollection.Item(&i);
&sErrMsgSetNum = &oPSMessage.MessageSetNumber;
&sErrMsgNum = &oPSMessage.MessageNumber;
&sErrMsgText = &oPSMessage.Text;
&fileLog.WriteLine(&sErrType | " (" | &sErrMsgSetNum | "," | &sErrMsgNum | ") - " | &sErrMsgText);
End-For;
rem ***** Delete the Messages from the collection *****;
&oPSMessageCollection.DeleteAll();
End-Function;
Local Rowset &deprs;
&deprs = CreateRowset(Record.HCX_DEPEND_STG);
&deprs.Fill();
MessageBox(0, "", 0, 0, "Total:" | &deprs.ActiveRowCount);
rem ***** Set the Log File *****;
&fileLog = GetFile("C:\temp\CONV\dependents\CI_DEPEND_BENEF.log", "w", "a", %FilePath_Absolute);
&fileLog.WriteLine("File opened");
&fileLog.WriteLine("**************************************");
&fileLog.WriteLine("Total Count: " | &deprs.ActiveRowCount);
For &i = 1 To &deprs.ActiveRowCount
try
rem ***** Set the Log File *****;
rem &fileLog = GetFile("C:\temp\CONV\dependents\CI_DEPEND_BENEF.log", "w", "a", %FilePath_Absolute);
&fileLog.WriteLine("Begin " | &i);
&fileLog.WriteLine("***************************************************************************");
rem ***** Get current PeopleSoft Session *****;
&oSession = %Session;
rem ***** Set the PeopleSoft Session Error Message Mode *****;
rem ***** 0 - None *****;
rem ***** 1 - PSMessage Collection only (default) *****;
rem ***** 2 - Message Box only *****;
rem ***** 3 - Both collection and message box *****;
&oSession.PSMessagesMode = 1;
rem ***** Get the Component Interface *****;
&oCiDependBenef = &oSession.GetCompIntfc(CompIntfc.CI_DEPEND_BENEF);
If &oCiDependBenef = Null Then
errorHandler();
throw CreateException(0, 0, "GetCompIntfc failed");
End-If;
rem ***** Set the Component Interface Mode *****;
&oCiDependBenef.InteractiveMode = False;
&oCiDependBenef.GetHistoryItems = True;
&oCiDependBenef.EditHistoryItems = False;
rem ***** Set Component Interface Get/Create Keys *****;
&oCiDependBenef.EMPLID = &deprs(&i).HCX_DEPEND_STG.EMPLID.Value;
rem ***** Execute Get *****;
If Not &oCiDependBenef.Get() Then
rem ***** No rows exist for the specified keys.*****;
errorHandler();
throw CreateException(0, 0, "Get failed");
End-If;
rem ***** Begin: Get/Set Component Interface Properties *****;
rem ***** Set/Get DEP_BEN Collection Field Properties -- Parent: PS_ROOT Collection *****;
&oDepBenCollection = &oCiDependBenef.DEP_BEN;
&count = &oDepBenCollection.count;
&fileLog.WriteLine("count = " | &count);
Local integer &i18;
If &i > 1 Then
&oDepBen = &oDepBenCollection.INSERTItem(1);
End-If;
For &i18 = 1 To &oDepBenCollection.Count;
If &i = 1 Then
&oDepBen = &oDepBenCollection.Item(&i18);
End-If;
&oDepBen.DEPENDENT_BENEF = &deprs(&i).HCX_DEPEND_STG.DEPENDENT_BENEF.Value;
&depid = &deprs(&i).HCX_DEPEND_STG.DEPENDENT_BENEF.Value;
&fileLog.WriteLine("&oDepBen.DEPENDENT_BENEF = " | &oDepBen.DEPENDENT_BENEF);
&oDepBen.BIRTHDATE = DateValue(&deprs(&i).HCX_DEPEND_STG.DATE_OPTION.Value);
&fileLog.WriteLine("&oDepBen.BIRTHDATE = " | &oDepBen.BIRTHDATE);
&fileLog.WriteLine("&oDepBen.BIRTHPLACE = " | &oDepBen.BIRTHPLACE);
rem &oDepBen.BIRTHPLACE = [*];
&oDepBen.BIRTHCOUNTRY = &deprs(&i).HCX_DEPEND_STG.BIRTHCOUNTRY.Value;
&fileLog.WriteLine("&oDepBen.BIRTHCOUNTRY = " | &oDepBen.BIRTHCOUNTRY);
&BIRTHSTATE = &deprs(&i).HCX_DEPEND_STG.BIRTHSTATE.Value;
&oDepBen.BIRTHSTATE = &deprs(&i).HCX_DEPEND_STG.BIRTHSTATE.Value;
&fileLog.WriteLine("&oDepBen.BIRTHSTATE = " | &oDepBen.BIRTHSTATE);
&fileLog.WriteLine("&oDepBen.DT_OF_DEATH = " | &oDepBen.DT_OF_DEATH);
rem &oDepBen.DT_OF_DEATH = [*];
&oDepBen.PHONE = &deprs(&i).HCX_DEPEND_STG.PHONE.Value;
&fileLog.WriteLine("&oDepBen.PHONE = " | &oDepBen.PHONE);
&oDepBen.SAME_PHONE_EMPL = &deprs(&i).HCX_DEPEND_STG.SAME_PHONE_EMPL.Value;
&fileLog.WriteLine("&oDepBen.SAME_PHONE_EMPL = " | &oDepBen.SAME_PHONE_EMPL);
&fileLog.WriteLine("&oDepBen.PHONE_TYPE = " | &oDepBen.PHONE_TYPE);
rem &oDepBen.PHONE_TYPE = [*];
&fileLog.WriteLine("&oDepBen.CSB_ELIG = " | &oDepBen.CSB_ELIG);
rem &oDepBen.CSB_ELIG = [*];
&fileLog.WriteLine("&oDepBen.MEDICARE_ENTLD_DT = " | &oDepBen.MEDICARE_ENTLD_DT);
rem &oDepBen.MEDICARE_ENTLD_DT = [*];
&fileLog.WriteLine("&oDepBen.FP_DEPEND_EMPLID = " | &oDepBen.FP_DEPEND_EMPLID);
rem &oDepBen.FP_DEPEND_EMPLID = [*];
&fileLog.WriteLine("&oDepBen.FP_STAT_FONC = " | &oDepBen.FP_STAT_FONC);
rem &oDepBen.FP_STAT_FONC = [*];
&fileLog.WriteLine("&oDepBen.FP_EMPLOYER_NAME = " | &oDepBen.FP_EMPLOYER_NAME);
rem &oDepBen.FP_EMPLOYER_NAME = [*];
&fileLog.WriteLine("&oDepBen.FP_SAME_PUBL_SCE = " | &oDepBen.FP_SAME_PUBL_SCE);
rem &oDepBen.FP_SAME_PUBL_SCE = [*];
&fileLog.WriteLine("&oDepBen.DEP_ELIGIBLE_UK = " | &oDepBen.DEP_ELIGIBLE_UK);
rem &oDepBen.DEP_ELIGIBLE_UK = [*];
&fileLog.WriteLine("&oDepBen.DEP_ADOPTED_UK = " | &oDepBen.DEP_ADOPTED_UK);
rem &oDepBen.DEP_ADOPTED_UK = [*];
&fileLog.WriteLine("&oDepBen.DEP_ADOPTION_DT_UK = " | &oDepBen.DEP_ADOPTION_DT_UK);
rem &oDepBen.DEP_ADOPTION_DT_UK = [*];
&fileLog.WriteLine("&oDepBen.DEP_CERTIFICATE_UK = " | &oDepBen.DEP_CERTIFICATE_UK);
rem &oDepBen.DEP_CERTIFICATE_UK = [*];
&fileLog.WriteLine("&oDepBen.GVT_FEHB_IND = " | &oDepBen.GVT_FEHB_IND);
rem &oDepBen.GVT_FEHB_IND = [*];
&fileLog.WriteLine("&oDepBen.GVT_DEP_BENEF_PLAN = " | &oDepBen.GVT_DEP_BENEF_PLAN);
rem &oDepBen.GVT_DEP_BENEF_PLAN = [*];
&fileLog.WriteLine("BENNAME BEG");
rem ***** Set DEP_BEN_NAME Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepBenNameCollection = &oDepBen.DEP_BEN_NAME;
Local integer &i232;
If &i > 1 Then
&oDepBenName = &oDepBenNameCollection.INSERTItem(1);
End-If;
For &i232 = 1 To &oDepBenNameCollection.Count;
If &i = 1 Then
&oDepBenName = &oDepBenNameCollection.Item(&i232);
End-If;
&oDepBenName.EFFDT = DateValue(&deprs(&i).HCX_DEPEND_STG.ADJUST_DATE2_ALIAS.Value);
&fileLog.WriteLine("&oDepBenName.EFFDT = " | &oDepBenName.EFFDT);
rem &oDepBenName.COUNTRY_NM_FORMAT = &deprs(&i).HCX_DEPEND_STG.COUNTRY_NM_FORMAT.Value;
&oDepBenName.COUNTRY_NM_FORMAT = "001";
&fileLog.WriteLine("&oDepBenName.COUNTRY_NM_FORMAT = " | &oDepBenName.COUNTRY_NM_FORMAT);
&fileLog.WriteLine("&oDepBenName.NAME_INITIALS = " | &oDepBenName.NAME_INITIALS);
rem &oDepBenName.NAME_INITIALS = [*];
&fileLog.WriteLine("&oDepBenName.NAME_PREFIX = " | &oDepBenName.NAME_PREFIX);
rem &oDepBenName.NAME_PREFIX = [*];
&fileLog.WriteLine("&oDepBenName.NAME_SUFFIX = " | &oDepBenName.NAME_SUFFIX);
rem &oDepBenName.NAME_SUFFIX = [*];
&fileLog.WriteLine("&oDepBenName.NAME_ROYAL_PREFIX = " | &oDepBenName.NAME_ROYAL_PREFIX);
rem &oDepBenName.NAME_ROYAL_PREFIX = [*];
&fileLog.WriteLine("&oDepBenName.NAME_ROYAL_SUFFIX = " | &oDepBenName.NAME_ROYAL_SUFFIX);
rem &oDepBenName.NAME_ROYAL_SUFFIX = [*];
&fileLog.WriteLine("&oDepBenName.NAME_TITLE = " | &oDepBenName.NAME_TITLE);
rem &oDepBenName.NAME_TITLE = [*];
&oDepBenName.LAST_NAME = &deprs(&i).HCX_DEPEND_STG.LAST_NAME.Value;
&lname = &deprs(&i).HCX_DEPEND_STG.LAST_NAME.Value;
&fileLog.WriteLine("&oDepBenName.LAST_NAME = " | &oDepBenName.LAST_NAME);
&oDepBenName.FIRST_NAME = &deprs(&i).HCX_DEPEND_STG.FIRST_NAME.Value;
&fname = &deprs(&i).HCX_DEPEND_STG.FIRST_NAME.Value;
&fileLog.WriteLine("&oDepBenName.FIRST_NAME = " | &oDepBenName.FIRST_NAME);
&oDepBenName.MIDDLE_NAME = &deprs(&i).HCX_DEPEND_STG.MIDDLE_NAME.Value;
&fileLog.WriteLine("&oDepBenName.MIDDLE_NAME = " | &oDepBenName.MIDDLE_NAME);
&fileLog.WriteLine("&oDepBenName.SECOND_LAST_NAME = " | &oDepBenName.SECOND_LAST_NAME);
rem &oDepBenName.SECOND_LAST_NAME = [*];
&fileLog.WriteLine("&oDepBenName.NAME_AC = " | &oDepBenName.NAME_AC);
rem &oDepBenName.NAME_AC = [*];
&fileLog.WriteLine("&oDepBenName.PREF_FIRST_NAME = " | &oDepBenName.PREF_FIRST_NAME);
rem &oDepBenName.PREF_FIRST_NAME = [*];
&fileLog.WriteLine("&oDepBenName.PARTNER_LAST_NAME = " | &oDepBenName.PARTNER_LAST_NAME);
rem &oDepBenName.PARTNER_LAST_NAME = [*];
&fileLog.WriteLine("&oDepBenName.PARTNER_ROY_PREFIX = " | &oDepBenName.PARTNER_ROY_PREFIX);
rem &oDepBenName.PARTNER_ROY_PREFIX = [*];
&fileLog.WriteLine("&oDepBenName.LAST_NAME_PREF_NLD = " | &oDepBenName.LAST_NAME_PREF_NLD);
rem &oDepBenName.LAST_NAME_PREF_NLD = [*];
End-For;
&fileLog.WriteLine("BENNAME END");
rem ***** Set DEP_BEN_ADDR Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepBenAddrCollection = &oDepBen.DEP_BEN_ADDR;
Local integer &i256;
If &i > 1 Then
&oDepBenAddr = &oDepBenAddrCollection.INSERTItem(1);
End-If;
For &i256 = 1 To &oDepBenAddrCollection.Count;
If &i = 1 Then
&oDepBenAddr = &oDepBenAddrCollection.Item(&i256);
End-If;
&oDepBenAddr.EFFDT_1 = DateValue(&deprs(&i).HCX_DEPEND_STG.ADJUST_DATE2_ALIAS.Value);
&fileLog.WriteLine("&oDepBenAddr.EFFDT_1 = " | &oDepBenAddr.EFFDT_1);
&oDepBenAddr.SAME_ADDRESS_EMPL = &deprs(&i).HCX_DEPEND_STG.SAME_ADDRESS_EMPL.Value;
&fileLog.WriteLine("&oDepBenAddr.SAME_ADDRESS_EMPL = " | &oDepBenAddr.SAME_ADDRESS_EMPL);
&oDepBenAddr.COUNTRY = &deprs(&i).HCX_DEPEND_STG.COUNTRY.Value;
&fileLog.WriteLine("&oDepBenAddr.COUNTRY = " | &oDepBenAddr.COUNTRY);
&fileLog.WriteLine("&oDepBenAddr.ADDRESS1 = " | &oDepBenAddr.ADDRESS1);
rem &oDepBenAddr.ADDRESS1 = [*];
&fileLog.WriteLine("&oDepBenAddr.ADDRESS2 = " | &oDepBenAddr.ADDRESS2);
rem &oDepBenAddr.ADDRESS2 = [*];
&fileLog.WriteLine("&oDepBenAddr.ADDRESS3 = " | &oDepBenAddr.ADDRESS3);
rem &oDepBenAddr.ADDRESS3 = [*];
&fileLog.WriteLine("&oDepBenAddr.ADDRESS4 = " | &oDepBenAddr.ADDRESS4);
rem &oDepBenAddr.ADDRESS4 = [*];
&fileLog.WriteLine("&oDepBenAddr.CITY = " | &oDepBenAddr.CITY);
rem &oDepBenAddr.CITY = [*];
&fileLog.WriteLine("&oDepBenAddr.NUM1 = " | &oDepBenAddr.NUM1);
rem &oDepBenAddr.NUM1 = [*];
&fileLog.WriteLine("&oDepBenAddr.NUM2 = " | &oDepBenAddr.NUM2);
rem &oDepBenAddr.NUM2 = [*];
&fileLog.WriteLine("&oDepBenAddr.HOUSE_TYPE = " | &oDepBenAddr.HOUSE_TYPE);
rem &oDepBenAddr.HOUSE_TYPE = [*];
&fileLog.WriteLine("&oDepBenAddr.ADDR_FIELD1 = " | &oDepBenAddr.ADDR_FIELD1);
rem &oDepBenAddr.ADDR_FIELD1 = [*];
&fileLog.WriteLine("&oDepBenAddr.ADDR_FIELD2 = " | &oDepBenAddr.ADDR_FIELD2);
rem &oDepBenAddr.ADDR_FIELD2 = [*];
&fileLog.WriteLine("&oDepBenAddr.ADDR_FIELD3 = " | &oDepBenAddr.ADDR_FIELD3);
rem &oDepBenAddr.ADDR_FIELD3 = [*];
&fileLog.WriteLine("&oDepBenAddr.COUNTY = " | &oDepBenAddr.COUNTY);
rem &oDepBenAddr.COUNTY = [*];
&fileLog.WriteLine("&oDepBenAddr.STATE = " | &oDepBenAddr.STATE);
rem &oDepBenAddr.STATE = [*];
&fileLog.WriteLine("&oDepBenAddr.POSTAL = " | &oDepBenAddr.POSTAL);
rem &oDepBenAddr.POSTAL = [*];
&fileLog.WriteLine("&oDepBenAddr.GEO_CODE = " | &oDepBenAddr.GEO_CODE);
rem &oDepBenAddr.GEO_CODE = [*];
&fileLog.WriteLine("&oDepBenAddr.IN_CITY_LIMIT = " | &oDepBenAddr.IN_CITY_LIMIT);
rem &oDepBenAddr.IN_CITY_LIMIT = [*];
&fileLog.WriteLine("&oDepBenAddr.ADDRESS_TYPE = " | &oDepBenAddr.ADDRESS_TYPE);
rem &oDepBenAddr.ADDRESS_TYPE = [*];
End-For;
rem ***** Set DEPBEN_RIDER Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepbenRiderCollection = &oDepBen.DEPBEN_RIDER;
Local integer &i277;
For &i277 = 1 To &oDepbenRiderCollection.Count;
&oDepbenRider = &oDepbenRiderCollection.Item(&i277);
&fileLog.WriteLine("&oDepbenRider.PLAN_TYPE = " | &oDepbenRider.PLAN_TYPE);
rem &oDepbenRider.PLAN_TYPE = [*];
&fileLog.WriteLine("&oDepbenRider.START_DT = " | &oDepbenRider.START_DT);
rem &oDepbenRider.START_DT = [*];
&fileLog.WriteLine("&oDepbenRider.EFFSEQ = " | &oDepbenRider.EFFSEQ);
rem &oDepbenRider.EFFSEQ = [*];
&fileLog.WriteLine("&oDepbenRider.EFF_STATUS = " | &oDepbenRider.EFF_STATUS);
rem &oDepbenRider.EFF_STATUS = [*];
&fileLog.WriteLine("&oDepbenRider.END_DT = " | &oDepbenRider.END_DT);
rem &oDepbenRider.END_DT = [*];
&fileLog.WriteLine("&oDepbenRider.STATE_2 = " | &oDepbenRider.STATE_2);
rem &oDepbenRider.STATE_2 = [*];
&fileLog.WriteLine("&oDepbenRider.BEN_COURT_ORDR_NUM = " | &oDepbenRider.BEN_COURT_ORDR_NUM);
rem &oDepbenRider.BEN_COURT_ORDR_NUM = [*];
&fileLog.WriteLine("&oDepbenRider.RIDER_TYPE = " | &oDepbenRider.RIDER_TYPE);
rem &oDepbenRider.RIDER_TYPE = [*];
End-For;
rem ***** Set DEPENDENT_PHONE Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDependentPhoneCollection = &oDepBen.DEPENDENT_PHONE;
Local integer &i286;
For &i286 = 1 To &oDependentPhoneCollection.Count;
&oDependentPhone = &oDependentPhoneCollection.Item(&i286);
&fileLog.WriteLine("&oDependentPhone.PHONE_0 = " | &oDependentPhone.PHONE_0);
rem &oDependentPhone.PHONE_0 = [*];
End-For;
rem ***** Set DEP_BEN_EFF Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepBenEffCollection = &oDepBen.DEP_BEN_EFF;
Local integer &i288;
If &i > 1 Then
&oDepBenEff = &oDepBenEffCollection.INSERTItem(1);
End-If;
For &i288 = 1 To &oDepBenEffCollection.Count;
If &i = 1 Then
&oDepBenEff = &oDepBenEffCollection.Item(&i288);
End-If;
&oDepBenEff.EFFDT_3 = DateValue(&deprs(&i).HCX_DEPEND_STG.ADJUST_DATE2_ALIAS.Value);
&fileLog.WriteLine("&oDepBenEff.EFFDT_3 = " | &oDepBenEff.EFFDT_3);
&oDepBenEff.RELATIONSHIP = &deprs(&i).HCX_DEPEND_STG.RELATIONSHIP.Value;
&fileLog.WriteLine("&oDepBenEff.RELATIONSHIP = " | &oDepBenEff.RELATIONSHIP);
&oDepBenEff.DEP_BENEF_TYPE = &deprs(&i).HCX_DEPEND_STG.DEP_BENEF_TYPE.Value;
&fileLog.WriteLine("&oDepBenEff.DEP_BENEF_TYPE = " | &oDepBenEff.DEP_BENEF_TYPE);
&oDepBenEff.MAR_STATUS = &deprs(&i).HCX_DEPEND_STG.MAR_STATUS.Value;
&fileLog.WriteLine("&oDepBenEff.MAR_STATUS = " | &oDepBenEff.MAR_STATUS);
&oDepBenEff.MAR_STATUS_DT = &deprs(&i).HCX_DEPEND_STG.DATE_FROM_ALIAS.Value;
&fileLog.WriteLine("&oDepBenEff.MAR_STATUS_DT = " | &oDepBenEff.MAR_STATUS_DT);
&oDepBenEff.SEX = &deprs(&i).HCX_DEPEND_STG.SEX.Value;
&fileLog.WriteLine("&oDepBenEff.SEX = " | &oDepBenEff.SEX);
&fileLog.WriteLine("&oDepBenEff.OCCUPATION = " | &oDepBenEff.OCCUPATION);
rem &oDepBenEff.OCCUPATION = [*];
&fileLog.WriteLine("&oDepBenEff.STUDENT = " | &oDepBenEff.STUDENT);
rem &oDepBenEff.STUDENT = [*];
&fileLog.WriteLine("&oDepBenEff.DISABLED = " | &oDepBenEff.DISABLED);
rem &oDepBenEff.DISABLED = [*];
&fileLog.WriteLine("&oDepBenEff.STUDENT_STATUS_DT = " | &oDepBenEff.STUDENT_STATUS_DT);
rem &oDepBenEff.STUDENT_STATUS_DT = [*];
&fileLog.WriteLine("&oDepBenEff.DISABLED_STATUS_DT = " | &oDepBenEff.DISABLED_STATUS_DT);
rem &oDepBenEff.DISABLED_STATUS_DT = [*];
&fileLog.WriteLine("&oDepBenEff.SMOKER = " | &oDepBenEff.SMOKER);
rem &oDepBenEff.SMOKER = [*];
&fileLog.WriteLine("&oDepBenEff.SMOKER_DT = " | &oDepBenEff.SMOKER_DT);
rem &oDepBenEff.SMOKER_DT = [*];
rem ***** Set DEP_BENEF_MYS Collection Field Properties -- Parent: DEP_BEN_EFF Collection *****;
&oDepBenefMysCollection = &oDepBenEff.DEP_BENEF_MYS;
Local integer &i3102;
For &i3102 = 1 To &oDepBenefMysCollection.Count;
&oDepBenefMys = &oDepBenefMysCollection.Item(&i3102);
&fileLog.WriteLine("&oDepBenefMys.FULLTM_STUDENT_MYS = " | &oDepBenefMys.FULLTM_STUDENT_MYS);
rem &oDepBenefMys.FULLTM_STUDENT_MYS = [*];
&fileLog.WriteLine("&oDepBenefMys.FULLTM_STU_OUT_MYS = " | &oDepBenefMys.FULLTM_STU_OUT_MYS);
rem &oDepBenefMys.FULLTM_STU_OUT_MYS = [*];
&fileLog.WriteLine("&oDepBenefMys.FULLTM_STDNT_MRT = " | &oDepBenefMys.FULLTM_STDNT_MRT);
rem &oDepBenefMys.FULLTM_STDNT_MRT = [*];
End-For;
rem ***** Set DEP_BENEF_ARG Collection Field Properties -- Parent: DEP_BEN_EFF Collection *****;
&oDepBenefArgCollection = &oDepBenEff.DEP_BENEF_ARG;
Local integer &i3106;
For &i3106 = 1 To &oDepBenefArgCollection.Count;
&oDepBenefArg = &oDepBenefArgCollection.Item(&i3106);
&fileLog.WriteLine("&oDepBenefArg.EDUCATION_LVL_ARG = " | &oDepBenefArg.EDUCATION_LVL_ARG);
rem &oDepBenefArg.EDUCATION_LVL_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.CERT_ST_ARG = " | &oDepBenefArg.CERT_ST_ARG);
rem &oDepBenefArg.CERT_ST_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.CERT_ST_YEAR_ARG = " | &oDepBenefArg.CERT_ST_YEAR_ARG);
rem &oDepBenefArg.CERT_ST_YEAR_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.CERT_END_ARG = " | &oDepBenefArg.CERT_END_ARG);
rem &oDepBenefArg.CERT_END_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.CERT_END_YEAR_ARG = " | &oDepBenefArg.CERT_END_YEAR_ARG);
rem &oDepBenefArg.CERT_END_YEAR_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.FAM_ALLW_ARG = " | &oDepBenefArg.FAM_ALLW_ARG);
rem &oDepBenefArg.FAM_ALLW_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.FAM_TERM_DT_ARG = " | &oDepBenefArg.FAM_TERM_DT_ARG);
rem &oDepBenefArg.FAM_TERM_DT_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.INC_TAX_DEPEN_ARG = " | &oDepBenefArg.INC_TAX_DEPEN_ARG);
rem &oDepBenefArg.INC_TAX_DEPEN_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.INC_TAX_BGNDT_ARG = " | &oDepBenefArg.INC_TAX_BGNDT_ARG);
rem &oDepBenefArg.INC_TAX_BGNDT_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.INC_TAX_ENDDT_ARG = " | &oDepBenefArg.INC_TAX_ENDDT_ARG);
rem &oDepBenefArg.INC_TAX_ENDDT_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.SOC_SEC_CON_ARG = " | &oDepBenefArg.SOC_SEC_CON_ARG);
rem &oDepBenefArg.SOC_SEC_CON_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.SOC_SEC_BGNDT_ARG = " | &oDepBenefArg.SOC_SEC_BGNDT_ARG);
rem &oDepBenefArg.SOC_SEC_BGNDT_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.SOC_SEC_ENDDT_ARG = " | &oDepBenefArg.SOC_SEC_ENDDT_ARG);
rem &oDepBenefArg.SOC_SEC_ENDDT_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.DOC_ISSUE_DT_ARG = " | &oDepBenefArg.DOC_ISSUE_DT_ARG);
rem &oDepBenefArg.DOC_ISSUE_DT_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.BOOK_ARG = " | &oDepBenefArg.BOOK_ARG);
rem &oDepBenefArg.BOOK_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.FOLIO_ARG = " | &oDepBenefArg.FOLIO_ARG);
rem &oDepBenefArg.FOLIO_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.ACT_NUMBER_ARG = " | &oDepBenefArg.ACT_NUMBER_ARG);
rem &oDepBenefArg.ACT_NUMBER_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.BIRTH_MARRG_CD_ARG = " | &oDepBenefArg.BIRTH_MARRG_CD_ARG);
rem &oDepBenefArg.BIRTH_MARRG_CD_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.BIRTH_MARRG_PL_ARG = " | &oDepBenefArg.BIRTH_MARRG_PL_ARG);
rem &oDepBenefArg.BIRTH_MARRG_PL_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.BIRTH_MARRG_ST_ARG = " | &oDepBenefArg.BIRTH_MARRG_ST_ARG);
rem &oDepBenefArg.BIRTH_MARRG_ST_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.COMMUNE_ARG = " | &oDepBenefArg.COMMUNE_ARG);
rem &oDepBenefArg.COMMUNE_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.TRIBUNAL_ARG = " | &oDepBenefArg.TRIBUNAL_ARG);
rem &oDepBenefArg.TRIBUNAL_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.COURT_NBR_ARG = " | &oDepBenefArg.COURT_NBR_ARG);
rem &oDepBenefArg.COURT_NBR_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.SECRETARY_NBR_ARG = " | &oDepBenefArg.SECRETARY_NBR_ARG);
rem &oDepBenefArg.SECRETARY_NBR_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.SCHOOL_YEAR_ARG = " | &oDepBenefArg.SCHOOL_YEAR_ARG);
rem &oDepBenefArg.SCHOOL_YEAR_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.SCHOOL_TYPE_ARG = " | &oDepBenefArg.SCHOOL_TYPE_ARG);
rem &oDepBenefArg.SCHOOL_TYPE_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.DJ_TEXT_ARG = " | &oDepBenefArg.DJ_TEXT_ARG);
rem &oDepBenefArg.DJ_TEXT_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.DOC_CODE_ARG = " | &oDepBenefArg.DOC_CODE_ARG);
rem &oDepBenefArg.DOC_CODE_ARG = [*];
&fileLog.WriteLine("&oDepBenefArg.OVRSEAS_DOC_CD_ARG = " | &oDepBenefArg.OVRSEAS_DOC_CD_ARG);
rem &oDepBenefArg.OVRSEAS_DOC_CD_ARG = [*];
End-For;
rem ***** Set DEP_BENEF_DEU Collection Field Properties -- Parent: DEP_BEN_EFF Collection *****;
&oDepBenefDeuCollection = &oDepBenEff.DEP_BENEF_DEU;
Local integer &i3138;
For &i3138 = 1 To &oDepBenefDeuCollection.Count;
&oDepBenefDeu = &oDepBenefDeuCollection.Item(&i3138);
&fileLog.WriteLine("&oDepBenefDeu.GPS_FAM_ALLOW_IND = " | &oDepBenefDeu.GPS_FAM_ALLOW_IND);
rem &oDepBenefDeu.GPS_FAM_ALLOW_IND = [*];
&fileLog.WriteLine("&oDepBenefDeu.GPS_EXTRA_PAY_IND = " | &oDepBenefDeu.GPS_EXTRA_PAY_IND);
rem &oDepBenefDeu.GPS_EXTRA_PAY_IND = [*];
&fileLog.WriteLine("&oDepBenefDeu.GPS_EXTRA_PAY2_IND = " | &oDepBenefDeu.GPS_EXTRA_PAY2_IND);
rem &oDepBenefDeu.GPS_EXTRA_PAY2_IND = [*];
&fileLog.WriteLine("&oDepBenefDeu.GPS_ENTITLMT_TYPE = " | &oDepBenefDeu.GPS_ENTITLMT_TYPE);
rem &oDepBenefDeu.GPS_ENTITLMT_TYPE = [*];
&fileLog.WriteLine("&oDepBenefDeu.GPDE_DV_TIME = " | &oDepBenefDeu.GPDE_DV_TIME);
rem &oDepBenefDeu.GPDE_DV_TIME = [*];
&fileLog.WriteLine("&oDepBenefDeu.EMPLOYER = " | &oDepBenefDeu.EMPLOYER);
rem &oDepBenefDeu.EMPLOYER = [*];
&fileLog.WriteLine("&oDepBenefDeu.ADDRESS1_0 = " | &oDepBenefDeu.ADDRESS1_0);
rem &oDepBenefDeu.ADDRESS1_0 = [*];
&fileLog.WriteLine("&oDepBenefDeu.ADDRESS2_0 = " | &oDepBenefDeu.ADDRESS2_0);
rem &oDepBenefDeu.ADDRESS2_0 = [*];
&fileLog.WriteLine("&oDepBenefDeu.ADDRESS4_0 = " | &oDepBenefDeu.ADDRESS4_0);
rem &oDepBenefDeu.ADDRESS4_0 = [*];
&fileLog.WriteLine("&oDepBenefDeu.POSTAL_1 = " | &oDepBenefDeu.POSTAL_1);
rem &oDepBenefDeu.POSTAL_1 = [*];
&fileLog.WriteLine("&oDepBenefDeu.CITY_2 = " | &oDepBenefDeu.CITY_2);
rem &oDepBenefDeu.CITY_2 = [*];
&fileLog.WriteLine("&oDepBenefDeu.STATE_3 = " | &oDepBenefDeu.STATE_3);
rem &oDepBenefDeu.STATE_3 = [*];
&fileLog.WriteLine("&oDepBenefDeu.GPDE_AL_SEQCE_NBR = " | &oDepBenefDeu.GPDE_AL_SEQCE_NBR);
rem &oDepBenefDeu.GPDE_AL_SEQCE_NBR = [*];
&fileLog.WriteLine("&oDepBenefDeu.GPS_EMPL_RCD_PAYEE = " | &oDepBenefDeu.GPS_EMPL_RCD_PAYEE);
rem &oDepBenefDeu.GPS_EMPL_RCD_PAYEE = [*];
&fileLog.WriteLine("&oDepBenefDeu.DISABLED_TYPE = " | &oDepBenefDeu.DISABLED_TYPE);
rem &oDepBenefDeu.DISABLED_TYPE = [*];
&fileLog.WriteLine("&oDepBenefDeu.HANDICAP_PERCENT = " | &oDepBenefDeu.HANDICAP_PERCENT);
rem &oDepBenefDeu.HANDICAP_PERCENT = [*];
End-For;
End-For;
&fileLog.WriteLine("BEL BEG");
rem ***** Set DEP_BENEF_BEL Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepBenefBelCollection = &oDepBen.DEP_BENEF_BEL;
Local integer &i2156;
For &i2156 = 1 To &oDepBenefBelCollection.Count;
&oDepBenefBel = &oDepBenefBelCollection.Item(&i2156);
&fileLog.WriteLine("&oDepBenefBel.EFFDT_5 = " | &oDepBenefBel.EFFDT_5);
rem &oDepBenefBel.EFFDT_5 = [*];
&fileLog.WriteLine("&oDepBenefBel.ORPHAN_BEL = " | &oDepBenefBel.ORPHAN_BEL);
rem &oDepBenefBel.ORPHAN_BEL = [*];
&fileLog.WriteLine("&oDepBenefBel.FISCAL_DEPEND_BEL = " | &oDepBenefBel.FISCAL_DEPEND_BEL);
rem &oDepBenefBel.FISCAL_DEPEND_BEL = [*];
&fileLog.WriteLine("&oDepBenefBel.FISCAL_DISABL_BEL = " | &oDepBenefBel.FISCAL_DISABL_BEL);
rem &oDepBenefBel.FISCAL_DISABL_BEL = [*];
&fileLog.WriteLine("&oDepBenefBel.PROF_SPOUSE_BEL = " | &oDepBenefBel.PROF_SPOUSE_BEL);
rem &oDepBenefBel.PROF_SPOUSE_BEL = [*];
&fileLog.WriteLine("&oDepBenefBel.FISCAL_SITUAT_BEL = " | &oDepBenefBel.FISCAL_SITUAT_BEL);
rem &oDepBenefBel.FISCAL_SITUAT_BEL = [*];
&fileLog.WriteLine("&oDepBenefBel.FAM_ALLOW_BEL = " | &oDepBenefBel.FAM_ALLOW_BEL);
rem &oDepBenefBel.FAM_ALLOW_BEL = [*];
End-For;
&fileLog.WriteLine("BEL END");
&fileLog.WriteLine("FRA BEG");
rem ***** Set DEP_BENEF_FRA Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepBenefFraCollection = &oDepBen.DEP_BENEF_FRA;
Local integer &i2164;
For &i2164 = 1 To &oDepBenefFraCollection.Count;
&oDepBenefFra = &oDepBenefFraCollection.Item(&i2164);
&fileLog.WriteLine("&oDepBenefFra.EFFDT_7 = " | &oDepBenefFra.EFFDT_7);
rem &oDepBenefFra.EFFDT_7 = [*];
&fileLog.WriteLine("&oDepBenefFra.FAMILY_SUP_STS_FRA = " | &oDepBenefFra.FAMILY_SUP_STS_FRA);
rem &oDepBenefFra.FAMILY_SUP_STS_FRA = [*];
&fileLog.WriteLine("&oDepBenefFra.GARNISH_STS_FRA = " | &oDepBenefFra.GARNISH_STS_FRA);
rem &oDepBenefFra.GARNISH_STS_FRA = [*];
&fileLog.WriteLine("&oDepBenefFra.AFB_ALLOW_STS_FRA = " | &oDepBenefFra.AFB_ALLOW_STS_FRA);
rem &oDepBenefFra.AFB_ALLOW_STS_FRA = [*];
&fileLog.WriteLine("&oDepBenefFra.CHIC_STS_FRA = " | &oDepBenefFra.CHIC_STS_FRA);
rem &oDepBenefFra.CHIC_STS_FRA = [*];
&fileLog.WriteLine("&oDepBenefFra.SCHOOL_PR_STS_FRA = " | &oDepBenefFra.SCHOOL_PR_STS_FRA);
rem &oDepBenefFra.SCHOOL_PR_STS_FRA = [*];
&fileLog.WriteLine("&oDepBenefFra.HOLIDAY_PR_STS_FRA = " | &oDepBenefFra.HOLIDAY_PR_STS_FRA);
rem &oDepBenefFra.HOLIDAY_PR_STS_FRA = [*];
&fileLog.WriteLine("&oDepBenefFra.DEP_BEN_STS_7_FRA = " | &oDepBenefFra.DEP_BEN_STS_7_FRA);
rem &oDepBenefFra.DEP_BEN_STS_7_FRA = [*];
&fileLog.WriteLine("&oDepBenefFra.DEP_BEN_STS_8_FRA = " | &oDepBenefFra.DEP_BEN_STS_8_FRA);
rem &oDepBenefFra.DEP_BEN_STS_8_FRA = [*];
&fileLog.WriteLine("&oDepBenefFra.DEP_BEN_STS_9_FRA = " | &oDepBenefFra.DEP_BEN_STS_9_FRA);
rem &oDepBenefFra.DEP_BEN_STS_9_FRA = [*];
&fileLog.WriteLine("&oDepBenefFra.DEP_BEN_STS_10_FRA = " | &oDepBenefFra.DEP_BEN_STS_10_FRA);
rem &oDepBenefFra.DEP_BEN_STS_10_FRA = [*];
End-For;
&fileLog.WriteLine("FRA END");
&fileLog.WriteLine("BRAEF BEG");
rem ***** Set DEP_BEN_EFF_BRA Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepBenEffBraCollection = &oDepBen.DEP_BEN_EFF_BRA;
Local integer &i2176;
For &i2176 = 1 To &oDepBenEffBraCollection.Count;
&oDepBenEffBra = &oDepBenEffBraCollection.Item(&i2176);
&fileLog.WriteLine("&oDepBenEffBra.EFFDT_9 = " | &oDepBenEffBra.EFFDT_9);
rem &oDepBenEffBra.EFFDT_9 = [*];
&fileLog.WriteLine("&oDepBenEffBra.STUDENT_BRA = " | &oDepBenEffBra.STUDENT_BRA);
rem &oDepBenEffBra.STUDENT_BRA = [*];
&fileLog.WriteLine("&oDepBenEffBra.EDUCATION_LVL_BRA = " | &oDepBenEffBra.EDUCATION_LVL_BRA);
rem &oDepBenEffBra.EDUCATION_LVL_BRA = [*];
&fileLog.WriteLine("&oDepBenEffBra.EDUCATION_IND_BRA = " | &oDepBenEffBra.EDUCATION_IND_BRA);
rem &oDepBenEffBra.EDUCATION_IND_BRA = [*];
&fileLog.WriteLine("&oDepBenEffBra.VACCINE_CERT_BRA = " | &oDepBenEffBra.VACCINE_CERT_BRA);
rem &oDepBenEffBra.VACCINE_CERT_BRA = [*];
&fileLog.WriteLine("&oDepBenEffBra.DISABLED_BRA = " | &oDepBenEffBra.DISABLED_BRA);
rem &oDepBenEffBra.DISABLED_BRA = [*];
&fileLog.WriteLine("&oDepBenEffBra.FAM_ALLOW_TERM_BRA = " | &oDepBenEffBra.FAM_ALLOW_TERM_BRA);
rem &oDepBenEffBra.FAM_ALLOW_TERM_BRA = [*];
&fileLog.WriteLine("&oDepBenEffBra.FAM_TERM_DT_BRA = " | &oDepBenEffBra.FAM_TERM_DT_BRA);
rem &oDepBenEffBra.FAM_TERM_DT_BRA = [*];
End-For;
&fileLog.WriteLine("BRAEFF END");
&fileLog.WriteLine("BRABEN BEG");
rem ***** Set DEP_BENEF_BRA Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepBenefBraCollection = &oDepBen.DEP_BENEF_BRA;
Local integer &i2185;
For &i2185 = 1 To &oDepBenefBraCollection.Count;
&oDepBenefBra = &oDepBenefBraCollection.Item(&i2185);
&fileLog.WriteLine("&oDepBenefBra.OFFICE_NAME = " | &oDepBenefBra.OFFICE_NAME);
rem &oDepBenefBra.OFFICE_NAME = [*];
&fileLog.WriteLine("&oDepBenefBra.REGISTRY_NUM_BRA = " | &oDepBenefBra.REGISTRY_NUM_BRA);
rem &oDepBenefBra.REGISTRY_NUM_BRA = [*];
&fileLog.WriteLine("&oDepBenefBra.BOOK_NUMBER_BRA = " | &oDepBenefBra.BOOK_NUMBER_BRA);
rem &oDepBenefBra.BOOK_NUMBER_BRA = [*];
&fileLog.WriteLine("&oDepBenefBra.PAGE_NUMBER_BRA = " | &oDepBenefBra.PAGE_NUMBER_BRA);
rem &oDepBenefBra.PAGE_NUMBER_BRA = [*];
&fileLog.WriteLine("&oDepBenefBra.DATE_RECEIVED = " | &oDepBenefBra.DATE_RECEIVED);
rem &oDepBenefBra.DATE_RECEIVED = [*];
&fileLog.WriteLine("&oDepBenefBra.MOTHER_NAME_BRA = " | &oDepBenefBra.MOTHER_NAME_BRA);
rem &oDepBenefBra.MOTHER_NAME_BRA = [*];
End-For;
&fileLog.WriteLine("BRABEN END");
rem ***** Set VACCINATION_BRA Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oVaccinationBraCollection = &oDepBen.VACCINATION_BRA;
Local integer &i2192;
For &i2192 = 1 To &oVaccinationBraCollection.Count;
&oVaccinationBra = &oVaccinationBraCollection.Item(&i2192);
&fileLog.WriteLine("&oVaccinationBra.VACCINE_DT_BRA = " | &oVaccinationBra.VACCINE_DT_BRA);
rem &oVaccinationBra.VACCINE_DT_BRA = [*];
&fileLog.WriteLine("&oVaccinationBra.VACCINE_DOSE_BRA = " | &oVaccinationBra.VACCINE_DOSE_BRA);
rem &oVaccinationBra.VACCINE_DOSE_BRA = [*];
&fileLog.WriteLine("&oVaccinationBra.VACCINE_TYPE_BRA = " | &oVaccinationBra.VACCINE_TYPE_BRA);
rem &oVaccinationBra.VACCINE_TYPE_BRA = [*];
End-For;
rem ***** Set BN_DEPBEN_EFFDT Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oBnDepbenEffdtCollection = &oDepBen.BN_DEPBEN_EFFDT;
Local integer &i2196;
For &i2196 = 1 To &oBnDepbenEffdtCollection.Count;
&oBnDepbenEffdt = &oBnDepbenEffdtCollection.Item(&i2196);
&fileLog.WriteLine("&oBnDepbenEffdt.EFFDT_11 = " | &oBnDepbenEffdt.EFFDT_11);
rem &oBnDepbenEffdt.EFFDT_11 = [*];
&fileLog.WriteLine("&oBnDepbenEffdt.MEDICARE_A_IND = " | &oBnDepbenEffdt.MEDICARE_A_IND);
rem &oBnDepbenEffdt.MEDICARE_A_IND = [*];
&fileLog.WriteLine("&oBnDepbenEffdt.MEDICARE_B_IND = " | &oBnDepbenEffdt.MEDICARE_B_IND);
rem &oBnDepbenEffdt.MEDICARE_B_IND = [*];
&fileLog.WriteLine("&oBnDepbenEffdt.MEDICARE_D_IND = " | &oBnDepbenEffdt.MEDICARE_D_IND);
rem &oBnDepbenEffdt.MEDICARE_D_IND = [*];
&fileLog.WriteLine("&oBnDepbenEffdt.MEDICARE_NUMBER = " | &oBnDepbenEffdt.MEDICARE_NUMBER);
rem &oBnDepbenEffdt.MEDICARE_NUMBER = [*];
&fileLog.WriteLine("&oBnDepbenEffdt.MEDICARE_REASON_A = " | &oBnDepbenEffdt.MEDICARE_REASON_A);
rem &oBnDepbenEffdt.MEDICARE_REASON_A = [*];
&fileLog.WriteLine("&oBnDepbenEffdt.MEDICARE_REASON_B = " | &oBnDepbenEffdt.MEDICARE_REASON_B);
rem &oBnDepbenEffdt.MEDICARE_REASON_B = [*];
&fileLog.WriteLine("&oBnDepbenEffdt.MEDICARE_REASON_D = " | &oBnDepbenEffdt.MEDICARE_REASON_D);
rem &oBnDepbenEffdt.MEDICARE_REASON_D = [*];
&fileLog.WriteLine("&oBnDepbenEffdt.MEDICARE_ELIG_RSN = " | &oBnDepbenEffdt.MEDICARE_ELIG_RSN);
rem &oBnDepbenEffdt.MEDICARE_ELIG_RSN = [*];
End-For;
rem ***** Set DEP_BENEF_NID Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepBenefNidCollection = &oDepBen.DEP_BENEF_NID;
&fileLog.WriteLine("DEPNID BEG");
Local integer &i2206;
If &i > 1 Then
&oDepBenefNid = &oDepBenefNidCollection.INSERTItem(1);
End-If;
&nidcnt = &oDepBenefNidCollection.Count;
&fileLog.WriteLine("NID Count = " | &nidcnt);
For &i2206 = 1 To &oDepBenefNidCollection.Count;
If &i = 1 Then
&oDepBenefNid = &oDepBenefNidCollection.Item(&i2206);
End-If;
&oDepBenefNid.COUNTRY_1 = &deprs(&i).HCX_DEPEND_STG.COUNTRY.Value;
&fileLog.WriteLine("&oDepBenefNid.COUNTRY_1 = " | &oDepBenefNid.COUNTRY_1);
&oDepBenefNid.NATIONAL_ID_TYPE = &deprs(&i).HCX_DEPEND_STG.NATIONAL_ID_TYPE.Value;
&fileLog.WriteLine("&oDepBenefNid.NATIONAL_ID_TYPE = " | &oDepBenefNid.NATIONAL_ID_TYPE);
&fileLog.WriteLine("&oDepBenefNid.SSN_KEY_FRA = " | &oDepBenefNid.SSN_KEY_FRA);
rem &oDepBenefNid.SSN_KEY_FRA = [*];
rem &oDepBenefNid.PRIMARY_NID = &deprs(&i).HCX_DEPEND_STG.NID_SPECIAL_CHAR.Value;
&fileLog.WriteLine("&oDepBenefNid.PRIMARY_NID = " | &oDepBenefNid.PRIMARY_NID);
&fileLog.WriteLine("&oDepBenefNid.TAX_REF_ID_SGP = " | &oDepBenefNid.TAX_REF_ID_SGP);
rem &oDepBenefNid.TAX_REF_ID_SGP = [*];
&oDepBenefNid.NID_SPECIAL_CHAR = &deprs(&i).HCX_DEPEND_STG.NID_SPECIAL_CHAR.Value;
&fileLog.WriteLine("&oDepBenefNid.NID_SPECIAL_CHAR = " | &oDepBenefNid.NID_SPECIAL_CHAR);
End-For;
&fileLog.WriteLine("DEPNID END");
rem ***** Set DEP_BENEF_CHN Collection Field Properties -- Parent: DEP_BEN Collection *****;
&oDepBenefChnCollection = &oDepBen.DEP_BENEF_CHN;
Local integer &i2213;
For &i2213 = 1 To &oDepBenefChnCollection.Count;
&oDepBenefChn = &oDepBenefChnCollection.Item(&i2213);
&fileLog.WriteLine("&oDepBenefChn.EFFDT_13 = " | &oDepBenefChn.EFFDT_13);
rem &oDepBenefChn.EFFDT_13 = [*];
&fileLog.WriteLine("&oDepBenefChn.POLITICAL_STA_CHN = " | &oDepBenefChn.POLITICAL_STA_CHN);
rem &oDepBenefChn.POLITICAL_STA_CHN = [*];
&fileLog.WriteLine("&oDepBenefChn.NATIVE_PLACE_CHN = " | &oDepBenefChn.NATIVE_PLACE_CHN);
rem &oDepBenefChn.NATIVE_PLACE_CHN = [*];
End-For;
End-For;
rem ***** End: Get/Set Component Interface Properties *****;
rem ***** Execute Save *****;
If Not &oCiDependBenef.Save() Then;
&fileLog.WriteLine(">>>>Error on depid = " | &depid);
errorHandler();
throw CreateException(0, 0, "Save failed");
rem throw CreateException(0, 0, "Save failed");
SQLExec("UPDATE PS_HCX_DEPEND_STG SET FLAG = 'E' WHERE EMPLID = :1 AND DEPENDENT_BENEF = :2 ", &deprs(&i).HCX_DEPEND_STG.EMPLID.Value, &deprs(&i).HCX_DEPEND_STG.DEPENDENT_BENEF.Value);
Else
&fileLog.WriteLine(">>>>>Success on depid = " | &depid);
SQLExec("UPDATE PS_HCX_DEPEND_STG SET FLAG = 'L' WHERE EMPLID = :1 AND DEPENDENT_BENEF = :2 ", &deprs(&i).HCX_DEPEND_STG.EMPLID.Value, &deprs(&i).HCX_DEPEND_STG.DEPENDENT_BENEF.Value);
End-If;
rem ***** Execute Cancel *****;
rem If Not &oCiDependBenef.Cancel() Then;
rem errorHandler();
rem throw CreateException(0, 0, "Cancel failed");
rem End-If;
catch Exception &ex
rem Handle the exception;
&fileLog.WriteLine(&ex.ToString());
end-try;
&fileLog.WriteLine("End");
&fileLog.WriteLine("***************************************************************************");
End-For;