Example Purge/Archive Directives File with Routines
Export Object period_amt period_amt_body;
Routine exporting_period_amt_through
To period_amt Through $1
period_amt_body
End_To
End_Routine
Routine reference_contr_pr_through
To contr_pr Through $1
Unique_Field = objid
Actions = Export_Ref
End_To
End_Routine
Routine reference_contr_itm_through
To contr_itm Through $1
Unique_Field = objid
Actions = Export_Ref
End_To
End_Routine
Routine reference_contr_schedule_through
To contr_schedule Through $1
Unique_Field = objid
Actions = Export_Ref
End_To
End_Routine
Routine reference_trans_record_through
To trans_record Through $1
Unique_Field = objid
Actions = Export_Ref
End_To
End_Routine
Routine period_amt_body
Unique_Field = objid
Where $1
Actions = Export, Delete, Group
exporting_amort_dtl_through (period_amt2amort_dtl)
reference_contr_schedule_through (period2contr_schedule)
reference_contr_itm_through (period2contr_itm)
End_Routine
Routine exporting_amort_dtl_through
To amort_dtl Through $1
Unique_Field = objid
Actions = Export, Delete
reference_contr_pr_through (amort_dtl2contr_pr)
reference_period_amt_through (amort_dtl2period_amt)
reference_contr_itm_through (amort_dtl2contr_itm)
reference_contr_schedule_through (detail2contr_schedule)
reference_trans_record_through (detail2trans_record)
End_To
End_Routine
Example Purge/Archive Directives File with Routines