I do not understand the value or point of this. Both examples seem more
complicated than either of the two one line statements that Kevin has below.
I do not understand how this is connected to Greg concept of making Fileman
language independent.
Jim Gray
----- Original Message -----
From: "Michael Zacharias" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Monday, February 06, 2006 3:52 PM
Subject: Re: [Hardhats-members] Making Fileman language independent?
This is something I've thought about for a long time too. I've always
thought
that Fileman could benefit from it's own scripting language (FSL?)
Profile's
DataQwik has done this, and it is quite elegant. Using Kevin's example
below,
obtaining a patient's name can be reduced to something like:
N Pat,Name
S Pat=&&CreateObject("Patient",1234)
S Name=Pat.Name
Or even sql:
N sql,NAM
k rs,err
S sql="NAME FROM PATIENT WHERE ID=1234"
F D &&SqlSelect(sql,.rs,.err) Q:$D(err) D
. S NAM=$P(rs,$C(9),1)
. Q
(note I am sure I've screwed up the syntax as it has been a few months
since
I've had to do this!!).
Michael
--- Kevin Toppenberg <[EMAIL PROTECTED]> wrote:
Well, the more I have used M, the more I find that it is much easier
to do the low level coding than it is to use the higher level
interface. I think that says something significant--since it is
usually harder to do lower-level coding E.g. c++ is easier than c,
which is easier than assembly, which is easier than machine byte code.
But
set name=$piece($get(^DPT(1234,0)),"^",1)
is just easier than
do GETS^DIQ(200,1234_",",.01,,"TMGOUT","TMGERR")
(more code here to parse TMGOUT)
(Just to do this example, I had to pull out the manueal to get the
parameters correct.)
But how about a compromise?
Set up a special category of platform-independant-code. Programmers
can $order through an index if they want, but then they will fail to
qualify as XYZ type code. Then, there would need to be some reason
that users would want to have their code be XYZ status.
Kevin
>
> >I can't
> > see
> > that happening.
> >
>
> Maybe not, but one thing is sure: It never will happen if everyone just
> shrugs their shoulders and says that they can't see it happening.
> Defeatism is not the way to make VistA succeed.
>
-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log
files
for problems? Stop! Download the new AJAX search engine that makes
searching your log files as easy as surfing the web. DOWNLOAD SPLUNK!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid3432&bid#0486&dat1642
_______________________________________________
Hardhats-members mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hardhats-members
__________________________________________________________
Find your next car at http://autos.yahoo.ca
-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log
files
for problems? Stop! Download the new AJAX search engine that makes
searching your log files as easy as surfing the web. DOWNLOAD SPLUNK!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=103432&bid=230486&dat=121642
_______________________________________________
Hardhats-members mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hardhats-members
-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log files
for problems? Stop! Download the new AJAX search engine that makes
searching your log files as easy as surfing the web. DOWNLOAD SPLUNK!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=103432&bid=230486&dat=121642
_______________________________________________
Hardhats-members mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hardhats-members
