hi all,
am tring to upload data to dept_tbl.
first i have uploaded data into one dept_tmp record through file layout and from that am tring to fill dept_tbl record.
in dept_tmp data is there.
while running the ci am getting following error "Invalid value -- press the prompt button or hyperlink for a list of valid values (15,11)"
i have tried hardcoding the values in ci also . result is sucessful but data in not there in dept_record.
and even i have tried lrim also ..
and plese help in this regard .
here am giving the code of that ci
/* ===>
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. */
Local File &fileLog;
Local ApiObject &oSession, &oLntDeptTblCi;
Local ApiObject &oSetDeptBuVwCollection, &oSetDeptBuVw;
Local ApiObject &oDeptTblCollection, &oDeptTbl;
Local ApiObject &oDeptTblCanCollection, &oDeptTblCan;
Local ApiObject &oDeptTblFraCollection, &oDeptTblFra;
Local ApiObject &oDeptTblChnCollection, &oDeptTblChn;
Local ApiObject &oEncumbTriggerCollection, &oEncumbTrigger;
Local ApiObject &oBudgetTriggerCollection, &oBudgetTrigger;
Local ApiObject &oScrtySettypVwCollection, &oScrtySettypVw;
Local Rowset &rec;
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;
&rec = CreateRowset(Record.DEPT_TMP);
&rec.Fill();
For &i = 1 To &rec.ActiveRowCount
try
rem ***** Set the Log File *****;
&fileLog = GetFile("C:\Temp\LNT_DEPT_TBL_CI.log", "w", "a", %FilePath_Absolute);
&fileLog.WriteLine("Begin");
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 *****;
&oLntDeptTblCi = &oSession.GetCompIntfc(CompIntfc.LNT_DEPT_TBL_CI);
If &oLntDeptTblCi = Null Then
errorHandler();
throw CreateException(0, 0, "GetCompIntfc failed");
End-If;
rem ***** Set the Component Interface Mode *****;
&oLntDeptTblCi.InteractiveMode = False;
&oLntDeptTblCi.GetHistoryItems = True;
&oLntDeptTblCi.EditHistoryItems = False;
rem ***** Set Component Interface Get/Create Keys *****;
&oLntDeptTblCi.SETID = &rec(&i).DEPT_TMP.SETID.Value;
&oLntDeptTblCi.DEPTID = &rec(&i).DEPT_TMP.DEPTID.Value;
rem ***** Execute Get *****;
/* If Not &oLntDeptTblCi.Get() Then
rem ***** No rows exist for the specified keys.*****;
errorHandler();
throw CreateException(0, 0, "Get failed");
End-If;
*/
rem ***** Execute Create ******;
If Not &oLntDeptTblCi.Create() Then
rem ***** Unable to Create Component Interface for the Add keys provided. *****;
errorHandler();
throw CreateException(0, 0, "Create failed");
End-If;
rem ***** Begin: Get/Set Component Interface Properties *****;
rem ***** Get/Set Level 0 Field Properties *****;
&fileLog.WriteLine("&oLntDeptTblCi.SETID = " | &oLntDeptTblCi.SETID);
&oLntDeptTblCi.SETID = &rec(&i).DEPT_TMP.SETID.Value;
&fileLog.WriteLine("&oLntDeptTblCi.DEPTID = " | &oLntDeptTblCi.DEPTID);
&oLntDeptTblCi.DEPTID = &rec(&i).DEPT_TMP.DEPTID.Value;
/*&fileLog.WriteLine("&oLntDeptTblCi.TRIGGER_WRK_SCROLL = " | &oLntDeptTblCi.TRIGGER_WRK_SCROLL);
rem &oLntDeptTblCi.TRIGGER_WRK_SCROLL = [*];
&fileLog.WriteLine("&oLntDeptTblCi.STATUS_CHG_INDC = " | &oLntDeptTblCi.STATUS_CHG_INDC);
rem &oLntDeptTblCi.STATUS_CHG_INDC = [*];
&fileLog.WriteLine("&oLntDeptTblCi.CURRENT_DT = " | &oLntDeptTblCi.CURRENT_DT);
rem &oLntDeptTblCi.CURRENT_DT = [*];
&fileLog.WriteLine("&oLntDeptTblCi.CURRENT_SEQ = " | &oLntDeptTblCi.CURRENT_SEQ);
rem &oLntDeptTblCi.CURRENT_SEQ = [*];
&fileLog.WriteLine("&oLntDeptTblCi.SCRTY_SET_CD = " | &oLntDeptTblCi.SCRTY_SET_CD);
rem &oLntDeptTblCi.SCRTY_SET_CD = [*];
&fileLog.WriteLine("&oLntDeptTblCi.RECNAME_SJT = " | &oLntDeptTblCi.RECNAME_SJT);
rem &oLntDeptTblCi.RECNAME_SJT = [*];
&fileLog.WriteLine("&oLntDeptTblCi.EMPLID = " | &oLntDeptTblCi.EMPLID);
rem &oLntDeptTblCi.EMPLID = [*];
&fileLog.WriteLine("&oLntDeptTblCi.EMPL_RCD = " | &oLntDeptTblCi.EMPL_RCD);
rem &oLntDeptTblCi.EMPL_RCD = [*];
&fileLog.WriteLine("&oLntDeptTblCi.POI_TYPE = " | &oLntDeptTblCi.POI_TYPE);
rem &oLntDeptTblCi.POI_TYPE = [*];
&fileLog.WriteLine("&oLntDeptTblCi.HRS_JOB_OPENING_ID = " | &oLntDeptTblCi.HRS_JOB_OPENING_ID);
rem &oLntDeptTblCi.HRS_JOB_OPENING_ID = [*]; */
rem ***** Set/Get SET_DEPT_BU_VW Collection Field Properties -- Parent: PS_ROOT Collection *****;
/* &oSetDeptBuVwCollection = &oLntDeptTblCi.SET_DEPT_BU_VW;
Local integer &i124;
For &i124 = 1 To &oSetDeptBuVwCollection.Count;
&oSetDeptBuVw = &oSetDeptBuVwCollection.Item(&i124);
&fileLog.WriteLine("&oSetDeptBuVw.SETCNTRLVALUE = " | &oSetDeptBuVw.SETCNTRLVALUE);
rem &oSetDeptBuVw.SETCNTRLVALUE = [*];
End-For;
*/
rem ***** Set/Get DEPT_TBL Collection Field Properties -- Parent: PS_ROOT Collection *****;
&oDeptTblCollection = &oLntDeptTblCi.DEPT_TBL;
Local integer &i126;
For &i126 = 1 To &oDeptTblCollection.Count;
&oDeptTbl = &oDeptTblCollection.Item(&i126);
&oDeptTbl = &oDeptTblCollection.Item(&i126);
&oDeptTbl.EFFDT = &rec(&i).DEPT_TMP.EFFDT.Value;
&fileLog.WriteLine("&oDeptTbl.EFFDT = " | &oDeptTbl.EFFDT);
&oDeptTbl.EFF_STATUS = &rec(&i).DEPT_TMP.EFF_STATUS.Value;
&fileLog.WriteLine("&oDeptTbl.EFF_STATUS = " | &oDeptTbl.EFF_STATUS);
&oDeptTbl.DESCR = &rec(&i).DEPT_TMP.DESCR.Value;
&fileLog.WriteLine("&oDeptTbl.DESCR = " | &oDeptTbl.DESCR);
&oDeptTbl.DESCR = &rec(&i).DEPT_TMP.DESCR.Value;
&oDeptTbl.DESCRSHORT = &rec(&i).DEPT_TMP.DESCRSHORT.Value;
&fileLog.WriteLine("&oDeptTbl.DESCRSHORT = " | &oDeptTbl.DESCRSHORT);
&oDeptTbl.COMPANY = &rec(&i).DEPT_TMP.COMPANY.Value;
&fileLog.WriteLine("&oDeptTbl.COMPANY = " | &oDeptTbl.COMPANY);
&oDeptTbl.SETID_LOCATION = LTrim(&rec(&i).DEPT_TMP.SETID_LOCATION.Value);
rem &oDeptTbl.SETID_LOCATION = "LNT";
&fileLog.WriteLine("&oDeptTbl.SETID_LOCATION = " | &oDeptTbl.SETID_LOCATION);
&oDeptTbl.LOCATION = LTrim(&rec(&i).DEPT_TMP.LOCATION.Value);
rem &oDeptTbl.LOCATION = 70;
&fileLog.WriteLine("&oDeptTbl.LOCATION = " | &oDeptTbl.LOCATION);
&fileLog.WriteLine("&oDeptTbl.TAX_LOCATION_CD = " | &oDeptTbl.TAX_LOCATION_CD);
rem &oDeptTbl.TAX_LOCATION_CD = [*];
rem ---- no need now-----&fileLog.WriteLine("&oDeptTbl.MANAGER_ID = " | &oDeptTbl.MANAGER_ID);
rem &oDeptTbl.MANAGER_ID = [*];
&oDeptTbl.MANAGER_POSN = &rec(&i).DEPT_TMP.MANAGER_POSN.Value;
&fileLog.WriteLine("&oDeptTbl.MANAGER_POSN = " | &oDeptTbl.MANAGER_POSN);
&oDeptTbl.BUDGET_YR_END_DT = &rec(&i).DEPT_TMP.BUDGET_YR_END_DT.Value;
&fileLog.WriteLine("&oDeptTbl.BUDGET_YR_END_DT = " | &oDeptTbl.BUDGET_YR_END_DT);
rem &fileLog.WriteLine("&oDeptTbl.BUDGET_LVL = " | &oDeptTbl.BUDGET_LVL);
rem &oDeptTbl.BUDGET_LVL = &rec(&i).DEPT_TMP.BUDGET_LVL.Value;
&oDeptTbl.GL_EXPENSE = &rec(&i).DEPT_TMP.GL_EXPENSE.Value;
&fileLog.WriteLine("&oDeptTbl.GL_EXPENSE = " | &oDeptTbl.GL_EXPENSE);
&oDeptTbl.EEO4_FUNCTION = &rec(&i).DEPT_TMP.EEO4_FUNCTION.Value;
&fileLog.WriteLine("&oDeptTbl.EEO4_FUNCTION = " | &oDeptTbl.EEO4_FUNCTION);
rem &oDeptTbl.CAN_IND_SECTOR = &rec(&i).DEPT_TMP.CAN_IND_SECTOR.Value;
rem &fileLog.WriteLine("&oDeptTbl.CAN_IND_SECTOR = " | &oDeptTbl.CAN_IND_SECTOR);
&oDeptTbl.ACCIDENT_INS = &rec(&i).DEPT_TMP.ACCIDENT_INS.Value;
&fileLog.WriteLine("&oDeptTbl.ACCIDENT_INS = " | &oDeptTbl.ACCIDENT_INS);
&oDeptTbl.SI_ACCIDENT_NUM = &rec(&i).DEPT_TMP.SI_ACCIDENT_NUM.Value;
&fileLog.WriteLine("&oDeptTbl.SI_ACCIDENT_NUM = " | &oDeptTbl.SI_ACCIDENT_NUM);
&oDeptTbl.HAZARD = &rec(&i).DEPT_TMP.HAZARD.Value;
&fileLog.WriteLine("&oDeptTbl.HAZARD = " | &oDeptTbl.HAZARD);
&oDeptTbl.ESTABID = &rec(&i).DEPT_TMP.ESTABID.Value;
&fileLog.WriteLine("&oDeptTbl.ESTABID = " | &oDeptTbl.ESTABID);
&oDeptTbl.RISKCD = &rec(&i).DEPT_TMP.RISKCD.Value;
&fileLog.WriteLine("&oDeptTbl.RISKCD = " | &oDeptTbl.RISKCD);
&oDeptTbl.FTE_EDIT_INDC = &rec(&i).DEPT_TMP.FTE_EDIT_INDC.Value;
&fileLog.WriteLine("&oDeptTbl.FTE_EDIT_INDC = " | &oDeptTbl.FTE_EDIT_INDC);
/*&fileLog.WriteLine("&oDeptTbl.DEPT_TENURE_FLG = " | &oDeptTbl.DEPT_TENURE_FLG);
&oDeptTbl.DEPT_TENURE_FLG = &rec(&i).DEPT_TMP.EEO4_FUNCTION.Value;*/
&oDeptTbl.TL_DISTRIB_INFO = &rec(&i).DEPT_TMP.TL_DISTRIB_INFO.Value;
&fileLog.WriteLine("&oDeptTbl.TL_DISTRIB_INFO = " | &oDeptTbl.TL_DISTRIB_INFO);
/* &fileLog.WriteLine("&oDeptTbl.USE_BUDGETS = " | &oDeptTbl.USE_BUDGETS);
&oDeptTbl.USE_BUDGETS = &rec(&i).USE_BUDGETS.VALUE;
&fileLog.WriteLine("&oDeptTbl.USE_ENCUMBRANCES = " | &oDeptTbl.USE_ENCUMBRANCES);
&oDeptTbl.USE_ENCUMBRANCES = &rec(&i).DEPT_TMP.USE_ENCUMBRANCES.Value;
*/
&oDeptTbl.USE_DISTRIBUTION = &rec(&i).DEPT_TMP.USE_DISTRIBUTION.Value;
&fileLog.WriteLine("&oDeptTbl.USE_DISTRIBUTION = " | &oDeptTbl.USE_DISTRIBUTION);
&oDeptTbl.BUDGET_DEPTID = &rec(&i).DEPT_TMP.BUDGET_DEPTID.Value;
&fileLog.WriteLine("&oDeptTbl.BUDGET_DEPTID = " | &oDeptTbl.BUDGET_DEPTID);
&oDeptTbl.HP_STATS_DEPT_CD = &rec(&i).DEPT_TMP.HP_STATS_DEPT_CD.Value;
&fileLog.WriteLine("&oDeptTbl.HP_STATS_DEPT_CD = " | &oDeptTbl.HP_STATS_DEPT_CD);
&oDeptTbl.HP_STATS_FACULTY = &rec(&i).DEPT_TMP.HP_STATS_FACULTY.Value;
&fileLog.WriteLine("&oDeptTbl.HP_STATS_FACULTY = " | &oDeptTbl.HP_STATS_FACULTY);
&oDeptTbl.HP_RTBC_OPTION = "B";
&fileLog.WriteLine("&oDeptTbl.HP_RTBC_OPTION = " | &oDeptTbl.HP_RTBC_OPTION);
&oDeptTbl.HP_AUTO_RTBC = "N";
&fileLog.WriteLine("&oDeptTbl.HP_AUTO_RTBC = " | &oDeptTbl.HP_AUTO_RTBC);
&oDeptTbl.CLASS_UNIT_NZL = &rec(&i).DEPT_TMP.CLASS_UNIT_NZL.Value;
&fileLog.WriteLine("&oDeptTbl.CLASS_UNIT_NZL = " | &oDeptTbl.CLASS_UNIT_NZL);
&oDeptTbl.ORG_UNIT_AUS = &rec(&i).DEPT_TMP.ORG_UNIT_AUS.Value;
&fileLog.WriteLine("&oDeptTbl.ORG_UNIT_AUS = " | &oDeptTbl.ORG_UNIT_AUS);
&oDeptTbl.WORK_SECTOR_AUS = &rec(&i).DEPT_TMP.WORK_SECTOR_AUS.Value;
&fileLog.WriteLine("&oDeptTbl.WORK_SECTOR_AUS = " | &oDeptTbl.WORK_SECTOR_AUS);
&oDeptTbl.APS_AGENT_CD_AUS = &rec(&i).DEPT_TMP.APS_AGENT_CD_AUS.Value;
&fileLog.WriteLine("&oDeptTbl.APS_AGENT_CD_AUS = " | &oDeptTbl.APS_AGENT_CD_AUS);
&oDeptTbl.IND_COMMITTEE_BEL = &rec(&i).DEPT_TMP.IND_COMMITTEE_BEL.Value;
&fileLog.WriteLine("&oDeptTbl.IND_COMMITTEE_BEL = " | &oDeptTbl.IND_COMMITTEE_BEL);
&oDeptTbl.NACE_CD_BEL = &rec(&i).DEPT_TMP.NACE_CD_BEL.Value;
&fileLog.WriteLine("&oDeptTbl.NACE_CD_BEL = " | &oDeptTbl.NACE_CD_BEL);
End-For;
rem ***** Set/Get BUDGET_TRIGGER Collection Field Properties -- Parent: PS_ROOT Collection *****;
&oBudgetTriggerCollection = &oLntDeptTblCi.BUDGET_TRIGGER;
/* Local integer &i183;
For &i183 = 1 To &oBudgetTriggerCollection.Count;
&oBudgetTrigger = &oBudgetTriggerCollection.Item(&i183);
&fileLog.WriteLine("&oBudgetTrigger.POSITION_POOL_ID_1 = " | &oBudgetTrigger.POSITION_POOL_ID_1);
rem &oBudgetTrigger.POSITION_POOL_ID_1 = [*];
&fileLog.WriteLine("&oBudgetTrigger.TRIGGER_RECORD_1 = " | &oBudgetTrigger.TRIGGER_RECORD_1);
rem &oBudgetTrigger.TRIGGER_RECORD_1 = [*];
&fileLog.WriteLine("&oBudgetTrigger.TIME_STAMP_1 = " | &oBudgetTrigger.TIME_STAMP_1);
rem &oBudgetTrigger.TIME_STAMP_1 = [*];
&fileLog.WriteLine("&oBudgetTrigger.PROCESSED_0 = " | &oBudgetTrigger.PROCESSED_0);
rem &oBudgetTrigger.PROCESSED_0 = [*];
End-For;
*/
rem ***** Set/Get SCRTY_SETTYP_VW Collection Field Properties -- Parent: PS_ROOT Collection *****;
/* &oScrtySettypVwCollection = &oLntDeptTblCi.SCRTY_SETTYP_VW;
Local integer &i188;
For &i188 = 1 To &oScrtySettypVwCollection.Count;
&oScrtySettypVw = &oScrtySettypVwCollection.Item(&i188);
&fileLog.WriteLine("&oScrtySettypVw.SCRTY_TYPE_CD = " | &oScrtySettypVw.SCRTY_TYPE_CD);
rem &oScrtySettypVw.SCRTY_TYPE_CD = [*];
&fileLog.WriteLine("&oScrtySettypVw.RECNAME_SJT_0 = " | &oScrtySettypVw.RECNAME_SJT_0);
rem &oScrtySettypVw.RECNAME_SJT_0 = [*];
&fileLog.WriteLine("&oScrtySettypVw.RECNAME_S_TRANS = " | &oScrtySettypVw.RECNAME_S_TRANS);
rem &oScrtySettypVw.RECNAME_S_TRANS = [*];
&fileLog.WriteLine("&oScrtySettypVw.KEY1_PROMPT_FLD = " | &oScrtySettypVw.KEY1_PROMPT_FLD);
rem &oScrtySettypVw.KEY1_PROMPT_FLD = [*];
&fileLog.WriteLine("&oScrtySettypVw.KEY2_PROMPT_FLD = " | &oScrtySettypVw.KEY2_PROMPT_FLD);
rem &oScrtySettypVw.KEY2_PROMPT_FLD = [*];
&fileLog.WriteLine("&oScrtySettypVw.KEY3_PROMPT_FLD = " | &oScrtySettypVw.KEY3_PROMPT_FLD);
rem &oScrtySettypVw.KEY3_PROMPT_FLD = [*];
&fileLog.WriteLine("&oScrtySettypVw.FUTURE_FLG = " | &oScrtySettypVw.FUTURE_FLG);
rem &oScrtySettypVw.FUTURE_FLG = [*];
End-For;*/
rem ***** End: Get/Set Component Interface Properties *****;
rem ***** Execute Save *****;
rem If Not &oLntDeptTblCi.Save() Then;
rem errorHandler();
rem throw CreateException(0, 0, "Save failed");
rem End-If;
rem ***** Execute Cancel *****;
rem If Not &oLntDeptTblCi.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;
End-For;
&fileLog.WriteLine("End");
&fileLog.Close();
Bookmark/Search this post with
U need to check which value is not available in the Prompt of which field. Complete CI code will not make any sense.
Check the value and record field prompt table.
Thanks
Nitin
hello all,
am trying to upload data
i have uploaded data into the entire record through the website link given but when sendin it replys by sending
"Invalid value -- press the prompt button or hyperlink for a list of valid values (15,11)" how do i send post the link
I am applying for a job I have uploaded all informations bt now I am asking to add languages and when I Salect a language and try to add my knowledge about it which is already written I just have to Salect this massage appear ( invalid value -press the prompt button or hyperlink for a list of valid values (15,11). ) please tell me what to do
Invalid value -- press the prompt button or hyperlink for a list of valid values (15,11)
The value entered in the field does not match one of the allowable values. You can see the allowable values by pressing the Prompt button or hyperlink