HP3000-L Archives

October 1999, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Abraham Zwygart <[log in to unmask]>
Reply To:
Abraham Zwygart <[log in to unmask]>
Date:
Wed, 13 Oct 1999 14:22:45 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (36 lines)
> > !FCOPY FROM=CUST001W.QUIZ;TO=CUST001W.PROD
> Having to make a copy can be costly if the original file is large.

The original file is only 1 to 20 recods long.

....
>
> > !#  DO NOT WORK ON THE SETUP RECORD
> > !   IF STR("!_RAW_REC",1,8) <> "12345678"
> This next comment is just a pet crusade of mine: you already have
> a string variable (_raw_rec) since that is what INPUT creates.  You
> will not need to quote the variable (to make it a string) if you
> do not explicitly reference it (the "!").  I find it more readable to
> simply write:
>       IF STR(_RAW_REC,1,8) ...
>

Thanks I did not know this.

> > !      SETVAR _USER_CODE STR("!_RAW_REC",1,8)
> Ditto.  And also you may or may not have trailing blanks depending
> on if all of your user codes are 8 characters long.  If you do not
> want trailing blanks in the _USER_CODE variable you can do one of the
> following:
>          SETVAR _USER_CODE rtrim(STR(_RAW_REC,1,8))   or
>          SETVAR _USER_CODE word(_RAW_REC)   assuming that a common
>                                             delimiter separates the
fields.
>
RTRIM solved a solved a potentual problem with _EMAIL making the line to
long.
> ...
>
> regards,
> Jeff Vance, CSY

ATOM RSS1 RSS2