Providing software solutions since 1976
Sample 25429: Report writing using PUT statement (II)
 |  |  |  |  |
These sample files and code examples are provided by SAS Institute Inc. "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and fitness for a particular purpose. Recipients acknowledge and agree that SAS Institute shall not be liable for any damages whatsoever arising out of their use of this material. In addition, SAS Institute will provide no support for the materials contained herein.
This sample is from the SAS Sample Library. For additional information refer to SAS Help and Online Documentation.
/****************************************************************/
/* S A S S A M P L E L I B R A R Y */
/* */
/* NAME: REPORT5 */
/* TITLE: Report Writing Using PUT Statement (II) */
/* PRODUCT: SAS */
/* SYSTEM: ALL */
/* KEYS: REPO DATASTEP FILE PUT PRINT DO LOOP DSOPTION END= */
/* PROCS: PRINT */
/* DATA: */
/* */
/* SUPPORT: UPDATE: */
/* REF: */
/* MISC: */
/* */
/****************************************************************/
OPTIONS LS=132;
DATA A;
INPUT DATE DATE7. TYPE $
SALES RD CGS SELLING GENERAL ADMIN DEPREC OINC TAX;
FORMAT DATE MONYY5.;
CARDS;
01JAN77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
01FEB77 ACTUAL 228563 6857 121938 50992 22171 11085 826 0 7641
01MAR77 ACTUAL 233134 6994 124377 52012 22614 11307 830 23425 19981
01APR77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
01MAY77 ACTUAL 228563 6857 121938 50992 22171 11085 826 0 7641
01JUN77 ACTUAL 233134 6994 124377 52012 22614 11307 830 23425 19981
01JUL77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
01AUG77 ACTUAL 228563 6857 121938 50992 22171 11085 826 0 7641
01SEP77 ACTUAL 233134 6994 124377 52012 22614 11307 830 23425 19981
01OCT77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
01NOV77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
01DEC77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
;
PROC PRINT;
RUN;
DATA _NULL_;
/* Set up PRINT */
FILE PRINT N=PS;
TITLE 'A.B. SMITH AND COMPANY, INC';
TITLE2 'INCOME STATEMENT';
/* Loop through data */
DO C=35 TO 120 BY 15;
SET A END=EOF;
/* Compute new values */
NETSALES=SALES-RD;
GPROFIT=NETSALES-CGS;
TOTEXP=SELLING+GENERAL+ADMIN+DEPREC;
OPINC=GPROFIT-TOTEXP;
NETIBT=OPINC+OINC;
NETINC=NETIBT-TAX;
/* Print out values */
PUT #2 @C+5 DATE MONYY5.
// 'GROSS SALES' @C SALES DOLLAR10.
/ 'LESS RETURNS & DISCOUNTS' @C RD COMMA10.
/ @C ' --------'
/ ' NET SALES' @C NETSALES COMMA10.
// 'COST OF GOODS SOLD' @C CGS COMMA10.
/ @C ' --------'
/ ' GROSS PROFIT' @C GPROFIT COMMA10.
// 'OPERATING EXPENSES:'
/ ' SELLING' @C SELLING COMMA10.
/ ' GENERAL' @C GENERAL COMMA10.
/ ' ADMINISTRATION' @C ADMIN COMMA10.
/ ' DEPRECIATION' @C DEPREC COMMA10.
/ @C ' --------'
/ @C TOTEXP COMMA10.
/ ' OPERATING INCOME' @C OPINC COMMA10.
/ 'OTHER INCOME(EXPENSE)' @C OINC COMMA10.
/ @C ' --------'
/ ' NET INCOME BEFORE TAX' @C NETIBT COMMA10.
/ 'INCOME TAXES' @C TAX COMMA10.
/ @C ' --------'
/ ' NET INCOME' @C NETINC DOLLAR10.
/ @C '=========='
;
END;
IF NOT EOF THEN PUT _PAGE_;
RUN;
These sample files and code examples are provided by SAS Institute Inc. "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and fitness for a particular purpose. Recipients acknowledge and agree that SAS Institute shall not be liable for any damages whatsoever arising out of their use of this material. In addition, SAS Institute will provide no support for the materials contained herein.
WORK.A
OBS DATE TYPE SALES RD CGS SELLING GENERAL ADMIN DEPREC OINC TAX
1 JAN77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
2 FEB77 ACTUAL 228563 6857 121938 50992 22171 11085 826 0 7641
3 MAR77 ACTUAL 233134 6994 124377 52012 22614 11307 830 23425 19981
4 APR77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
5 MAY77 ACTUAL 228563 6857 121938 50992 22171 11085 826 0 7641
6 JUN77 ACTUAL 233134 6994 124377 52012 22614 11307 830 23425 19981
7 JUL77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
8 AUG77 ACTUAL 228563 6857 121938 50992 22171 11085 826 0 7641
9 SEP77 ACTUAL 233134 6994 124377 52012 22614 11307 830 23425 19981
10 OCT77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
11 NOV77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
12 DEC77 ACTUAL 235840 7075 125821 52616 22876 11438 820 8050 12087
OUTPUT from DATA _NULL_
A.B. SMITH AND COMPANY, INC
INCOME STATEMENT
JAN77 FEB77 MAR77 APR77 MAY77 JUN77
GROSS SALES $235,840 $228,563 $233,134 $235,840 $228,563 $233,134
LESS RETURNS & DISCOUNTS 7,075 6,857 6,994 7,075 6,857 6,994
-------- -------- -------- -------- -------- --------
NET SALES 228,765 221,706 226,140 228,765 221,706 226,140
COST OF GOODS SOLD 125,821 121,938 124,377 125,821 121,938 124,377
-------- -------- -------- -------- -------- --------
GROSS PROFIT 102,944 99,768 101,763 102,944 99,768 101,763
OPERATING EXPENSES:
SELLING 52,616 50,992 52,012 52,616 50,992 52,012
GENERAL 22,876 22,171 22,614 22,876 22,171 22,614
ADMINISTRATION 11,438 11,085 11,307 11,438 11,085 11,307
DEPRECIATION 820 826 830 820 826 830
-------- -------- -------- -------- -------- --------
87,750 85,074 86,763 87,750 85,074 86,763
OPERATING INCOME 15,194 14,694 15,000 15,194 14,694 15,000
OTHER INCOME(EXPENSE) 8,050 0 23,425 8,050 0 23,425
-------- -------- -------- -------- -------- --------
NET INCOME BEFORE TAX 23,244 14,694 38,425 23,244 14,694 38,425
INCOME TAXES 12,087 7,641 19,981 12,087 7,641 19,981
-------- -------- -------- -------- -------- --------
NET INCOME $11,157 $7,053 $18,444 $11,157 $7,053 $18,444
========== ========== ========== ========== ========== ==========
A.B. SMITH AND COMPANY, INC
INCOME STATEMENT
JUL77 AUG77 SEP77 OCT77 NOV77 DEC77
GROSS SALES $235,840 $228,563 $233,134 $235,840 $235,840 $235,840
LESS RETURNS & DISCOUNTS 7,075 6,857 6,994 7,075 7,075 7,075
-------- -------- -------- -------- -------- --------
NET SALES 228,765 221,706 226,140 228,765 228,765 228,765
COST OF GOODS SOLD 125,821 121,938 124,377 125,821 125,821 125,821
-------- -------- -------- -------- -------- --------
GROSS PROFIT 102,944 99,768 101,763 102,944 102,944 102,944
OPERATING EXPENSES:
SELLING 52,616 50,992 52,012 52,616 52,616 52,616
GENERAL 22,876 22,171 22,614 22,876 22,876 22,876
ADMINISTRATION 11,438 11,085 11,307 11,438 11,438 11,438
DEPRECIATION 820 826 830 820 820 820
-------- -------- -------- -------- -------- --------
87,750 85,074 86,763 87,750 87,750 87,750
OPERATING INCOME 15,194 14,694 15,000 15,194 15,194 15,194
OTHER INCOME(EXPENSE) 8,050 0 23,425 8,050 8,050 8,050
-------- -------- -------- -------- -------- --------
NET INCOME BEFORE TAX 23,244 14,694 38,425 23,244 23,244 23,244
INCOME TAXES 12,087 7,641 19,981 12,087 12,087 12,087
-------- -------- -------- -------- -------- --------
NET INCOME $11,157 $7,053 $18,444 $11,157 $11,157 $11,157
========== ========== ========== ========== ========== ==========
This example demonstrates how to write a report using PUT statement.
| Type: | Sample |
| Topic: | SAS Reference ==> DATA Step Query and Reporting ==> Creating Reports ==> Non Graphical |
| Date Modified: | 2005-12-08 11:34:46 |
| Date Created: | 2005-05-23 13:53:10 |
Operating System and Release Information
| Product Family | Product | Host | SAS Release | |
| Starting | Ending | |||
| SAS System | Base SAS | All | n/a | n/a |
