|
This message is in MIME format. Since your mail reader does not understand this format, some or all of this message may not be legible. -- [ Picked text/plain from multipart/alternative ] Sndm is the e-mail sender that I use. I don't know the snddst command that well, in order to handle attachments, in fact thats why I downloaded this SNDM command instead.. Its free, and can be downloaded from here... http://homepage1.nifty.com/uzaemon/ It's toward the bottom of the page in the table.. hth, tim > -----Original Message----- > From: Rick Rayburn [SMTP:the400man@hotmail.com] > Sent: Thursday, August 15, 2002 8:48 AM > To: midrange-l@midrange.com > Subject: RE: Sending a user results of a query > > This also looks good Tim...I cannot find SNDM on my box (v4.3 may be the > problem?)...questions... > > 1. is CSV the default for CPYTOIMPF? > 2. can this file be e-mailed WITHOUT SNDM from the 400 directly and, if > so, > do you know how and the specific parameters involved (how does the SNDDST > command work if it is related here?) > > > Thanks for assist, tim. > > Rick > > > >From: "Hatzenbeler, Tim" <thatzenbeler@clinitech.net> > >Reply-To: midrange-l@midrange.com > >To: "'midrange-l@midrange.com'" <midrange-l@midrange.com> > >Subject: RE: Sending a user results of a query > >Date: Thu, 15 Aug 2002 08:36:29 -0700 > > > >This message is in MIME format. Since your mail reader does not > understand > >this format, some or all of this message may not be legible. > >-- > >[ Picked text/plain from multipart/alternative ] > >Scott's solutions is very nice, and can be used for other purposes as > >well... But here is another method that I have used in the past.. > > > > STRQMQRY QMQRY(ALLOCATED) OUTPUT(*OUTFILE) + > > QMFORM(*QMQRY) OUTFILE(QTEMP/ALLOCATE) + > > ALWQRYDFN(*YES) > > > > CPYTOIMPF FROMFILE(QTEMP/ALLOCATE) + > > TOSTMF('\timtest\allocate.csv') + > > MBROPT(*REPLACE) RCDDLM(*CRLF) > > > > SNDM FROM(THATZENBELER@xxxxx.NET) + > > FILE(TESTMAIL) SUBJECT('ALLOCATION DATA') + > > ATTACHMENT('Timtest/ALLOCATE.csv') + > > REPLYTO(THATZENBELER@xxxxx.NET) + > > TMPDIR('/Timtest') > > > > > -----Original Message----- > > > From: Rick Rayburn [SMTP:the400man@hotmail.com] > > > Sent: Thursday, August 15, 2002 8:10 AM > > > To: midrange-l@midrange.com > > > Subject: RE: Sending a user results of a query > > > > > > this is great Scott! > > > So, let me see if I have some of this straight: I read in the spool > file > > > attributes from the dataq, call the clp program (e.g.'MRLMKTD3C') to > >copy > > > spool file to a, for instance, 132 byte flat PF and then execute a > > > CPYTOINPF > > > command to send a CSV-formatted file (is CSV the default on CPYTOINPF) > > > to...????....mail server?...another 400?...any address on my LAN?... > > > > > > Thanks again Scott. This info is very helpful. > > > > > > Rick > > > > > > > > > > > > >From: Scott Mildenberger <Smildenber@Washcorp.com> > > > >Reply-To: midrange-l@midrange.com > > > >To: "'midrange-l@midrange.com'" <midrange-l@midrange.com> > > > >Subject: RE: Sending a user results of a query > > > >Date: Thu, 15 Aug 2002 07:56:19 -0600 > > > > > > > >Rick, > > > > > > > >Below is a sample program that reads a data q and processes the spool > > > files > > > >from it. CPYTOIMPF copies a PF to an import file which can be a > comma > > > >delimited file. It, and its cousin CPYFRMIMPF, make it very easy to > > > >transfer data back and forth between different systems. > > > > > > > >Scott Mildenberger > > > > > > > > > > > > h dftactgrp(*no) > > > > h actgrp(*new) > > > > h bnddir('MRLBIND') > > > > h option(*srcstmt : *noshowcpy : *nodebugio) > > > > > > > > * > > > > * Calls QRCVDTAQ for a data queue associated with a spool > file. > > > > * The wait time is negative so it always waits for an entry. > > > > * > > > > * Parameters > > > > * > > > > d dataq S 10A inz('MRLMKTD3') > > > > d Library S 10a inz('*LIBL ') > > > > d Length S 5 0 inz(132) > > > > d Wait S 5 0 > > > > * > > > > d Spool_Num_Dec S 5 0 > > > > * > > > > * Outq Information returned to the Dataq > > > > * > > > > d Data DS > > > > d Function 10a > > > > d Type 2a > > > > d Job_Name 10a > > > > d User_Name 10a > > > > d Job_Number 6a > > > > d Spool_File 10a > > > > d Spool_Num_Bin 8b 0 > > > > d Outq_Name 10a > > > > d Outq_Library 10a > > > > d Reserved 56a > > > > > > > > /copy common/qprotosrc,sys_utils > > > > > > > > * Set Wait time > > > > * > > > > c eval wait = -1 > > > > * > > > > c do *hival > > > > * > > > > c call 'QRCVDTAQ' > > > > c parm dataq > > > > c parm Library > > > > c parm length > > > > c parm data > > > > c parm wait > > > > * > > > > * Use a control Spool file to terminate the program > > > > * > > > > c if Spool_File = 'EXIT' > > > > c leave > > > > c end > > > > * > > > > c z-add Spool_Num_Bin Spool_Num_Dec > > > > * > > > > * Call send CLP > > > > * > > > > c call(e) 'MRLMKTD3C' > > > > c parm spool_file > > > > c parm job_name > > > > c parm user_name > > > > c parm job_number > > > > c parm spool_num_dec > > > > * > > > > c enddo > > > > * > > > > c eval *inlr = *on > > > > > > > > > -----Original Message----- > > > > > From: Rick Rayburn [mailto:the400man@hotmail.com] > > > > > Sent: Thursday, August 15, 2002 6:54 AM > > > > > To: midrange-l@midrange.com > > > > > Subject: Re: Sending a user results of a query > > > > > > > > > > > > > > > Attaching DTAQ to OUTQ? That's great! Can you tell me the > > > > > parameters to > > > > > check for off of the RCVDTAQ command for a spool file coming in? > > > > > > > > > > Also, I have never tried the CPYTOIMPF command...can you tell > > > > > me a little > > > > > about it? Is it only for spool files? Does it automatically create > >CSV > > > > > formatted file? What is it generally used for? Anything you > > > > > can share will > > > > > be of great assistance Vernon. > > > > > > > > > > Thanks for your time as always. > > > > > > > > > > Rick Rayburn > > > > > > > > > > > > > >_______________________________________________ > > > >This is the Midrange Systems Technical Discussion (MIDRANGE-L) > mailing > > > list > > > >To post a message email: MIDRANGE-L@midrange.com > > > >To subscribe, unsubscribe, or change list options, > > > >visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l > > > >or email: MIDRANGE-L-request@midrange.com > > > >Before posting, please take a moment to review the archives > > > >at http://archive.midrange.com/midrange-l. > > > > > > > > > > > > > > > _________________________________________________________________ > > > Join the world's largest e-mail service with MSN Hotmail. > > > http://www.hotmail.com > > > > > > _______________________________________________ > > > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing > > > list > > > To post a message email: MIDRANGE-L@midrange.com > > > To subscribe, unsubscribe, or change list options, > > > visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l > > > or email: MIDRANGE-L-request@midrange.com > > > Before posting, please take a moment to review the archives > > > at http://archive.midrange.com/midrange-l. > >This e-mail message, including any attachments, is for the sole use of > the > >intended recipient(s) and may contain confidential or privileged > >information. Any unauthorized review; use, disclosure or distribution is > >prohibited. If you are not the intended recipient, please contact the > >sender by reply e-mail and destroy the message. > >_______________________________________________ > >This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing > list > >To post a message email: MIDRANGE-L@midrange.com > >To subscribe, unsubscribe, or change list options, > >visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l > >or email: MIDRANGE-L-request@midrange.com > >Before posting, please take a moment to review the archives > >at http://archive.midrange.com/midrange-l. > > > > > _________________________________________________________________ > Join the world's largest e-mail service with MSN Hotmail. > http://www.hotmail.com > > _______________________________________________ > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing > list > To post a message email: MIDRANGE-L@midrange.com > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l > or email: MIDRANGE-L-request@midrange.com > Before posting, please take a moment to review the archives > at http://archive.midrange.com/midrange-l. This e-mail message, including any attachments, is for the sole use of the intended recipient(s) and may contain confidential or privileged information. Any unauthorized review; use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy the message.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
