Date formatting in a grid - visual-foxpro

I'm trying to display a date column in grid like this: "dd-mm-yyyy". In dbf table, the date is stored in this format: "YYYY-MM-DDThh:mm:ss" in a character field.
The grid is created from this cursor:
select id,beginningDate,endDate,cnp from doc ORDER BY id desc INTO CURSOR myCursor
I wish something like this:
select id,convert(beginningDate, Datetime,"dd-mm-yyyy"),endDate,cnp from doc ORDER BY id desc INTO CURSOR myCursor

Fox doesn't have a builtin function called convert(), nor can it handle your non-standard date/time string format directly.
A quick and dirty way to convert a string foo in the given format ("YYYY-MM-DDThh:mm:ss") to a date/time value is
ctot("^" + chrtran(foo, "T", " "))
The caret marks the input as the locale-independent standard format, which differs from the input format only by having a space instead of a 'T'.
You can extract the date portion from this via the ttod() function, or simply extract only the date portion from the string and convert that:
ctod("^" + left(foo, 10))
Fox's controls - including those in a grid - normally use the configured Windows system format (assuming that set("SYSFORMATS") == "ON"); you can override this by playing with the SET DATE command.
There seems to be no mask-based date formatting option as in most other languages. dtoc() and ttoc() don't take format strings, transform() takes a format string but blithely ignores it for date values.

I am with Tamar on this subject, you should have used a datetime field instead.
Since you are storing it like this anyway, you can 'convert' to datetime using the built-in cast function (or ttod(ctot()) in versions older than VFP9 - in either case you don't need to remove T character):
select id, ;
Cast(Cast("^"+beginningDate as datetime) as date) as beginningDate, ;
endDate,cnp ;
from doc ;
ORDER BY id desc ;
INTO CURSOR myCursor ;
nofilter
In grid or any other textbox control, you can control its display style using DateFormat property. ie:
* assuming it is Columns(2). 11 is DMY
thisform.myGrid.Columns(2).SetAll('DateFormat', 11)

Related

Facing issue with Date column format in Power BI

I have an excel dateset where date column includes date in dd-mm-yyyy format(Proper date) and in text format that too in mm/dd/yyyy format(just text not proper date). want to convert all dates in dd-mm-yyyy format. How to do all in dd-mm-yyyy format in Power Query editor
The question is: In Power Query Editor Perform all necessary action to convert all the dates in the "Date" column to be in "dd-mm-yyyy" format.
I am new in Power BI. Please help on this.
enter image description here
Importing correctly
If you set the right culture, all the inputs are converted to a type date
let
Source = #table(
type table[Date = text],
{ {"7/27/2012"}, {"9/14/2020"}, {"04-11-2020"} }
),
// using the system's current culture
#"Dates" = Table.TransformColumnTypes(
Source,
{ {"Date", type date} }
),
//specify a specific culture
#"US Dates" = Table.TransformColumnTypes(
Source,
{ {"Date", type date} },
"en-US"
)
in
#"US Dates"
date verses text
I'm not clear if you're referring to different date format strings, or actual data types when you say Proper Date, I think you mean the first.
In the query editor where you import dates, it should be type date
If it visually displays out of order, that's okay. It's using your systems current settings.
Once you're in the data model, that is when you pick your date format strings. Notice that both images use the same data, the green is the data type in Power Query.
Blue is the format string that lets you override the defaults.

Date conversion in SAS (String to Date)

