topic Re: How to delivery done in the AM/PM in SAS Procedures

How to delivery done in the AM/PM

BETO — Thu, 26 Jun 2014 17:36:40 GMT

Im working on a table that houses schedule of service by AM or PM

this is how table is formatt

store # M T W TH FR SAT SUN

1. A.

2 P

3. A

i will get a sec table that shows actually deliver timestamp

store. Time

1. 1:23 pm

2. 3:33 pm

3. 9:00 AM

I need to compare 1st table with 2 nd table to determine if the time delivery was made was at am or pm..

in the example I provided the 1st one is out of compliance since it was done at pm when it should be done at am

Re: How to delivery done in the AM/PM

ballardw — Thu, 26 Jun 2014 18:18:20 GMT

Do your stores have different target times depending on the day of the week? If so, you'll need to provide more details.

Are you reading the time into SAS as actual time values or strings?

Re: How to delivery done in the AM/PM

BETO — Thu, 26 Jun 2014 18:52:25 GMT

THe only target is that some stores need to be Done AM or PM .The second table will have the time is as a date time

Re: How to delivery done in the AM/PM

ballardw — Thu, 26 Jun 2014 19:40:47 GMT

So, is the DATETIME a SAS Datetime variable or a string? If a string, what does it look like?

Re: How to delivery done in the AM/PM

slchen — Thu, 26 Jun 2014 22:48:24 GMT

I am not sure whether this is what you need.

DATA TAB1;

INFILE CARDS TRUNCOVER;

INPUT store (MON TUE WEN THU FRI SAT SUN) ($2.);

CARDS;

1 A . . . . . .

2 . P . . . . .

3 . . . A . . .

;

RUN;

DATA TAB2;

INPUT STORE TIME :&$10.;

CARDS;

1 1:23 pm

2 3:33 pm

3 9:00 AM

;

RUN;

DATA WANT;

IF 0 THEN SET TAB2;

IF _N_=1 THEN DO;

DECLARE HASH H(DATASET:'TAB2');

H.DEFINEKEY('STORE');

H.DEFINEDATA('TIME');

H.DEFINEDONE();

END;

SET TAB1;

ARRAY VAR _CHARACTER_;

IF H.FIND()=0 THEN DO;

DO over VAR;

if NOT MISSING (VAR) THEN DO;

FLAG=(UPCASE(SUBSTR(COMPRESS(TIME,,'KA'),1,1))=VAR);

END;

RUN;

Re: How to delivery done in the AM/PM

Ksharp — Fri, 27 Jun 2014 12:57:35 GMT

DATA TAB1;
INFILE CARDS TRUNCOVER;
INPUT store (MON TUE WEN THU FRI SAT SUN) ($2.);
CARDS;
1  A . . . . . .     
2 . P . . . . .
3 . . . A . . .
;
RUN;
 
 
DATA TAB2;
INPUT STORE TIME & anydttme.;
format time timeampm.;
CARDS;
1        1:23 pm
2        3:33 pm
3        9:00 AM
;
RUN;
options missing=' ';
data want;
 merge tab1 tab2;
 by store;
 want= ( cats(of mon--sun)=first(put(time,timeampm3. -l)) );
run;

Xia Keshan