About TomKari

TomKari · ‎03-24-2013

Okay, let's have some fun. I don't feel that SAS is all that great as a data entry solution, so how do you enter how many hours of holidays you've taken in a month? Assuming we use the following code to calculate the vacation days available: data VacationHours; retain PotentialDays 0; format StartDate CurrentDate date.; StartDate = '08AUG1978'd; CurrentDate = date(); do i = 1 to intck('MONTH', StartDate, CurrentDate); PotentialDays = PotentialDays + 10; ActualDays = min(PotentialDays, 100); output; end; run; (For my actual start date of Aug 8, 1978, I should have 4,150 vacation days, but thanks to your harsh policies I only have 100!) all we need to do is merge in the days taken, no? Tom

TomKari · ‎03-24-2013

Oh, I see a problem. In the IF statements, we're calculating the change to principal, but not adding it back to the principal! Try this: if i=0 then Principal = Principal + ((FirstPeriodInterestReceived+1) * Principal) - ((FirstPeriodInterestPaid) * Principal); else Principal = Principal + ((OtherPeriodInterestReceived+1) * Principal) - ((OtherPeriodInterestPaid) * Principal); Tom

TomKari · ‎03-23-2013

Hi again, Job Okay, you're on the right track. Subtracting the payment is definitely one of the changes that needs to be made. A couple of other things look like problems: In both IF statements, you add 1 (correctly in my opinion) to xPeriodInterestReceived before multiplying it by Principal, but you don't do the same with xPeriodInterestPaid. A general comment about programming is to be very careful to use parentheses to ensure that your equations are resolved in the correct order. SAS will resolve mult/div before add/subt, but some languages won't. Assuming you wanted to add a 1 to your IntRec, I would have coded it like this: Principal = ((FirstPeriodInterestReceived+1) * Principal)-((FirstPeriodInterestPaid+1) * Principal); to ensure that the calculations are done in the correct order in any language. The structure of your IF statements if i = 1 then ...; if i >= 1 then ...; implies that the first then clause will be applied when i = 1, and the second when i is greater than or equal to 1. In other words, the second then clause will ALWAYS be executed, which I don't think is what you want. You're very close! Tom

TomKari · ‎03-23-2013

Hi, Job This looks to me like a school exercise, so first of all congratulations on studying SAS. It is an excellent software tool, and will stand you in very good stead through the years. I do see some coding problems. I'm not going to point them out at this stage, as learning to debug your own code is a very important skill. However, the first thing that I did when I copied your code was to make some format changes. Here's how I would have coded it: data; Principal = 2350000; AnnualInterestReceived = 0.1425; AnnualInterestPaid = 0.0743936167; MonthlyInterestReceived = AnnualInterestReceived / 12; MonthlyInterestPaid = AnnualInterestPaid / 12; OtherPeriodInterestReceived = MonthlyInterestReceived * 6; OtherPeriodInterestPaid = MonthlyInterestPaid * 6; FirstPeriodInterestReceived = MonthlyInterestReceived * 4; FirstPeriodInterestPaid = MonthlyInterestPaid * 4; Payment = 391667; do i = 1 to 7; if i = 1 then Principal = (FirstPeriodInterestReceived+1) * Principal-(FirstPeriodInterestPaid) * Principal; if i >= 1 then Principal = (OtherPeriodInterestReceived+1) * Principal-(OtherPeriodInterestPaid) * Principal; output; end; proc print; var Principal; run; Good variable names, structure, and spacing are incredibly important to understanding code. Take a look at this, and run it, and see if you can find some of the problems. Report back, and we'll continue the discussion. Tom

TomKari · ‎03-23-2013

I agree with Haikuo. I don't have access to the metadata server environment any more, but I did the same thing that she shows with no problem. I don't really know what to suggest, if nobody has any ideas that help you out throw it over the wall to Tech. Support. I suspect you're doing something that you're not describing that is causing the problem. Tom

TomKari · ‎03-19-2013

Hi, Andreas When I find problems in the documentation, I submit them to tech. support. Up till now, they've accepted them with good grace. Tom

TomKari · ‎03-15-2013

Seja bem-vindo! Tom

TomKari · ‎03-14-2013

I tried the url you provided a couple of ways: 1. When I just dropped it into my browser, it redirected me to www.energystar.gov/index.cfm?pgw_code=DE%2Fdehumid%5Fprod%5Flist%2Exls&resultsPerPage=50&message_id=fap%5Fval%5Finvalid%5Fpgw%5Fcode&fuseaction=FIND_A_PRODUCT.showFAPHome 2. When I tried reading it in SAS, I got basically an empty dataset. I think your link might be incorrect. Are you sure it works? Tom

TomKari · ‎03-12-2013

