How to Send Email Using PeopleCode

How to Send Email Using PeopleCode
In this Article we can find how to send email using peoplecode
Function SendMAilfromSetupMailInfo (&ReceiverName As string, &MAIL_TO As string) Returns boolean
Local PT_MCF_MAIL: MCFOutboundEmail &ObjectEmail = create PT_MCF_MAIL: MCFOutboundEmail();

/*-- Initialize the usual fields of an email --*/

&ObjectEmail.From = "email@abc.com";
&ObjectEmail.ReplyTo = "email@abc.com ";
&ObjectEmail.Recipients = &MAIL_TO;
&ObjectEmail.Subject = MsgGetText (20050, 142, "");
&ObjectEmail.Text = MsgGetExplainText (20050, 141, "", &PersonName, &MAIL_TO);
&ObjectEmail.AddHeader("Errors-To", "email@abc.com");


Local integer &resp = &ObjectEmail.Send();
Local boolean &done;

Evaluate &resp
When %ObEmail_Delivered
/* every thing ok */
&done = True;
Break;

When %ObEmail_NotDelivered
/*-- Check &email.InvalidAddresses, &email.ValidSentAddresses
and &email.ValidUnsentAddresses */
&done = False;
Break;

When %ObEmail_PartiallyDelivered
/* Check &email.InvalidAddresses, &email.ValidSentAddresses
and &email.ValidUnsentAddresses; */
&done = True;
Break;

When %ObEmail_FailedBeforeSending
/* Get the Message Set Number, message number;
Or just get the formatted messages from &email.ErrorDescription,
&email.ErrorDetails;*/

&done = False;
Break;
End-Evaluate;

Return &done;
End-Function;



How to Scheduling and Running SQR from Peoplecode

How to Scheduling and Running SQR from Peoplecode
Description
Peoplecode provides functions like CreateProcessRequest that allows us to create a ProcessRequest object.  Once this object is created, we can assign values to its properties and then use the Schedule method to submit the process request for scheduling.The CreateProccessRequest function takes 2 arguments. The Process Type and the Process Name.
/*Variable declaration*/
Local ProcessRequest &MYPrcsRqst; 
Local String &MySQR;

&MySQR = "InsTmpTbl"

/* Creating Process Request Object*/
&MYPrcsRqst = CreateProcessRequest("SQR Process", &MySQR);

/*Specifying the runcontrol id*/
&MYPrcsRqst.RunControlID = "BATCH"

/*Specifying the output option*/
&MYPrcsRqst.SetOutputOption("Web", "PDF", "", &MySQR); 

/* Use the Schedule() method to Schedule the SQR.*/

&MYPrcsRqst.Schedule();
If &MYPrcsRqst.Status = 0 then
/* Schedule succeeded. */
Else
/* Process (job) not scheduled, do error processing */
End-If;

How to Populate Drop down list at Runtime using PeopleCode

How to Populate Drop down list at Runtime using PeopleCode
The solution is simple, using peopleCode. In that page where you need to show all the 5 translate values, you assign that field and you don̢۪t need to worry for that page. Now, for the other page, where you need to show only 3 values, you need write peoplecode in record rowinit event. First, Store the following code given below in a function library. Then, create a SQL object which will return the required 3 field values and their descriptions from PSXLATITEM. Then pass the SQL object name, Record object name and field object name as string to the below provided source code from the rowinit event. The rowinit peoplecode will look like this:
&Rcd = "Chinnu_raavi"; /* Record name */ 
&Fld = "Chinnu_raavi"; /*field name */ 
&SQL = "Chinnu_raavi_SQL"; /* SQL object name */ 
PopulateDropDown(&Rcd, &Fld, &SQL); 

Function PopulateDropDown(&RcdName As string, &Fldname As string, &SQL_name As string)
    
   Local Field &Fld;
   Local SQL &SQL;
   Local string &CodeIn, &DescIn;
   
   &Fld = GetRecord(@("Record." | &RcdName)).GetField(@("Field." | &Fldname));
   
   &Fld.ClearDropDownList();
   &SQL = GetSQL("SQL." | &SQL_name);
   
   While &SQL.Fetch(&CodeIn, &DescIn)
      &Fld.AddDropDownItem(&CodeIn, &DescIn);
   End-While;
   
 End-Function;

