FriedEgg

filename cp temp;
proc groovy classpath=cp;

submit parseonly;
import javax.crypto.spec.SecretKeySpec
import javax.crypto.spec.IvParameterSpec
import javax.crypto.Cipher

class GroovyCrypter {
  def expandKey (def secret) {

FriedEgg

/*Sign up for the Bing Translator, 2million characters/month of free translating!*/
%let client_id=<<Your Client ID>>;
%let client_secret=<<Your Client Secret>>;
%let text=Merry Christmas;
%let from=en; /*English*/
%let to=es; /*Spanish*/
/*Link to language codes: http://msdn.microsoft.com/en-us/library/hh456380.aspx*/
 
 
filename ivy "%sysfunc(pathname(work,l))/ivy.jar";

FriedEgg

filename inc temp;
data _null_;
file inc;
input @;
put _infile_;
cards4;
filename cp temp;
proc groovy classpath=cp;

add sasjar="commons_codec" version="1.7.0.0_SAS_20121211183158"; *version is specific to SAS Installation and may differ from this;

FriedEgg

/*-----------------------------------------------------------------------------------------------------------------------------------------
*-Usage Parameters
*/
 
 
    %let api_key      = <YOUR TWITTER API_KEY>;
    %let api_secret   = <YOUR TWITTER API_SECRET>;
    %let search_query = %23SASGF13+OR+%23SASGF14+OR+%23SASGF15;
 
 

FriedEgg

import com.sas.iom.SASIOMDefs.GenericError;
import com.sas.services.connection.ConnectionInterface;
import com.sas.services.connection.ZeroConfigWorkspaceServer;
import com.sas.services.connection.ManualConnectionFactoryConfiguration;
import com.sas.services.connection.ConnectionFactoryManager;
import com.sas.services.connection.ConnectionFactoryInterface;
import com.sas.services.connection.ConnectionFactoryException;
import com.sas.services.connection.SecurityPackageCredential;

import com.sas.iom.SAS.ILanguageService;

FriedEgg

from win32com.client.dynamic import Dispatch

factory = Dispatch("SASObjectManager.ObjectFactoryMulti2")

serverDef = Dispatch("SASObjectManager.ServerDef")  # no extra properties...  local/zero-config server

sas = factory.CreateObjectByServer("SASApp", True, serverDef, "", "")

code = """
*pre-code;

FriedEgg

/* configure connection to metadata server */
options metaserver="hostname" metaport=8561;

/* here we are defining out metadata query */
/* we are making a call to GetMetadataObjects 
   and requesting a response listing all SAS 
   Workspace Servers defined in metadata 
   along with the associated properties which
   contain the work reconnect in their 
   property name.                          */

FriedEgg

%let api_key=<<YOUR GOOGLE API_KEY>>;

filename cp  temp;
 
filename ivy "%sysfunc(pathname(work,l))/ivy.jar";
 
proc http 
   method = 'get'
   url    = 'http://central.maven.org/maven2/org/apache/ivy/ivy/2.3.0-rc1/ivy-2.3.0-rc1.jar'
   out    = ivy

FriedEgg

proc fcmp;
 
 
    function to_jalali(sasdate) $ 200;
 
 
        y=year(sasdate)-1600;
        m=month(sasdate)-1;
        d=day(sasdate)-1;
 

FriedEgg

/* inspired by Rick Wicklin -- http://blogs.sas.com/content/iml/2015/02/11/binary-heart/ */

proc fcmp outlib=work.funcs.graph;
   function heartx(t);
      return(16*sin(t)**3);
      endsub;
  
   function hearty(t);
      return(13*cos(t) - 5*cos(2*t) - 2*cos(3*t) - cos(4*t));
      endsub;