home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #19 / NN_1992_19.iso / spool / bit / listserv / sasl / 3986 < prev    next >
Encoding:
Text File  |  1992-09-02  |  1.4 KB  |  41 lines
  1. Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
  2. Path: sparky!uunet!paladin.american.edu!auvm!GTE.COM!GLG2
  3. X-Mailer: ELM [version 2.3 PL10]
  4. Message-ID: <9209011949.AA09643@bunny.gte.com>
  5. Newsgroups: bit.listserv.sas-l
  6. Date:         Tue, 1 Sep 1992 15:49:58 EDT
  7. Reply-To:     Gail Gill <glg2@GTE.COM>
  8. Sender:       "SAS(r) Discussion" <SAS-L@UGA.BITNET>
  9. From:         Gail Gill <glg2@GTE.COM>
  10. Subject:      Help with a more efficient way to program
  11. Comments: To: sas-l%marist.bitnet@cunyvm.cuny.edu
  12. Lines: 27
  13.  
  14. Hello fellow SAS-lers,
  15.  
  16.   I am looking for a more efficient way to code this, perhaps with proc
  17. sql or summary or tablulate? I need to do this for nine clasgrps and
  18. 4 pubdtes each. I would appreciate any suggestions.
  19.  
  20.  Thanks in advance.
  21.  
  22.   Gail Gill
  23.  
  24. Code follows:
  25.  
  26. if clasgrp=1 then do;
  27.  if pubdte=198804 then do;
  28.    if listing=1 and option=0 then pricfam0=billrate;
  29.     else if listing=1 and option=1 then pricfam0=billrate-adonrev;
  30.       else pricfam0=78.89;
  31.    if space=1 and option=0 then pricfam1=billrate;
  32.     else if space=1 and option=1 then pricfam1=billrate-adonrev;
  33.      else pricfam1=976.71;
  34.    if display=1 and option=0 then pricfam2=billrate;
  35.     else if display=1 and option=1 then pricfam2=billrate-adonrev;
  36.      else pricfam2=7604.32;
  37.    if tradmk=1 and option=0 then pricfam3=billrate;
  38.     else if tradmk=1 and option=1 then pricfam3=billrate-adonrev;
  39.      else pricfam3=680.10;
  40.  end;
  41.