What about a phantom that run for more than three days -----Original Message----- From: Louie Bergsagel [mailto:[EMAIL PROTECTED] Sent: Monday, February 04, 2008 1:29 PM To: u2-users@listserver.u2ug.org Subject: Re: [U2] UV phantoms
I've got a paragraph (UniVerse, Pick flavor) I run every night that copies all phantoms 3 days or older to a PH.BAK file, in case I want them later, a painless way to keep the &PH& file cleaned out. SELECT &PH& WITH DATE LT THREE.DAYS.AGO OR WITH (DATE = THREE.DAYS.AGO AND TIME LT "08:00:00pm") SAVE.LIST PH.CLEANUP GET.LIST PH.CLEANUP IF @SYSTEM.RETURN.CODE LT 1 THEN GO NO.RECORDS COPY &PH& DATA (PH.BAK DATA GET.LIST PH.CLEANUP IF @SYSTEM.RETURN.CODE LT 1 THEN GO NO.RECORDS [I know, overkill, but I like to be sure...] DELETE &PH& ... LIST DICT &PH& "DATE""TIME""THREE.DAYS.AGO" DICT PH 01:24:23pm 04 Feb 2008 Page 1 Field......... Type & Field........ Conversion.. Column......... Output Depth & Name.......... Field. Definition... Code........ Heading........ Format Assoc.. Number DATE I FIELD(@ID,"_" D2/ 10R S ,3) THREE.DAYS.AGO I @DATE - 3 D 11R S TIME I FIELD(@ID,"_" MTHS 10R S ,2) 3 records listed. ------- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ ------- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/