Site menu:

Standard Job Search
Keywords: Country: Advance Search






Simple way to Default the Sequencing of EFFSEQ in PeopleSoft Scroll area.
This code should go in XXXXXXXXX.EFFSEQ.FieldDefault

/* Default sequence number to the next available sequence number. */
If RecordNew(XXXXXXXXX.EFFSEQ) Then
&MAXSEQNO = 0;
For &I = 1 To ActiveRowCount(Record.XXXXXXXXX);
&I_EFFDT = FetchValue(XXXXXXXXX.EFFDT, &I);
If &I <> CurrentRowNumber(1) And
&I_EFFDT = XXXXXXXXX.EFFDT Then
&SEQNO = FetchValue(XXXXXXXXX.EFFSEQ, &I);
If &SEQNO > &MAXSEQNO Then
&MAXSEQNO = &SEQNO;
End-If;
End-If;
End-For;
&SEQNO = &MAXSEQNO + 1;
If &SEQNO > 99 Then
&SEQNO = 99;
End-If;
XXXXXXXXX.EFFSEQ = &SEQNO;
End-If;



Posted by: Vamsi      Date: 2014-07-07


        Post more Comments :
Name:
EmailID:
Date:
Comments: