Clear_Dirty

Changes the record attribute dirty flag to False.

PROCEDURE Clear_Dirty (
   record_    IN OUT type_record_,
   attribute_ IN     type_name_ )

Parameters

record_    
   Foundation1 record.

attribute_    
   Attribute name.

Example

SET SERVEROUT ON SIZE 100000
DECLARE
   AM Plsqlap_Record_API.type_record_;
   TB Plsqlap_Record_API.type_record_;
BEGIN
   AM := Plsqlap_Record_API.New_record('APPLICATION_MESSAGE');
   TB := Plsqlap_Record_API.New_record('TEXT_BODY');

   Plsqlap_Record_API.Set_Value (AM,'APPLICATION_MESSAGE_ID','100',
   Plsqlap_Record_API.dt_Text_Key);
   Plsqlap_Record_API.Set_Value (AM,'SENDER','Jan H Malmberg',Plsqlap_Record_API.dt_Alpha);
   Plsqlap_Record_API.Set_Value (AM, 'MESSAGE_TYPE', 'A1', Plsqlap_Record_API.dt_Alpha);

   Plsqlap_Record_API.Set_Value(TB, 'TEXT_BODY_TYPE', 'Str', Plsqlap_Record_API.dt_Enumeration);
   Plsqlap_Record_API.Set_Value(TB, 'TEXT_VALUE', 'This is a demonstration',
   Plsqlap_Record_API.dt_Long_Text);

   Plsqlap_Record_API.Add_Aggregate(AM, 'TEXT_BODY', TB);
  
   Plsqlap_Record_API.Debug_Record(AM);
  
   Plsqlap_Record_API.Clear_Dirty(AM);
  
   Plsqlap_Record_API.Debug_Record(AM);
END;
/
main: Fnd_View APPLICATION_MESSAGE New_Record
main:    Text_Key APPLICATION_MESSAGE_ID '100^*'
main:    Alpha SENDER 'Jan H Malmberg'
main:    Alpha MESSAGE_TYPE 'A1'
main:    Array TEXT_BODY (1 elements):
main:       1:Fnd_View TEXT_BODY New_Record element of APPLICATION_MESSAGE.TEXT_BODY
main:          Enum TEXT_BODY_TYPE Str
main:          Long_Text TEXT_VALUE 'This is a demonstration...' (23 characters)

main: Fnd_View APPLICATION_MESSAGE Queried_Record
main:    Text_Key APPLICATION_MESSAGE_ID '100^*'
main:    Alpha SENDER 'Jan H Malmberg'
main:    Alpha MESSAGE_TYPE 'A1'
main:    Array TEXT_BODY (1 elements):
main:       1:Fnd_View TEXT_BODY Queried_Record element of APPLICATION_MESSAGE.TEXT_BODY
main:          Enum TEXT_BODY_TYPE Str
main:          Long_Text TEXT_VALUE 'This is a demonstration...' (23 characters)
     
PL/SQL procedure successfully completed.