I import an Excel-spreadsheet using the following SAS-procedure.
%let datafile = 'Excel.xlsx'
%let tablename = myDB
proc import datafile = &datafile
out = &tablename
dbms = xlsx
replace
;
run;
One of the variables (date_variable) has the format DD.MM.YYYY. Therefore, I was defining a new format like this:
data &tablename;
set &tablename;
format date_variable mmddyy10.;
run;
Now, I would like to sort the table by that variable:
proc sort data = &tablename;
by date_variable;
run;
However, as the date_variable is defined as a string, I dont get the sorting right. How can I re-define the date_variable as a date?
Use the input function to convert the string-value containing a date representation to a date-value that can have a date-style format applied to it that will affect how the date-value is rendered in output and viewers.
The input function requires an informat as an argument. Check the format documentation, which includes an entry for:
DDMMYYw. Informat
Reads date values in the form ddmmyy or dd-mm-yy, where a special character, such as a hyphen (-), period (.), or slash (/), separates the day, month, and year; the year can be either 2 or 4 digits.
Example:
* string values contain date representations;
data have;
input date_from_excel $10.;
cards;
31.01.2019
01.02.2019
15.01.2019
run;
data want;
set have;
date = input(date_from_excel, ddmmyy10.); * convert to SAS date values;
format date ddmmyyd10.; * format to apply when rendering those values;
run;
* sort by SAS date values;
proc sort data=want;
by date;
run;
format date_variable mmddyy10.; does not convert a string to a date. It just sets a format for displaying that field etc.
Essentially I think what you are saying is date_variable is a string that looks like "31.01.2019". If that is the case, you will have to first convert it into a date value:
date_variable_converted = input(date_variable, DDMMYY10.);
You should be now able to sort using date_variable_converted which is a SAS date value.

Lotus sorting view on orderdate does not work properly

I have created a view in which I also have a column which holds dates. This column can be sorted on ascending and descending. This is my column properties value:
But the problem is that the view does not sort the dates properly:
And here a screenshot of the orderdate field itself:
And here screenshot of the document with the orderdate that is out of order in the view:
Update
Some documents had the orderdate as text instead of date.. I create these documents through a java agent. The field orderdate I fill in like this:
SimpleDateFormat formatterDatumForField=new SimpleDateFormat("dd-MM-yyyy");
docOrder.replaceItemValue("Orderdatum",formatterDatumForField.format(currentDateForField));
But it is saved as text instead of date. Anyone knows why?
Problem was that orderdate field was set by a backend agent and this field was set with a string.
I know saved the current time as a DateTime object and now it works:
DateTime timenow = session.createDateTime("Today");
timenow.setNow();
docOrder.replaceItemValue("Orderdatum", timenow);
It's not clear to me why it's not working for you, but you can brute force it with something like this in the column formula
dateForSure := #TextToTime(OrderDatum);
#Text(#Year(dateForSure)) + "-" + #Text(#Month(dateForSure)) + "-" + #Text(#Day(dateForSure));
Also: your Java code saves a text value because the format() method of SimpleDateFormat returns a StringBuffer. The ReplaceItemValue method generates a text item when its input is a String or StringBuffer. Assuming your form defines OrderDatum as a Time/Date field, you can call Document.ComputeWithForm in your code to force it to convert the text item to a Time/Date. Another method - probably preferable given the potential side-effects of calling ComputeWithForm would be to create a DateTime object in your Java code and pass it to the ReplaceItemValue method instead.
It's because formatterDatumForField.format(currentDateForField) returns a String instead of a date/time value. Assuming that currentDateForField is a date/time value, you should change
SimpleDateFormat formatterDatumForField=new SimpleDateFormat("dd-MM-yyyy");
docOrder.replaceItemValue("Orderdatum",formatterDatumForField.format(currentDateForField));
to
docOrder.replaceItemValue("Orderdatum",currentDateForField);

Error while formatting the date variables in sas