Generally, at SAS installation the config files are set up so that every user gets a WORK library that is unique to them. If the config environment has been changed so that users are sharing a WORK library, that could account for this problem. If this is the case, I STRONGLY recomment that you modify the configs to go back to the default, otherwise you will have continual random occurences of this type. If you run the following statement: libname work list; it will show you what directory is being used for WORK. I can't think offhand of anything else that would account for this. What platform are your users running SAS on?

TomKari · ‎03-09-2013

Hi, Scott If nobody on the forum comes up with an answer, I wouldn't hesitate to throw it to SAS support. That's one of the ways they find out about improvements users would like in the product. Tom

TomKari · ‎03-09-2013

Hi, HB I've done this sort of thing a couple of times. Your idea is sound, it'll just come down to how messy the data is. One very good tool for this kind of thing is the PRX suite of functions, to use Regular Expressions. The good news is, they are INCREDIBLY powerful and flexible. The bad news is, they can be INCREDIBLY difficult to figure out exactly what you want, and to get them working properly. Good luck! Tom

TomKari · ‎03-09-2013

Hi, BJ I'm the newest of the new with regards to OSI PI, I didn't even know it existed until I saw your post. I took a look at their website, and it looks like you have a couple of options. I think the best is from the datasheet for the "PI Data Access" product, which states: " SQL Data Access Tools expose the PI System as a relational database – with tables and relationships – and make it accessible through SQL queries. The PI Data Access SQL tools support the three major relational database standards (OLE DB, ODBC and JDBC). This allows you to integrate your PI System data with external systems and facilitates the development of custom applications." The SAS/Access suite of products can easily access both OLE DB and ODBC data sources, so this would be my first choice. Another option is as a web service. Again, the "PI Data Access" sheet says: "PI Web Services™ exposes PI System data to Web Service client applications based on the Simple Object Access Protocol (SOAP). This is ideal for systems integration/ orchestration scenarios and the development of custom web and mobile applications." and SAS can consume web services. However, I assume you want to use SAS as a data analysis tools, which implies significant volume. If I'm after a large volume of data I feel that an ODBC-type connection will produce orders-of-magnitude better performance than a web service. Good luck, let us know how it turns out! Tom

TomKari · ‎03-08-2013

In 's post, the "dir /s c:\ *.* > listing.txt" will create a file named listing.txt that contains the results of the "dir" statement, in other words a listing of all of the files on the disk. In my code, the "infile "C:\listing.txt";" statement will establish this as the file that I read the directory information from, in the "input;" statement. Using an input statement with just a semicolon will read a record, and store it in a variable named _infile_, which I then copy to test_rec and parse.

TomKari · ‎03-08-2013

No, there is no identity option in SAS. Perhaps the undocumented monotonic() function could be useful http://www.amadeus.co.uk/sas-technical-services/tips-and-techniques/sql/the-monotonic-function/.

TomKari · ‎03-08-2013

Here's some code that I've used for a while. You may need to change the date and time informats, as the "dir" command uses your system settings. Tom data dirlist; length test_rec $ 4096; retain vol_let vol_name vol_ser dir_name first_dir; length dir_name first_dir $ 1024; length file_name $ 256; length file_prefix $ 256; length file_ext $ 256; format file_date yymmdd10.; format file_time time5.; drop test_rec num_dots num_slash; infile "C:\listing.txt"; input; test_rec = _infile_; if substr(test_rec, 1, 1) ^= " " then do; if substr(test_rec, 25, 5) = "<DIR>" | substr(test_rec, 25, 10) = "<JUNCTION>" then; else do; file_date = input(substr(test_rec, 1, 10), ddmmyy10.); file_time = input(substr(test_rec, 13, 8), time8.); file_size = input(substr(test_rec, 22, 17), comma17.); file_name = substr(trim(test_rec), 40); num_dots = countc(file_name, ".", "o"); if num_dots = 1 then do; file_prefix = scan(file_name, 1, "."); file_ext = scan(file_name, 2, "."); end; else if num_dots = 0 then do; file_prefix = file_name; file_ext = ""; end; else do; file_prefix = reverse(scan(reverse(file_name), 2, ".")); file_ext = reverse(scan(reverse(file_name), 1, ".")); end; output; end; end; else if substr(test_rec, 1, 14) = " Directory of " then do; dir_name = substr(trim(test_rec), 15); num_slash = countc(dir_name, "\", "o"); if num_slash = 1 then first_dir = dir_name; else first_dir = scan(dir_name, 1, "\")||"\"||scan(dir_name, 2, "\"); end; else if substr(test_rec, 1, 17) = " Volume in drive " then do; vol_let = substr(test_rec, 18, 1); vol_name = substr(trim(test_rec), 23); end; else if substr(test_rec, 1, 25) = " Volume Serial Number is " then do; vol_ser = substr(trim(test_rec), 26); end; run;

Online Status	Offline
Date Last Visited	‎07-11-2025 09:14 PM