Identifying modified peoplecode and PeopleSoft objects based upon OPRID and Date modified

Identifying modified peoplecode and PeopleSoft objects based upon OPRID and Date modified
SELECT DISTINCT OBJECTVALUE1, OBJECTVALUE2, OBJECTVALUE3  FROM PSPCMPROG
WHERE LASTUPDDTTM = SYSDATE 
AND (OBJECTVALUE1, OBJECTVALUE2, OBJECTVALUE3)  -- Specify PeopleSoft objects name
NOT IN 
(SELECT OBJECTVALUE1, OBJECTVALUE2, OBJECTVALUE3
FROM PSPROJECTITEM WHERE PROJECTNAME LIKE '%SS')  AND LASTUPDOPRID !='OPRID';


SELECT * FROM PSRECDEFN WHERE LASTUPDDTTM >'01-JAN-2008' AND LASTUPDOPRID NOT LIKE 'PPLSOFT';

Write in the record from the external file using File layout

Write in the record from the external file using File layout
We can get the solution for able problem using the file layout in the peoplesoft . To read in the CSV file we use the following PeopleCode using the following steps:

(1) It reads the file into a temporary record.

(2) Each line of the file is read into a string.

(3) The string is split into an array, with the value of each field in the array becoming an element in the array.

(4)The value of each field in the record is assigned a value from the array.

After additional processing (for example, converting strings into dates or numbers, verifying data, and so on) the record can be inserted into the database.
To insert the final data into the database, this code must be associated with a PeopleCode event that allows database updates, that is, SavePreChange, WorkFlow, SavePostChange, and so on. This code could also be used as part of an Application Engine program.

Local File &MYFILE;
Local Record &REC;
Local array of string &ARRAY;

&MYFILE = GetFile("c:\temp\chinnuraavi.txt", "R", %FilePath_Absolute);
&REC = CreateRecord(RECORD.ABS_HIST_TEST);
&ARRAY = CreateArrayRept("", 0);

If &MYFILE.IsOpen Then
   If &MYFILE.SetFileLayout(FILELAYOUT.ABS_HIST) Then
      While &MYFILE.ReadLine(&STRING);
         &ARRAY = Split(&STRING, ",");
         For &I = 1 To &REC.FieldCount
            &REC.GetField(&I).Value = &ARRAY[&I];
         End-For;
      /* do additional processing here for converting values */
         &REC.Insert();
      End-While;
   Else
      /* do error processing - filelayout not correct */
   End-If;
Else
   /* do error processing - file not open */
End-If;

&MYFILE.Close();

How to Call SQR program using peoplecode

How to Call SQR program using peoplecode

&Rec = CreateRecord(Record.process_table);
      &Rec.OPRID.Value = %UserId;
      &Rec.RUN_CNTL_ID.Value = &ProcessName;
      
      If (&Rec.SelectByKey()) Then
         &Rec.field1.Value = table1.field1;
         &Rec.field2.Value = table1.field2;
         &Rec.field3.Value = table1.field3;
         &Rec.field4.Value =table1.field4;
         &Rec.Update();
      Else
         &Rec.SetDefault();
         &Rec.OPRID.Value = %UserId;
         &Rec.RUN_CNTL_ID.Value = &ProcessName;
         &Rec.field1.Value = table1.field1;
         &Rec.field2.Value = table1.field2;
         &Rec.field3.Value = table1.field3;
         &Rec.field4.Value =table1.field4;
      End-If;
/*specify your desired output format and destination*/
&ProcessType = "SQR Report";
      &OutDestFormat = "PDF";
      &OutDestType = "Web";
