Code: Select all
selectlist named(#WRKLIST)
insert fields(#FileFields) to_file(CF) return_rrn(#wk_Number)
#wk_String1 := ("RRN:[&1]&2").Substitute( #wk_Number.AsString, #Location )
#SYS_APPLN.TraceMessageText( #wk_String1 )
endselect
2018-10-12 09:04:06.773 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.784 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.792 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.8 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.808 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.817 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.825 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.834 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.843 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.851 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.858 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.866 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.873 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.88 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.887 RSVUDAS01 159 RRN:[1]Seattle WA USA
2018-10-12 09:04:06.894 RSVUDAS01 159 RRN:[16]Meriden CT USA
2018-10-12 09:04:06.903 RSVUDAS01 159 RRN:[16]Meriden CT USA
2018-10-12 09:04:06.912 RSVUDAS01 159 RRN:[16]Meriden CT USA
2018-10-12 09:04:06.92 RSVUDAS01 159 RRN:[19]Anderson-Muncie IN USA
2018-10-12 09:04:06.929 RSVUDAS01 159 RRN:[16]Meriden CT USA
2018-10-12 09:04:06.937 RSVUDAS01 159 RRN:[16]Meriden CT USA
2018-10-12 09:04:06.945 RSVUDAS01 159 RRN:[22]Boise ID USA