9.47 DELETE_SAVED_LIST

Note: Built-In Function Rules     Usage Options

Deletes a previously saved permanent or temporary working list.

Arguments

No

Type

Req/ Opt

Description

Min Len

Max Len

Min Dec

Max Dec

1

A

Req

Name of previously saved list to be deleted.

1

10



Return Values

No return values.

Technical Notes

  • This Built-In Function is designed to delete a permanent or temporary working list.

  • It is good practice to specifically delete temporary lists.

  • File DC@F80 in the LANSA data library is used to store saved list details. This file should be considered in your backup and restore procedures.

  • Deleted record space in file DC@F80 is reorganized and removed during a normal LANSA internal database reorganization. This reorganization also deletes any temporary lists that have exceeded their retention period.

  • You can reorganize file DC@F80 to free deleted record space at any time by using the IBM i RGZPFM (Reorganize Physical File Member) command. Use DC@F80V1 as the sequencing logical view.

  • The backup and recovery of data area DC@A08 and database file DC@F80 (and its logical views DC@F80V1 and DC@F80V2) is your responsibility.

  • Movement of DC@F80 or saved lists between machines or between environments is your responsibility.

Example

A list has been saved. It contains a list of contacts that need to have their information updated in the database. This user is in a telemarketing role. The user looks at a record, calls the contact and ensures the database is up to date. If a change is necessary the user changes the information and updates the database.

The list has come from a job that has checked the date of update of each contact. If the update date is more than NN days the record is put into a list. The list is then saved.

When the list has been processed the saved list is deleted.

     DEF_LIST   NAME(#RSTLST) FIELDS((#CTTCDE) (#CTTDES))
                TYPE(*WORKING)
     GROUP_BY   NAME(#DETAIL) FIELDS((#CTTCDE) (#CTTDES) (#CTTNAM) 
                (#CTTAD1) (#CTTAD2) (#CTTAD3) (#CTTPHO) (#CTTFAX) 
                (#CTTUPD))
     ********** Clear the list
     CLR_LIST   NAMED(#RSTLST)
     ********** Restore the list
     USE        BUILTIN(RESTORE_SAVED_LIST) WITH_ARGS('CONTACTS') 
                TO_GET(#RSTLST)
     ********** Process the list
     SELECTLIST NAMED(#RSTLST)
     FETCH      FIELDS(#DETAIL) FROM_FILE(CONTACTS) WITH_KEY(#CLICDE)
     DISPLAY    FIELDS(#DETAIL) CHANGE_KEY(*YES)
     ********** If contact information has changed
     IF_MODE    IS(*CHANGE)
     CHANGE     FIELD(#CTTUPD) TO(*YYMMDD)
     UPDATE     FIELDS(#DETAIL) IN_FILE(CONTACTS)
     ENDIF
     ENDSELECT
     ********** Delete the list
     USE        BUILTIN(DELETE_SAVED_LIST) WITH_ARGS(#LSTNME)
  • No labels