&MYRQST = CreateProcessRequest();
      &MYRQST.RunControlID = &ProcessName;
      &MYRQST.ProcessName = &ProcessName;
      &MYRQST.ProcessType = &ProcessType;
      &MYRQST.OutDestFormat = &OutDestFormat;
      &MYRQST.OutDestType = &OutDestType;
      &MYRQST.RunDateTime = %Datetime;
      &RETURN = &MYRQST.Schedule();



People code Tutorial

People code Tutorial
People code is a language like other languages with  it’s own DataTypes , Statements.

Every People Code program is associated with an Application Designer component and with an event.

Peoplecode Locations: Record Fields ,  Menus ,  Components  Pages ,  Business Components , Application Messages ,  Application Engine.

Data Types    

NUMBER,STRING,DATE,TIME,DATETIME,ANY

Scope :

                Local Variables
                Global Variables
                Component Variables

Other Variables :

                System Variables

                Derived/Work Fields



Syntax for declaration:

   <scope> <type> &<variable_name>



Local Variables :


Temporary memory location that holds the value.

Global Variables :

 Exist for the complete session and are used to transfer values between panel groups.
Session means signin to signout is called session

Component Variables :

Exist for the duration of the current PS component.
Used to transfer values between programs on the same component


System Variables :

Internally maintained  and can be referred by the people code any time.
Begins with %.
     Ex : %Date ,%Time ,%Page ,%Menu,%Component,%DBName,%Mode etc...

Derived/Work Fields :

Used when we need to pass values from one program  to another  without the  field values being stored in the    database.
Existence limited to the current component.
They are usually display only fields on a page  or have them as invisible fields on the page



User Defined Variables:


Variables which are defined by developers starts with &.

Operators:

Mathematical  :  + ,- ,* ,/ ,** , |

Comparison : = ,!= ,<> ,>= ,<= ,< ,>

Logical       :  NOT ,AND ,OR



Functions:

User defined functions
Built-in Functions


User defined function:

Internal Peoplecode

Functions that are called directly from the same program where the function was defined without the declare function statement.

External PeopleCode

