Hi everybody,
I'm a fervent reader of EDI-L and I have always found very interesting
discussion. Today, I need your help.
We are using GENTRAN Server for Windows NT4 but we have a problem with the
communication script with GEIS FRANCE. We tried to solve this problem with
Commerce Network Support and GEIS Support, without result. ( I have also
mailed to [EMAIL PROTECTED] without any significant result).
I know that some of you are using GENTRAN Server for Win NT and hope that
you can help me as Sterling Commerce is unable to help their customers.
I have attached the script used and the communication log.
Thank you for your help.
Alnoor Dramsi
EDI Technologies
http://www.edi-technologies.com
________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com
//GEIS Script EDI*EXPRESS MARK III - Async/XModem protocol
//User Editable variable
Scriptvar string[8] MAILID;
Scriptvar string[8] MAILPWD;
Scriptvar string[8] MDOCS;
//Run-time variable
integer Msgid;
integer Atmid;
string[80] Logon;
string[80] Dset;
string[80] SDset;
string[80] RDset;
//Initialization
Logon = MAILID + "," + MAILPWD + ",MAILA^0D";
Dset = "DOCS" + MDOCS + "^0D";
SDset = "SEND DOCS" + MDOCS + "^0D";
RDset = "MAILA" + MDOCS + "^0D";
//Logon Phasis
setBlockSize(128);
AsciiSndCtl("HH^0D");
AsciiRcvCtl("U#=");
AsciiSndCtl(Logon);
AsciiRcvCtl("ENTER SELECTION:");
AsciiSndCtl("DATA^0D");
AsciiRcvCtl("ENTER SELECTION:");
//Send Procedure
If DoSnd then
begin
MbxStartMsgLoop();
while MbxGetNextMsg(Msgid) != 0 do
begin
MbxStartAtmLoop(Msgid);
while MbxGetNextAtm(Atmid) != 0 do
begin
AsciiSndCtl("XMOD SEND^0D");
AsciiRcvCtl("Selection:?");
AsciiSndCtl("C^0D");
AsciiRcvCtl("filename ?");
AsciiSndCtl(Dset);
AsciiRcvCtl(".^0D^0A");
if RcvBufSearch("File exists") != 0 then
begin
AsciiRcvCtl("Selection: ?");
AsciiSndCtl("OV^0D");
end
AsciiRcvCtl("READY FOR INPUT^0D^0A");
XmodemSndAtm(Msgid,Atmid);
AsciiRcvCtl("again(Y/N)?");
AsciiSndCtl("N^0D");
AsciiRcvCtl("Continue XMODEM(Y/N) ?");
AsciiSndCtl("N^0D");
AsciiRcvCtl("ENTER SELECTION:");
AsciiSndCtl(SDset);
// Ex 1.x script command : rcvgeislog
AsciiRcvCtl("ENTER SELECTION:");
SndOk(Msgid,Atmid);
end
SndOK(Msgid);
end
end
//Receive Procedure
if DoRcv then
begin
AsciiSndCtl("RECV^0D");
// If you want to redo the last comm-session - USE PRIOR
//AsciiSndCtl("PRIOR^0D");
AsciiRcvCtl("ENTER SELECTION:");
AsciiSndCtl("XMOD RECV^0D");
AsciiRcvCtl("Selection:?");
AsciiSndCtl("C^0D");
AsciiRcvCtl("filename ?");
AsciiSndCtl(RDset);
AsciiRcvCtl("Start download now.");
XmodemRcvMsg();
AsciiRcvCtl("again(Y/N)?");
AsciiSndCtl("N^0D");
AsciiRcvCtl("Continue XMODEM(Y/N) ?");
AsciiSndCtl("N^0D");
AsciiRcvCtl("ENTER SELECTION:");
end
//logoff from GEIS
AsciiSndCtl("BYE^0D");
AsciiRcvCtl("OFF AT");
LogMessage("Session terminated normally");
SetStatus(SUCCESS);
03:22:18 PM - Starting session 36627.640475 on GENTRAN (v2.1.1 SP1) - Apr
11, 2000
03:22:18 PM - Using device U.S. Robotics 56K Message - 57600 8N1 Hardware
03:22:18 PM - Dialing...0,0143703421
03:22:18 PM - Line message - reply
03:22:18 PM - Call status - dialtone
03:22:18 PM - Call status - dialing
03:22:18 PM - Call status - proceeding
03:22:42 PM - Call status - connected 9600
03:22:42 PM - AsciiSndCtl
03:22:42 PM - Characters sent
HH[0D]
03:22:42 PM - AsciiRcvCtl
03:22:46 PM - Characters received
[8D][D2]NN[AF]NG[D7][A0][A0]P[CF][D2][D4][AF]PSA[BD]03[B2][AF]056[A0][CC][C3]G
[AF][C9][BD]00[AF]0[B2][B8][A0][C3]G[BD][B2]0[B8]0[B7]5503[B8]603[B1][B4][A0]
[C3]D[BD]3[B1]3600[B7]000[B1][B1][B1][B1][A0][C9]D[BD][B4]6[B8][8D][0A]U[A3][BD]
03:22:46 PM - AsciiSndCtl
03:22:46 PM - Characters sent
ABU70402,VENUS,MAILA[0D]
03:22:46 PM - AsciiRcvCtl
03:22:46 PM - Characters received
[11][0A][0D][0A][11][0D][0A][0D][0A][0D][0A][0D][0A][0D][0A][20][20][20]For[20]
[20]BU70402[20]GEIS[20]port[20]number[20]=[20]33309316122032056[20]at[20]11[20]A
PR[20]00[20][20]15:21EST[20][0D][0A][0D][0A][0D][0A][20][20][20][20][20][20][20]
[20][20][20][20][20][20][20][20][20][20][20][20]WELCOME[20]TO[20]THE[20]EDI*EXPR
ESS[20]SYSTEM[0D][0A][0D][0A][20][20][20][20][20][20][20]Enter[20]a[20]'?'[20]in
[20]any[20]prompt[20]to[20]obtain[20]a[20]brief[20]explanation.[0D][0A][0D][0A]
[0D][0A][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20]
[20][20][20][20][20][20][20][20][20]EDI[20]PRIMARY[20]MENU[0D][0A][20][20][20]
[20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20]
[20][20][20][20]---[20]-------[20]----[0D][0A][0D][0A][20][20][20][20][20][20]
[20][20][20][20][20][20][20]NEWS[20]-[20]new[20]releases[20]and[20]information
[0D][0A][20][20][20][20][20][20][20][20][20][20][20][20][20]DATA[20]-[20]to[20]a
ccess[20]the[20]data[20]transfer[20]menu[0D][0A][20][20][20][20][20][20][20][20]
[20][20][20][20][20]ADM[20][20]-[20]to[20]perform[20]administrative[20]functions
[0D][0A][20][20][20][20][20][20][20][20][20][20][20][20][20]REP[20][20]-[20]to
[20]access[20]the[20]Report[20]menu[0D][0A][20][20][20][20][20][20][20][20][20]
[20][20][20][20]HSS[20][20]-[20]to[20]queue[20]files[20]for[20]High[20]Speed[20]
Service[0D][0A][20][20][20][20][20][20][20][20][20][20][20][20][20]PASS[20]-[20]
to[20]change[20]your[20]sign-on[20]password[0D][0A][20][20][20][20][20][20][20]
[20][20][20][20][20][20]QUIK[20]-[20]to[20]access[20]QUIK*COMM[20]menu[0D][0A]
[20][20][20][20][20][20][20][20][20][20][20][20][20]HEL[20][20]-[20]to[20]initia
te[20]new[20]log-in[20]sequence[0D][0A][20][20][20][20][20][20][20][20][20][20]
[20][20][20]BYE[20][20]-[20]to[20]sign[20]off[20]the[20]system[0D][0A][0D][0A]
[0D][0A][20][20][20][20][20][20][20][20][20][20][20][20][20]ENTER[20]SELECTION:
03:22:54 PM - AsciiSndCtl
03:22:54 PM - Characters sent
DATA[0D]
03:22:54 PM - AsciiRcvCtl
03:22:54 PM - Characters received
[11][7F][7F][0A][0D][0A][0D][0A][0D][0A][0D][0A][0D][0A][20][20][20][20][20][20]
[20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20]THE[20]E
DI*EXPRESS[20]SYSTEM[0D][0A][20][20][20][20][20][20][20][20][20][20][20][20][20]
[20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20]11[20]APR
[20]00[0D][0A][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20]
[20][20][20][20][20][20][20][20][20][20]DATA[20]TRANSFER[20]MENU[0D][0A][20][20]
[20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20]
[20][20][20][20]----[20]--------[20]----[0D][0A][0D][0A][20][20][20][20][20]FTU
[20][20][20]-[20]to[20]initiate[20]file[20]transfer[20]utility[0D][0A][0D][0A]
[20][20][20][20][20]XMOD[20]direction[20]filename[20]-[20]to[20]initiate[20]XMOD
EM[20]file[20]transfer[0D][0A][20][20][20][20][20][20][20][20][20][20][20][20]
[20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20]
[20][20][20][20][20]-[20]SEND[20](upload:PC-to-MARKIII)[0D][0A][20][20][20][20]
[20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20][20]
[20][20][20][20][20][20][20][20][20][20][20][20][20]-[20]RECV[20](download:MARKI
II-to-PC)[0D][0A][0D][0A][20][20][20][20][20]SEND[20]filename[20][20]-[20][20]to
[20]log[20]a[20]file[20]into[20]the[20]EDI*EXPRESS[20]system[0D][0A][20][20][20]
[20][20]RECV[20][EF][20][20][20][20][20][20]-[20][20]pick[20]up[20]a[20]file[20]
[ELECTRONIC[20]FMT[20]-[20]optional[0D][0A][20][20][20][20][20]PRIOR[20][EF][20]
[20][20][20][20]-[20][20]pick[20]up[20]last[20]file[20]received[20][ELEC[20]FMT
[20]-[20]optional][0D][0A][20][20][20][20][20]RETurn[20][20][20][20][20][20][20]
[20][20]-[20][20]to[20]return[20]to[20]the[20]Primary[20]Menu[0D][0A][20][20]
[20][20][20]BYE[20][20][20][20][20][20][20][20][20][20][20][20]-[20][20]to[20]si
gn[20]off[20]the[20]system[0D][0A][0D][0A][20][20][20][20][20][][20]Indicate[20]
optional[20]fields.[20][20]Brackets[20]are[20]not[20]part[20]of[20]the[20]comman
d.[0D][0A][0D][0A][20][20][20][20][20][20][20][20][20][20][20][20][20]ENTER[20]S
ELECTION:
03:22:58 PM - AsciiSndCtl
03:22:58 PM - Characters sent
XMOD[20]SEND[0D]
03:22:58 PM - AsciiRcvCtl
03:22:58 PM - Characters received
[11][7F][7F][0A][0D][0A][0D][0A][20]Enter[20]L[20]--[20]for[20]LRC[0D][0A][20]
[20][20][20][20][20][20]C[20]--[20]for[20]CRC[0D][0A][20]Selection:?
03:22:59 PM - AsciiSndCtl
03:22:59 PM - Characters sent
C[0D]
03:22:59 PM - AsciiRcvCtl
03:22:59 PM - Characters received
[11][7F][0A][0D][0A][0D][0A][20][20][20][20]Input[20]MARK[20]III[20]filename[20]
?
03:23:00 PM - AsciiSndCtl
03:23:00 PM - Characters sent
DOCS402[0D]
03:23:00 PM - AsciiRcvCtl
03:23:00 PM - Characters received
[11][7F][7F][0A][0D][0A][0D][0A][20][20][20][20]XMODEM[20]ready.[20]Control-X
[20]to[20]abort.[0D][0A]
03:23:01 PM - AsciiRcvCtl
03:23:01 PM - Characters received
[0D][0A][0D][0A][20][20][20][20]When[20]READY[20]FOR[20]INPUT[20]is[20]displayed
,[20]start[20]your[20]upload.[0D][0A][20][0D][0A]READY[20]FOR[20]INPUT[0D][0A]
03:23:02 PM - XmodemSndAtm
03:23:02 PM - MsgId=6021 AtmId=7097 FileName=OUT14C5.INT
03:23:02 PM - Characters received
[7F][7F][11]C
03:23:11 PM - Characters sent
[01][01][FE]UNA:+.?[20]'UNB+UN0A:1+0002413366253TECH03+0002413366253TECH03:00+00
0225:1700+4'UNH+10+INVOIC:92:1:UN'BGM++7889'DTM+3:02/25/00'RFF+K[10]
03:23:12 PM - Characters received
[06]
03:23:12 PM - Characters sent
[01][02][FD]ON:8798798756'DTM+4:02/25/00'RFF+CT:4645645'DTM+92:02/25/00'NAD+ST++
+alnoor'NAD+RE+++alnoor'PAT+10'UNS+S'CNT+2:0'MOA+77:0'UNT+14[04]i
03:23:13 PM - Characters received
[06]
03:23:13 PM - Characters sent
[01][03][FC]+10'UNZ+1+4'[00][00][00][00][00][00][00][00][00][00][00][00][00][00]
[00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
[00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
[00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
[00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
[00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
[00][00][9B][A0]
03:23:13 PM - Characters received
[18]
03:23:13 PM - ERROR: Xmodem file transfer cancelled
03:23:15 PM - Hangup
03:23:16 PM - ERROR: Session retries exceeded
