ED40 - Substitution for Dummies

I am working on setting up EDI for a new vendor. They are requiring specific sections to be used and data from INFOR passed. For the life of me - I cannot find anything that will give me a list of what and how I can define the sections to use and the values to pass. The concept makes sense. Define a value from Lawson to be equated to a value on on the file. r

Example:

To use SDQ I wound up having to open an INFOR ticket to find that there is a substitution value for SDQ_CREATE that has to be set to Y in order for that section to appear.

I am not trying to set the ship to address to show in full using N1, N2 and N3 ST segments. I'm reading through the perl scripts and everything to try and find how what I need to set to have to have N2 and N3 show up. All I can see in the script is:

if ( $tpid eq 'HP' ) {
add_N3();
add_N4();
}

Can anyone share some information for helpful tips on how they have backed into what values are available to use in the substitution table. It has to be easier than I'm making it.

Find more posts tagged with

Infor Lawson Supply Chain Group - Discussion

Accepted answers

All comments

unknown

I'm using GHX so we don't board new vendors like this - but N2 is the req loc on my mapping? N3/N4 are just address fields tied to IC02. If you populate the PO address on IC02 - it maps there natively?

jon-athey

Jimmie, you're on the right track with the script. Add the tpid for the vendor you need to send N3 and N4. I can't find a reference to an N2 segment in the 850 spec doc so I don't think that's a thing.

For example, our laws_out_91 script has this string

### add N3 and N4 segment for vendors requiring it

if ( $tpid eq 'LF' || $tpid eq 'CN' || $tpid eq 'CT' or $tpid eq 'STRS' ) {

add_N3();

add_N4();

}

tpid LF is Fisher Scientific and I've verified that we're sending the N3 and N4 segments on the 850 for Fisher.

ST^850^1001~
BEG^00^SA^xxxxxx^^20200804~
PER^BD^xxxxxxxxxxxx^TE^xxx-xxx-xxxx^EM^xxx.xxxx@midmichigan.org~
N1^ST^MidMich Medical Center Midland^91^xxxxx0001~
N3^2700 W. Sugnet Rd^Attn: Receiving~
N4^Midland^MI^48670~

unknown

Jon,

Do you happen to know the correct spacing/layout for the Lawson_Value field on ED40?

Thanks! Andrew

jon-athey

Depends on what you're trying to do. What record are you building?

tpid_O_SHIPTO?

tpid_I_VENDOR?

Jimmie Smith

I am working on building 850 based on specs from a vendor - I have to include the following sections:

CURR - This section only appears int he laws_out_91_la4010 script.

This script has the following section:

sub add_N1_ST {

print_calling( $TRACE_LEVEL, @_ ) if $TRACE_LEVEL;

@n1st = ();

$lookupstr = $shipto_location . $vendor_id . $vendor_purch_from . $company;

if ( $populate =~ /Y/i ) {

$shipto_account = $vendor_account_nbr;

}

else {

$list = $tpid . '_O_SHIPTO';

$shipto_account = $substitutions->lookup( $list, $lookupstr );

}

if ( $shipto_account eq '' ) { $shipto_account = $lookupstr; }

$n1st[0] = 'N1';

$n1st[1] = 'ST';

$n1st[2] = ( $tpid ne 'ZS' ) ? $shipto_name : lookup_N102($shipto_location, $header_req_location);

$n1st[3] = '91';

$n1st[4] = $shipto_account;

push( @n1_loop, join( '^', @n1st ) );

The above set of statements look to be variations of the “ if I find the SHIPTO defined as in the design document – I’m going to put the account number in the output for N101”

### add N3 and N4 segment for vendors requiring it

if ( $tpid eq 'HP' ) {

add_N3();

add_N4();

}

This statement looks to be the only way to get N3 and N4 to add. Does this mean it’s hard coded to whatever 'HP' is?

I also have to show the AMT section and have the N1 BT section show 92 and not 91 which I believe this is hard coded. I stopped using the laws_out_91_ghx script because it didn't have the CURR section at all. I have test this without any shipto replacements defined just to see what will show up by default.

unknown

We are looking at both.

jon-athey

It's been my experience that the vendor accepts the standard specs of the customer. That being said, the standard for placement of the ship-to account is N1ST04. Your vendor wants it in N1ST01? Remember that any changes to the script will affect the 850s for all other tpids (vendors) that use that same script.

Regarding N3 and N4, this is what I had posted earlier. It is coded to add the N3 and N4 segments for specific vendors. In your script it's HP which is the tpid for Hewlett Packard. The scripts are modified over time to accommodate different vendor requirements. If you don't transact via EDI with HP currently you could replace HP in the script with the tpid of the vendor that needs the N3 and N4 segments.

I can't find any coding for the AMT segment in any of the scripts I have. You may need Infor to help with that.

Here's the coding for the N1BT segment from the laws_out_91 script.

### Here we do a lookup for bill to company and map to
### an N1^BT segment

if ( $tpid =~ /^LG/ || $tpid eq 'CO' || $tpid eq 'AM' ) {

$list = $tpid . '_O_COMPANY';

$lookupstr = $shipto_location . $vendor_id . $vendor_purch_from . $company;

$comp_return = $substitutions->lookup( $list, $lookupstr );

if ($comp_return) {

$n1bt[0] = 'N1';

$n1bt[1] = 'BT';

$n1bt[2] = trimright($company);

$n1bt[3] = '91';

$n1bt[4] = $comp_return;

push( @n1_loop, join( '^', @n1bt ) );

}

Copyright © 2025 Infor. All rights reserved.