~ubuntu-branches/debian/jessie/eso-midas/jessie

« back to all changes in this revision

Viewing changes to prim/proc/t2namecol.prg

  • Committer: Package Import Robot
  • Author(s): Ole Streicher
  • Date: 2014-04-22 14:44:58 UTC
  • Revision ID: package-import@ubuntu.com-20140422144458-okiwi1assxkkiz39
Tags: upstream-13.09pl1.2+dfsg
ImportĀ upstreamĀ versionĀ 13.09pl1.2+dfsg

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
! @(#)t2namecol.prg     19.1 (ES0-DMD) 02/25/03 14:09:06
 
2
! +++++++++++++++++++++++++++++++++++++++++++++++++++++++
 
3
!
 
4
! .IDENTIFICATION
 
5
!
 
6
!  MIDAS Command : t2namecol.prg
 
7
!  TABLE Subsystem
 
8
!  J.D.Ponz                ESO - Garching    5 APR 89
 
9
!  901108  KB  fix WRITE/KEYW HISTORY stuff...
 
10
!
 
11
! .PURPOSE
 
12
!
 
13
!    implements
 
14
!
 
15
!  NAME/COLUMN    table-name  column [column] [unit] [format] [type]
 
16
!
 
17
! ----------------------------------------------------------------------
 
18
!
 
19
DEFINE/PARAM P1 ? TABLE  "Enter table:"
 
20
DEFINE/PARAM P2 ? CHAR   "Enter column label:"
 
21
!
 
22
WRITE/KEYW HISTORY "{MID$CMND(1:4)}/{MID$CMND(11:14)} "
 
23
!
 
24
RUN MID_EXE:tdatatbl