home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 25
/
CD_ASCQ_25_1095.iso
/
dos
/
tools
/
par330
/
exampl07.pom
< prev
next >
Wrap
Text File
|
1995-09-06
|
501b
|
23 lines
;
; NOTE: A quick-reference summary of POM commands appears in EXAMPL04.POM
;
;-------------------------------------------------------------------------------
;
; Replace every tab character with two spaces
;
CHANGE $FLINE $TAB " "
;
; Extract the columns
;
SET ProgName = $FLINE[ 1 20]
SET Descrip = $FLINE[22 99]
;
; Trim the spaces
;
TRIM ProgName "B" " "
TRIM Descrip "B" " "
;
; Output the result
;
OUTEND |"{ProgName}","{Descrip}"