Stored as Function Libraries( derived/work records named
with prefix “FUNCLIB_”
convention is define these functions in the FieldFormula Event.


Syntax for defining or writing a function
Function <function_name> (<param1,<param2>....)
           stmt1;
           stmt2;
           return <expression>;
End-Function;


Syntax for Declaring a Function
Declare Function <function_name> PeopleCode   <Record_name.FieldName>.FieldFormula.


Built-in Functions:

Component Buffer
Used to modify,update,hide fields in the buffer area.

ActiveRowCount,AddKeyListItem,CompareLikeFields,ClearKeyList,
ComponentChanged,CopyFields,CopyRow,CurrentLevelNumber.


Conversion
Char,Code,Codeb,ConvertChar,String,Value


Current Date and Time
%CurrentDateIn,%CurrentDateOut,%CurrentDateTimeIn,
%CurrentDateTimeOut,%CurrentTimeIn,%CurrentTimeOut



Database and platform
%DbName,%DbType

Data Buffer Access
CreateRecord,CreateRowset,FlushBulkInserts ,GetField,GetLevel0 ,
GetRecord ,GetRow,GetRowset

Date and Time


Used to calculate and manipulate dates

AddToDate,AddToDateTime,AddToTime, Date,DateValue
Day,Days,Days360,Days365


String  Functions

Used to manipulate character Strings.

Number Functions

Used to manipulate numeric values

Security Functions

Used for security purpose.



Data Buffer access Classes


Field ,Record ,Row ,Rowset

Field Class

       Attributes             : Name,Enabled,Type
       Methods              :  GetLongLabel,SearchClear,SetCursorPos
       Built-In Functions: GetField.


Record Class
       Attributes            : Name ,IsChanged ,FieldCount                                          
       Methods             :  CompareFields,CopyChangedFieldsTo,CopyFieldsTo
       Built-In Functions: GetRecord
Row Class
       Attributes               : Visible ,IsChanged
       Methods                : CopyTo ,GetNexteffRow.
       Built-in Functions  : GetRow
RowSet Class
       Attributes               : ActiveRowCount
       Methods                : CopyTo ,DeleteRow ,Fill
       Built-in Functions  : CreateRowSet,GetLevel0,GetRowSet



Statements in PeopleCode


Branching Statements
if Statement:  

   syntax:  if <condition>
                        stmt1;                                                        
                             else 
                       stmt2;
                            end-if;  


Evaluate Statement


Evaluate <field or variable>
when = <value1>
                stmt1; break;
when = <value2>
                stmt2; break;
when-other
                stmt3;break;
End-Evaluate;

For Loop


  For <&variable> = <start-value> to <end-value>                            
                        [Step stepvalue>]
                                   stmt1;  stmt2;
                            End-for;


                                                                                            
                                                                              

How to Skip a Search Record Prompt When You Know the keys

How to Skip a Search Record Prompt When You Know the keys

You have two settings to choose from: skip if possible (0) and force display (1).

If you use the skip if possible setting, then you need to have the keys. Assume your
keys are EMPLID, EMPL_RCD, and EFFDT. Here is what the SearchInit PeopleCode
would look like:

SetSearchDialogBehavior(0);
EMPLID = %EmployeeID;
EMPL_RCD = 0;
EFFDT = &DateVariable;

How to Access a field in level 2 grid in a page using people code

How to Access a field in level 2 grid in a page using people code
If you have a page which has level 0 record and a level 1 scroll area .The level 1 scroll area has level 1 and level 2 grids in it, to access a field in the level 2 grid, you need to access the level 1 grid first and then only the level 2 grid field can be accessed, since the level 2 grid cannot be accessed directly . It cannot be accessed even through the scroll area since the whole scroll act as a row and for a level 0 parent row, there can be any number of scroll level data.
/*level 1 scroll : SCROLL_1 (Page field name)

level 1 record : REC_LEVEL1

level 2 record : REC_LEVEL2
*/

local rowset &Rs1, &Rs2;

&Rs1 = GetLevel0()(1).GetRowset(Scroll.REC_LEVEL1);

For &i = 1 To &Rs1.ActiveRowCount
   &Rs2 = &Rs1.GetRow(&i).GetRowset(Scroll.REC_LEVEL2);
   For &j = 1 To &Rs2.ActiveRowCount
    
         &Rs2(&j).ANY_RECORD_IN_LEVEL2.CORRESPONDING_FIELD.Value = *****

****************************
/*DO THE REQUIRED PROCESSING */
****************************

    End-For;
End-For;

How Sheduling SQR using Peoplecode

How Sheduling SQR using Peoplecode
Description
Structured Query Report (SQR) can be executed with the help of peoplecode without taking the user to Process request page. The best way to do it is to create a process request and schedule it.
The Steps Include 1)Declare a ProcessRequest object 2)Declare name of the sqr to be processed 3)Create a Process Request Object; 4)Set Properties of the Process Request Object 5)Schedule the SQR 6)If the Process (job) not scheduled, do error processing Problem this asset addresses In order to execute a Structured Query Report (SQR) , one has to go to the corresponding Process Request Page and run the SQR manually.This manual work is cumbersome and the user has to wait to execute the SQR at predefined time intervals
 
/* Declare a ProcessRequest object */
Local ProcessRequest &PRCSRQST; 

/* Declare name of the sqr FEB_PRCS to be processed */
Local String &SQR_TO_PROCESS; 

&SQR_TO_PROCESS = "FEB_PRCS"
/* Create a Process Request Object; */
&PRCSRQST = CreateProcessRequest("SQR Process", &SQR_TO_PROCESS);

/* Set Properties of the Process Request Object; */
REM CreateProccessRequest function takes these 2 arguments - Process Type and the Process Name;

&PRCSRQST.RunControlID = "FEB07";
&PRCSRQST.SetOutputOption("Web", "PDF", "", &SQR_TO_PROCESS); 

