Thank you all...
I'll give your suggestions a shot!
[Non-text portions of this message have been removed]
I'll give your suggestions a shot!
[Non-text portions of this message have been removed]
--- On Wed, 6/4/08, bbelzer42 <bbelzer@...> wrote:
From: bbelzer42 <bbelzer@...>
Subject: [Vantage] BAM .p code to write a text file
To: vantage@yahoogroups.com
Date: Wednesday, June 4, 2008, 10:54 PM
Hello,
I was wondering if anyone has a sample alert .p file that creates a
basic .txt file.
Just looking for anything that will get me started.
I have a program that will automatically send a crystal report if a
trigger file is created in a monitored folder.
The .txt file just needs to have the report name and a key field in
it, and it will use that data to pull up the proper report and place
the parameter in before exporting it to pdf and emailing it out.
The result: when a DMR is generated, several employees will get an
email with a crystal report showing all sorts of crazy info about the
part in question. And the best part, it would be automated.
If I get it to work, I'd be more than happy to share...
Thanks!
Ben
----------
/* pcSavePartDescription */
/* DEFINE FRAME fResults.
assign frame fResults:centered = true.
assign frame fResults:selectable = True.
assign frame fResults:resizable = True. */
DEFINE INPUT PARAMETER cDesc AS CHARACTER NO-UNDO.
/*DEFINE OUTPUT PARAMETER cReturn AS CHARACTER NO-UNDO. */
DEFINE VARIABLE cTextString as CHARACTER FORMAT "X(80)".
DEFINE VARIABLE cNewDesc as CHARACTER FORMAT "X(80)".
DEFINE VARIABLE cReadFile as CHARACTER NO-UNDO.
DEFINE VARIABLE cFilePath as CHARACTER NO-UNDO.
DEFINE VARIABLE iCount as INTEGER NO-UNDO.
cNewDesc = "New Bladder Desc_2".
/* message cModel view-as alert-box. */
cFilePath = "V:\mfgsys61\ud\Procedures\Bladder.txt".
cReadFile = "".
OUTPUT TO VALUE(Search(cFilePath)).
/* EXPORT(cNewDesc). */
EXPORT(cDesc).
OUTPUT close.
[Non-text portions of this message have been removed]