LISTSERV at the University of Georgia
Menubar Imagemap
Home Browse Manage Request Manuals Register
Previous messageNext messagePrevious in topicNext in topicPrevious by same authorNext by same authorPrevious page (May 2009, week 1)Back to main SAS-L pageJoin or leave SAS-L (or change settings)ReplyPost a new messageSearchProportional fontNon-proportional font
Date:         Tue, 5 May 2009 08:22:42 -0400
Reply-To:     Gerhard Hellriegel <gerhard.hellriegel@T-ONLINE.DE>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         Gerhard Hellriegel <gerhard.hellriegel@T-ONLINE.DE>
Subject:      Re: Macro trouble
Content-Type: text/plain; charset=ISO-8859-1

I see some problems, there might be others too:

%if &hovedgruppe ^= ' ' and &arkivskaper ^= ' ' %then %do; where hovedgruppe eq "&hovedgruppe" and arkivskaper eq "&arkivskaper" %end; %else %if &hovedgruppe ^= ' ' and &arkivskaper = ' ' %then %do; where hovedgruppe eq "&hovedgruppe" %end; %else %if &hovedgruppe = ' ' and &arkivskaper ^= ' ' %then %do; where arkivskaper eq "&arkivskaper" %end;

%if &hovedgruppe ^= ' ' ... should look as:

%if &hovedgruppe ^= ...

If you compare macro variables with constants, don't use " " or ' ', cause they are not part of the contents. You can use %str() if you want.

Gerhard

On Tue, 5 May 2009 05:07:19 -0700, Anaconda <rune@FASTLANE.NO> wrote:

>The macro PICK_RECORDS below is not acting the way I want or expect it >to do. Can someone tell me what is the problem with it. > >Regards >Anaconda > > > >data ds_01; > attrib > Hovedgruppe length = $18. > Arkivskaper length = $23. > Namn_register length = $16. > Ark_per length = $21. > Dep_nr length = $1. > Test_ferdig length = $10. > Test_resultat length = $19. > eph_dato_utg length = $10. > ; > infile cards; > input > @01 Hovedgruppe $18. > @20 Arkivskaper $23. > @44 Namn_register $16. > @61 Ark_per $21. > @84 Dep_nr $1. > @88 Test_ferdig $10. > @98 Test_resultat $19. > @118 Eph_dato_utg $10. > ; > datalines; >Universitetene Universitetet i Bergen Fond og legater >01.01.1998-11.09.2006 1 08.12.2006 Ber om opplysningar 08.12.2006 >Universitetene Universitetet i Bergen Fond og legater >01.01.1998-11.09.2006 2 08.01.2007 Ber om opplysningar 08.01.2007 >Den Norske Kyrkja M�re bisped�mmekontor >01.05.1998-30.09.2005 1 03.04.2000 Ber om opplysningar 03.04.2000 >Fylkesmennene Fylkesmannen i �stfold Administrasjon >01.01.1997-31.12.2002 1 22.10.1998 Ber om opplysningar 22.10.1998 >H�gskolene H�gskolen i Akershus >01.03.1998-31.12.2006 1 30.09.2005 Ber om opplysningar 30.09.2005 >run; > >proc sort data = ds_01 out = ds_02; > by > hovedgruppe > arkivskaper > ark_per > dep_nr > ; > where test_ferdig ne ' ' > and test_resultat ne ' ' ; >run; > >%macro pick_records(hovedgruppe = , > arkivskaper = > ); > %put HOVEDGRUPPE = &hovedgruppe; > %put ARKIVSKAPER = &arkivskaper; > proc sql; > create table _tmp_ds_02 as > select > hovedgruppe , > arkivskaper , > namn_register , > ark_per , > dep_nr , > test_resultat , > eph_dato_utg , > max(dep_nr) as _siste_dep > from ds_02 > %if &hovedgruppe ^= ' ' and &arkivskaper ^= ' ' %then >%do; > where hovedgruppe eq "&hovedgruppe" > and arkivskaper eq "&arkivskaper" > %end; > %else %if &hovedgruppe ^= ' ' and &arkivskaper = ' ' %then >%do; > where hovedgruppe eq "&hovedgruppe" > %end; > %else %if &hovedgruppe = ' ' and &arkivskaper ^= ' ' %then >%do; > where arkivskaper eq "&arkivskaper" > %end; > > group by > hovedgruppe, > arkivskaper, > namn_register, > ark_per > ; > quit; >%mend; >/* This seems to work OK */ >%pick_records(hovedgruppe = Den Norske Kyrkja, > arkivskaper = M�re bisped�mmekontor > ); >/* This one is not picking up the one record i expect */ >%pick_records(hovedgruppe = , > arkivskaper = M�re bisped�mmekontor > ); > >/* This one is not picking up the two records i expect */ >%pick_records(hovedgruppe = Universitetene, > arkivskaper = > ); > >/* I want this one to pick up all 4 records. How can i obtain that? >*/ >%pick_records(hovedgruppe = , > arkivskaper = > );


Back to: Top of message | Previous page | Main SAS-L page