Thanks Mike. This is what I was looking for!
________________________________
From: Mike Anstey <manstey@...>
To: vantage@yahoogroups.com
Sent: Thursday, August 6, 2009 1:34:57 PM
Subject: RE: [Vantage] BPM - 4GL Error Message
Â
Your problem is the way you have your If nonconf.PONum <> 0 Then
statement, that works fine when there is only one statement the then,
if you want to assign multiple items write it like this:
If nonconf.PONum <> 0 Then
DO:
assign ttdmrhead.number10 = nonconf.PONum
ttdmrhead.number11 = nonconf.PONum
ttdmrhead.number12 = nonconf.PONum.
END.
ELSE IF........
Notice I only used one assign for all three, but for this to work there
can only be a period at the end of all the assignments (in this case
number12). Or if you wish you can do three assigns with a period after
each.
____________ _________ _________ __
From: vantage@yahoogroups ..com [mailto:vantage@yahoogroups .com] On Behalf
Of melissa hietala
Sent: Thursday, August 06, 2009 3:11 PM
To: vantage@yahoogroups .com
Subject: Re: [Vantage] BPM - 4GL Error Message
I dont actually have that text in my code. My code that actually works
is:
Find First ttdmrhead where ttdmrhead.rowmod = "U" no-error.
If available ttdmrhead then do:
Find first nonconf where nonconf.dmrnum = ttdmrhead.dmrnum no-lock
no-error.
IF available nonconf then do:
If nonconf.PONum <> 0 Then
assign ttdmrhead.number10 = nonconf.PONum.
Else if nonconf.PoNum = 0 Then
{lib/PublishInfoMsg .i &InfoMsg = '"Please enter PO #, Line, and
Release"'}
end.
end.
The problem occurs when i try to add these two lines:
assign ttdmrhead.number11 = nonconf.POLine.
assign ttdmrhead.number12 = nonconf.POLine.
I am attempting to add these lines underneath the statement: assign
ttdmrhead.number10 = nonconf.PONum.
So ultimately I am attempting to populate 3 user defined fields. It
works fine if I just populate 1 field, but for some reason errors out
when i try to populate 3 fields.
____________ _________ _________ __
From: Mike Anstey <manstey@flakeboard. ca
<mailto:manstey% 40flakeboard. ca> >
To: vantage@yahoogroups .com <mailto:vantage% 40yahoogroups. com>
Sent: Thursday, August 6, 2009 12:40:52 PM
Subject: RE: [Vantage] BPM - 4GL Error Message
If you comment out the two lines you added, does it work properly?
____________ _________ _________ __
From: vantage@yahoogroups .com [mailto:vantage@ yahoogroups .com] On
Behalf
Of melissa hietala
Sent: Thursday, August 06, 2009 2:40 PM
To: vantage@yahoogroups ..com
Subject: Re: [Vantage] BPM - 4GL Error Message
No, I just put those in there to help clarify to the user group what I
was attempting to do....
Dustin Biniek
____________ _________ _________ __
From: Mike Anstey <manstey@flakeboard . ca
<mailto:manstey% 40flakeboard. ca> >
To: vantage@yahoogroups .com <mailto:vantage% 40yahoogroups. com>
Sent: Thursday, August 6, 2009 11:55:25 AM
Subject: RE: [Vantage] BPM - 4GL Error Message
Are the comments in the code as shown below (- Added to fill in
POLine)? If so they must be commented out as follows: /* - Added to
fill in POLine */
____________ _________ _________ __
From: vantage@yahoogroups .com [mailto:vantage@ yahoogroups .com] On
Behalf
Of melissa hietala
Sent: Thursday, August 06, 2009 12:57 PM
To: vantage@yahoogroups .com
Subject: [Vantage] BPM - 4GL Error Message
Hi,
I have the following code which fills in a UD field on the DMRHead table
with the PO# off of the related nonconformance table. This code fills
in the field as expected. However I would like to also fill in 2 user
defined fields with the POLine & PORelease from the corresponding
nonconformance. I add the functionality to do this with lines 7 & 8
below. However when I add these lines I am receiving the following
error message: "**e:\epicor\ mfgsys803\ Server\lib\ PublishInfoMsg. i
Line
26. ELSE with no matching THEN found in the same block. (1076)." Any
thoughts on how I can get this corrected? Thank you.
1) Find First ttdmrhead where ttdmrhead.rowmod = "U" no-error.
2) If available ttdmrhead then do:
3) Find first nonconf where nonconf.dmrnum = ttdmrhead.dmrnum no-lock
no-error.
4) IF available nonconf then do:
5) If nonconf.PONum <> 0 Then
6) assign ttdmrhead.number10 = nonconf.PONum.
7) assign ttdmrhead.number11 = nonconf.PONum. - Added to fill in
POLine
8) assign ttdmrhead.number12 = nonconf.PONum. - Added to fill in
PORelease
9) else if nonconf.PoNum = 0 Then
10) {lib/PublishInfoMsg .i &InfoMsg = '"Please enter PO #, Line, and
Release"'}
11) end.
12) end.
Dustin Biniek
____________ _________ _________ _________ _________ __
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail. yahoo.com <http://mail. yahoo.com>
[Non-text portions of this message have been removed]
[Non-text portions of this message have been removed]
____________ _________ _________ _________ _________ __
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail. yahoo.com <http://mail. yahoo.com>
[Non-text portions of this message have been removed]
[Non-text portions of this message have been removed]
____________ _________ _________ _________ _________ __
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail. yahoo.com <http://mail. yahoo.com>
[Non-text portions of this message have been removed]
[Non-text portions of this message have been removed]
[Non-text portions of this message have been removed]
________________________________
From: Mike Anstey <manstey@...>
To: vantage@yahoogroups.com
Sent: Thursday, August 6, 2009 1:34:57 PM
Subject: RE: [Vantage] BPM - 4GL Error Message
Â
Your problem is the way you have your If nonconf.PONum <> 0 Then
statement, that works fine when there is only one statement the then,
if you want to assign multiple items write it like this:
If nonconf.PONum <> 0 Then
DO:
assign ttdmrhead.number10 = nonconf.PONum
ttdmrhead.number11 = nonconf.PONum
ttdmrhead.number12 = nonconf.PONum.
END.
ELSE IF........
Notice I only used one assign for all three, but for this to work there
can only be a period at the end of all the assignments (in this case
number12). Or if you wish you can do three assigns with a period after
each.
____________ _________ _________ __
From: vantage@yahoogroups ..com [mailto:vantage@yahoogroups .com] On Behalf
Of melissa hietala
Sent: Thursday, August 06, 2009 3:11 PM
To: vantage@yahoogroups .com
Subject: Re: [Vantage] BPM - 4GL Error Message
I dont actually have that text in my code. My code that actually works
is:
Find First ttdmrhead where ttdmrhead.rowmod = "U" no-error.
If available ttdmrhead then do:
Find first nonconf where nonconf.dmrnum = ttdmrhead.dmrnum no-lock
no-error.
IF available nonconf then do:
If nonconf.PONum <> 0 Then
assign ttdmrhead.number10 = nonconf.PONum.
Else if nonconf.PoNum = 0 Then
{lib/PublishInfoMsg .i &InfoMsg = '"Please enter PO #, Line, and
Release"'}
end.
end.
The problem occurs when i try to add these two lines:
assign ttdmrhead.number11 = nonconf.POLine.
assign ttdmrhead.number12 = nonconf.POLine.
I am attempting to add these lines underneath the statement: assign
ttdmrhead.number10 = nonconf.PONum.
So ultimately I am attempting to populate 3 user defined fields. It
works fine if I just populate 1 field, but for some reason errors out
when i try to populate 3 fields.
____________ _________ _________ __
From: Mike Anstey <manstey@flakeboard. ca
<mailto:manstey% 40flakeboard. ca> >
To: vantage@yahoogroups .com <mailto:vantage% 40yahoogroups. com>
Sent: Thursday, August 6, 2009 12:40:52 PM
Subject: RE: [Vantage] BPM - 4GL Error Message
If you comment out the two lines you added, does it work properly?
____________ _________ _________ __
From: vantage@yahoogroups .com [mailto:vantage@ yahoogroups .com] On
Behalf
Of melissa hietala
Sent: Thursday, August 06, 2009 2:40 PM
To: vantage@yahoogroups ..com
Subject: Re: [Vantage] BPM - 4GL Error Message
No, I just put those in there to help clarify to the user group what I
was attempting to do....
Dustin Biniek
____________ _________ _________ __
From: Mike Anstey <manstey@flakeboard . ca
<mailto:manstey% 40flakeboard. ca> >
To: vantage@yahoogroups .com <mailto:vantage% 40yahoogroups. com>
Sent: Thursday, August 6, 2009 11:55:25 AM
Subject: RE: [Vantage] BPM - 4GL Error Message
Are the comments in the code as shown below (- Added to fill in
POLine)? If so they must be commented out as follows: /* - Added to
fill in POLine */
____________ _________ _________ __
From: vantage@yahoogroups .com [mailto:vantage@ yahoogroups .com] On
Behalf
Of melissa hietala
Sent: Thursday, August 06, 2009 12:57 PM
To: vantage@yahoogroups .com
Subject: [Vantage] BPM - 4GL Error Message
Hi,
I have the following code which fills in a UD field on the DMRHead table
with the PO# off of the related nonconformance table. This code fills
in the field as expected. However I would like to also fill in 2 user
defined fields with the POLine & PORelease from the corresponding
nonconformance. I add the functionality to do this with lines 7 & 8
below. However when I add these lines I am receiving the following
error message: "**e:\epicor\ mfgsys803\ Server\lib\ PublishInfoMsg. i
Line
26. ELSE with no matching THEN found in the same block. (1076)." Any
thoughts on how I can get this corrected? Thank you.
1) Find First ttdmrhead where ttdmrhead.rowmod = "U" no-error.
2) If available ttdmrhead then do:
3) Find first nonconf where nonconf.dmrnum = ttdmrhead.dmrnum no-lock
no-error.
4) IF available nonconf then do:
5) If nonconf.PONum <> 0 Then
6) assign ttdmrhead.number10 = nonconf.PONum.
7) assign ttdmrhead.number11 = nonconf.PONum. - Added to fill in
POLine
8) assign ttdmrhead.number12 = nonconf.PONum. - Added to fill in
PORelease
9) else if nonconf.PoNum = 0 Then
10) {lib/PublishInfoMsg .i &InfoMsg = '"Please enter PO #, Line, and
Release"'}
11) end.
12) end.
Dustin Biniek
____________ _________ _________ _________ _________ __
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail. yahoo.com <http://mail. yahoo.com>
[Non-text portions of this message have been removed]
[Non-text portions of this message have been removed]
____________ _________ _________ _________ _________ __
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail. yahoo.com <http://mail. yahoo.com>
[Non-text portions of this message have been removed]
[Non-text portions of this message have been removed]
____________ _________ _________ _________ _________ __
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail. yahoo.com <http://mail. yahoo.com>
[Non-text portions of this message have been removed]
[Non-text portions of this message have been removed]
[Non-text portions of this message have been removed]