JDE Events

Listing of ER for Application : Item Master Application (P594101)
=======================================================================
     FORM: Item Master Revision [FIX INSPECT] (W594101A)
=======================================================================
     CONTROL:  FORM
     EVENT:  Dialog is Initialized
———————————————————————–
0001 VA frm_szProgramId_PID = “P594101”
0002 Get Audit Information
        BC User ID (F594101) <- BF szUserName
        BC Date – Updated (F594101) <- BF jdDate
        BC Time of Day (F594101) <- BF mnTime
        BC Work Station ID (F594101) <- BF szWorkstation_UserId
0003 //

———————————————————————–
     EVENT:  Clear Screen Before Add
———————————————————————–
0001 // Instrustor led assignment
0002 // This event point occurs when the form first appears

Default today’s date
0003 FC Effective Date = SL DateToday
0004 // as the effective date
0005 //

———————————————————————–
     EVENT:  Add Record to DB – Before
———————————————————————–
0001 // FIle IO Trigger occurs before the add record
0002 // Initialize audit fields
0003 BC Program ID (F594101) = VA frm_szProgramId_PID
0004 //

———————————————————————–
     EVENT:  Update Record to DB – Before
———————————————————————–
0001 Get Audit Information
        BC User ID (F594101) <- BF szUserName
        BC Date – Updated (F594101) <- BF jdDate
        BC Time of Day (F594101) <- BF mnTime
        BC Work Station ID (F594101) <- BF szWorkstation_UserId
0002 BC Program ID (F594101) = VA frm_szProgramId_PID
0003 //

———————————————————————–
     EVENT:  Variables
———————————————————————–
     frm_szProgramId_PID

=======================================================================
     CONTROL:  EDIT Effective Date
     EVENT:  Control is Exited
———————————————————————–
0001 // If left blank default to today’s date.
0002 If FC Effective Date is equal to <Null Date>
0003    FC Effective Date = SL DateToday
0004 Else
0005 End If

=======================================================================
     FORM: Work With Item Master [FIND BROWSE] (W594101B)
=======================================================================
     CONTROL:  FORM
     EVENT:  Dialog is Initialized
———————————————————————–
0001 Hide Grid Column(FC Grid, GC WorkStn ID)
0002 // This is initially hiding audit columns in grid..
0003 Hide Grid Column(FC Grid, GC UserID)
0004 Hide Grid Column(FC Grid, GC Time ofDay)
0005 Hide Grid Column(FC Grid, GC DateUpdated)
0006 Hide Grid Column(FC Grid, GC ProgramID)

———————————————————————–
     EVENT:  Media Objects – Row def
———————————————————————–
0001 Media Object Structures(GT594101, <MedObj Setup>, <MedObj Setup>, <MedObj Setup>, GC ItemNumber)

=======================================================================
     CONTROL:  HYPITEM &Select
     EVENT:  Button Clicked
———————————————————————–
0001 Call( App:P594101 , Form: W594101A )
        GC ItemNumber -> FI mnItemNumber

=======================================================================
     CONTROL:  HYPITEM &Add
     EVENT:  Button Clicked
———————————————————————–
0001 Call( App:P594101 , Form: W594101A )
0002 //

=======================================================================
     CONTROL:  HYPITEM Cop&y
     EVENT:  Button Clicked
———————————————————————–
0001 Call( App:P594101 , Form: W594101A )
        GC ItemNumber -> FI mnItemNumber

=======================================================================
     CONTROL:  CHKBOX Show Audit
     EVENT:  Selection Changed
———————————————————————–
0001 // This is to show or hide audit fields , by using check box
0002 If FC Show Audit is equal to “1”
0003    Show Grid Column(FC Grid, GC ProgramID)
0004    Show Grid Column(FC Grid, GC DateUpdated)
0005    Show Grid Column(FC Grid, GC Time ofDay)
0006    Show Grid Column(FC Grid, GC UserID)
0007    Show Grid Column(FC Grid, GC WorkStn ID)
0008 Else
0009    Hide Grid Column(FC Grid, GC UserID)
0010    Hide Grid Column(FC Grid, GC WorkStn ID)
0011    Hide Grid Column(FC Grid, GC Time ofDay)
0012    Hide Grid Column(FC Grid, GC DateUpdated)
0013    Hide Grid Column(FC Grid, GC ProgramID)
0014 End If

=======================================================================
     FORM: Item Master Revisions Multiple [HEADERLESS DETAIL] (W594101C)
=======================================================================
     CONTROL:  FORM
     EVENT:  Dialog is Initialized
———————————————————————–
0001 // Initialize the program ID
0002 //
0003 VA frm_szProgramId_PID = “P594101”

———————————————————————–
     EVENT:  Variables
———————————————————————–
     frm_szProgramId_PID

=======================================================================
     CONTROL:  GRID Grid
     EVENT:  Add Grid Rec to DB – Before
———————————————————————–
0001 // Populate Audit Field when a record is updated
0002 //
0003 Get Audit Information
        BC User ID (F594101) <- BF szUserName
        BC Date – Updated (F594101) <- BF jdDate
        BC Time of Day (F594101) <- BF mnTime
        BC Work Station ID (F594101) <- BF szWorkstation_UserId
0004 BC Program ID (F594101) = VA frm_szProgramId_PID
0005 //
0006 // Force grid fields into db fields because system tries to use fields from
0007 // header instead of grid.
0008 BC Item Number (F594101) = GC ItemNumber

———————————————————————–
     EVENT:  Update Grid Rec to DB-Before
———————————————————————–
0001 // Populate Audit Field when a record is added
0002 //
0003 Get Audit Information
        BC User ID (F594101) <- BF szUserName
        BC Date – Updated (F594101) <- BF jdDate
        BC Time of Day (F594101) <- BF mnTime
        BC Work Station ID (F594101) <- BF szWorkstation_UserId
0004 BC Program ID (F594101) = VA frm_szProgramId_PID
0005 //
0006 // Force grid fields into db fields because system tries to use fields from
0007 // header instead of grid.
0008 BC Item Number (F594101) = GC ItemNumber

———————————————————————–
     EVENT:  Row Exit & Changed – Asynch
———————————————————————–
0001 // Default to days date if left blank
0002 If GC EffectiveDate is equal to <Null Date>
0003    GC EffectiveDate = SL DateToday
0004 Else
0005 End If

Thursday January 03, 2013  15:32