I am getting an error when i try to do format for a date variable.
This is how my date variable values look-like "26-Dec-58"
"The format $DATE was not found or could not be loaded"
The reason for the error is that my date value is stored as a char variable in the data set so its not accepting the format of a numeric variable when i am formatting the variable.
So i want to convert my date (which is a character) variable into a numeric variable without introducing a new variable.
I tried datepart and substring options but still getting error.
I am still at the learning stage in sas so any code to clear the error is appreciated i know the concept but coding i tried with all i know but still no luck.
Current code:
data Practice.Sales;
set Practice.Sales;
Birthdate = '26-Dec-58';
Purchase_Dt = '15-Sep-04';
t_num_date = input(Birthdate, ddmmyy8.);
t_num_date1 = input(Purchase_Dt, ddmmyy8.);
drop Birthdate Purchase_Dt;
format Birth_date ddmmyy8. PurchaseDt ddmmyy8. Price DOLLAR10.2;
rename t_num_date = Birthdate;
rename t_num_date1 = Purchase_Dt;
run;
It isn't possible to change an existing variable in a SAS dataset directly from character to numeric. However, you can create a new numeric variable, drop the original character variable, then rename the new one:
data example;
mydate = '26-Dec-58';
t_num_date = input(mydate, date9.);
drop mydate;
format t_num_date date9.;
rename t_num_date = mydate;
output;
run;
N.B. you have to apply the format to the temporary variable before it gets renamed. Attempting to apply a numeric format after renaming it results in an error, as the format statement is processed before the rest of the data step runs, and at that point the original character variable hasn't been dropped yet.
This code works fine for me but still the newly created variables are coming at the last how to change that
data Practice.Sales;
set Practice.Sales;
Birth_date=datepart(input(Birthdate,anydtdtm19.));
PurchaseDt = datepart(input(Purchase_Dt,anydtdtm19.));
format Birth_date PurchaseDt ddmmyy8. Price DOLLAR10.2;
drop Birthdate Purchase_Dt;
run;
You need to use the rename at set statement and then drop them at the end.
data Practice.Sales;
set Practice.Sales
*rename old variables;
(rename=(birthdate=birth_date purchase_dt=purchasedt));
*use renamed variables in code;
Birthdate=datepart(input(Birth_date,anydtdtm19.));
Purchase_Dt = datepart(input(PurchaseDt,anydtdtm19.));
format Birthdate Purchase_Dt date9. Price DOLLAR10.2;
drop Birth_date PurchaseDt;
run;
The variables in a SAS dataset appear in the order they were created.
If you really want to determine the order of the variables yourself, then you should create them before your set statement. Further, I suppose you prefer NOT changing the name of the variables, while still changing their type. Therefore we have to rename the existing variables while reading them.
data Practice.Sales;
format Birthdate Purchase_Dt ddmmyy8. Price DOLLAR10.2;
set Practice.Sales (rename =(Birthdate=oldBirth Purchase_Dt = oldPurchase));
Birthdate=datepart(input(oldBirth,anydtdtm19.));
Purchase_Dt = datepart(input(oldPurchase,anydtdtm19.));
drop Birthdate Purchase_Dt;
run;

How do I get the aggr of two aggrs in QlikView?

If I want to find the maximum value of a column from two states aggregated by a member's ID, should this work?
=Aggr(
MaxString(
Aggr(NODISTINCT MinString({[State1]}DATE_STRING),MBR_ID)
+
Aggr(NODISTINCT MinString({[State2]}DATE_STRING),MBR_ID)
) , MBR_ID)
So if I had this data:
MBR ID DATE_STRING
1 20120101
1 20120102
1 20120103
And State1 had 20120101 selected and State2 has 20120103 selected, my expression would return 20120103 for member 1.
Thanks!
Edit: In SQL, this would look like:
WITH MinInfo (DATE_STRING, MBR_ID)
AS (SELECT MIN(DATE_STRING), MBR_ID FROM Table WHERE TYPE IN ('State1', 'State2') GROUP BY MBR_ID, TYPE)
SELECT MAX(DATE_STRING) DATE_STRING, MBR_ID FROM MinInfo GROUP BY MBR_ID
It would be easier to accomplish your goal if you convert your that to an actual date field
Assuming that you are using a chart where MBR_ID is the Dimension, if you want the maximum date (latest date) you can do the following:
=nummax(Max({[State1]}DATE_STRING),Max({[State2]}DATE_STRING))
To convert to a date, you can use this function:
date#(DATE_STRING,'[text format of the date]')
(The date format looks like YYYYMMDD to me, but if its day then month, you would use YYYYDDMM)
I'd suggest you format it in the script, so that you wont have to worry about it every time you need to use that date.

Resources