/* Schedule the SQR */
&PRCSRQST.Schedule();
If &PRCSRQST.Status = 0 then
/* Schedule successful. */
Else
/* Process (job) not scheduled, do error processing */

End-If;

How to pass Dynamic Drop Down Value using peoplecode

How to pass Dynamic Drop Down Value using peoplecode
PeopleSoft provides the functions ClearDropDownList & AddDropDownItem to solve the problem defined above. Certain points to be noted:

1. The variable type (here &fld_TypeField_l) should be Field .

2. If the drop down box has been cleared using ClearDropDownList and subsequently NO AddDropDownItem function call has been used, all the default translate value descriptions will be displayed .

3. The format of AddDropDownItem is &Field_Variabe.AddDropDownItem('A', 'Approved'). Always note that the codes used in AddDropDownItem (here 'A')should be the same codes used in the translate .

/*** VARIABLE DECLARATIONS ****/
Local Field &fld_TypeField_l;

/*** GET THE FIELD ***/
&fld_TypeField_l = GetField(IMF_PAY_MSG_MST.ACTION_TYPE);

/*** CLERING THE DROP DOWN VALUE ****/
&fld_TypeField_l.ClearDropDownList();

/*** ADDING THE VALUES IN DROP DOWN ****/
&fld_TypeField_l.AddDropDownItem('A', 'Approved'); 
&fld_TypeField_l.AddDropDownItem('C', 'Cancelled'); 
&fld_TypeField_l.AddDropDownItem('P', 'Pending'); 
&fld_TypeField_l.AddDropDownItem('O', 'On-Hold'); 
&fld_TypeField_l.AddDropDownItem('R', 'Rejected');



App Designer Tutorial

What is an application designer? Application Designer is an integrated development environment that enables you to work with the numerous objects of a business application in a single work area.

Features in App Designer
Multiple Document interface Drag and Drop Pop - up Menus Property sheets Dynamic tool bars and Menus    Application designer Components


Steps to Designing an Application. 1)Design the Application 2)Define new Fields 3)Create the Record Definition 4)Build the Record 5)Create Page Definition 6)Define the Component 7)Create the Menu Definition 8)Enable Security 9)Test the Application. Important Points to Remember in App Designer.Field Individual pieces of data—such as an employee ID—that can be entered by the user and stored in the database or a column on a table or in a view. Field is column in a table or Record. What is Record?
All the data that resides in PeopleSoft applications is stored in tables, or records, as part of a relational database system. Each record definition describes the properties of an underlying SQL table.
Record is a collection of Fields
What is Page?
Pages provide a way to enter, view, and edit data online
Collection of records.
What is Component?
Represents a logical business transaction or a set of logically related pages that are processed together. collection of pages
What is Menu?
Enables access to the components you build, along with the pages contained in the components
Collection of Components What is Project? A user-defined collection of related object definitions created for the purpose of developing, customizing, or upgrading a PeopleSoft application.
SQL Can be entire SQL programs, or just fragments of SQL statements that you want to re-use.
Style Sheet
A collection of styles that can be used by Internet Architecture application pages.
Activity
A map showing the individual steps, events, and routings that comprise a complete activity within a business process.
Application Engine
A program comprising SQL statements and PeopleCode programs to be run in batch mode, as an alternative to using COBOL
File Layout Definition (or mapping) of a file to be processed. It identifies where in a file data fields are located. Component Interface Externalizes access to a component, so it can be used by a third party or an application message
Start the Development by:
1.Create a new project(Optional). File>New>Project
2. Set Project Options(Optional). Tools>Options
3. Name and save the Project(Optional). File>Save Project As

Hiding Group Boxes on Peoplesoft Pages

Hiding Group Boxes on Peoplesoft Pages
however if the requirement is to selectively display group box in case a particular condition is true or in case for a particular employee or role, you can display the group box by the below code:

if ASGN_VW.EMPLID = "101" Then

DERIVED_HR.AB_PLAN_GRPBOX.Visible = False;

Else

DERIVED_HR.AB_PLAN_GRPBOX.Visible = True;

End-If;