///<summary>Retrieves any waiting reports from this clearinghouse. Returns true if the communications were successful, and false if they failed.</summary>
public static bool Retrieve(Clearinghouse clearhouse)
{
bool retVal = true;
FormTerminal FormT = new FormTerminal();
try{
FormT.Show();
FormT.OpenConnection(clearhouse.ModemPort);
FormT.Dial("17065713158");
//2. Wait for connect, then pause 3 seconds
FormT.WaitFor("CONNECT 9600", 50000);
FormT.Pause(3000);
FormT.ClearRxBuff();
//1. Send submitter login record
string submitterLogin =
"******" //1,6 /SLRON=Submitter login
+ FormT.Sout(clearhouse.LoginID, 12, 12) //7,12 Submitter ID
+ FormT.Sout(clearhouse.Password, 8, 8) //19,8 submitter password
+ " " //27,3 use 3 spaces
//Possible issue with Trans ID
+ "12345678" //30,8. they did not explain this field very well in documentation
+ "* " //38,15 " * "=All available. spacing ok?
+ "X" //53,1 X=Xmodem, or Y for transmission protocol
+ "MDD " //54,4 use 'MDD '
+ "VND" //58,3 Vendor ID is yet to be assigned by BCBS
+ "00"; //61,2 Software version not important
byte response = (byte)'Y';
string retrieveFile = "";
while (response == (byte)'Y')
{
FormT.ClearRxBuff();
FormT.Send(submitterLogin);
response = 0;
while (response != (byte)'N' &&
response != (byte)'Y' &&
response != (byte)'Z')
{
response = FormT.GetOneByte(20000);
FormT.ClearRxBuff();
Application.DoEvents();
}
//2. If not accepted, N is returned
//3. and must receive transmission acknowledgement
if (response == (byte)'N')
{
MessageBox.Show(FormT.Receive(10000));
break;
}
//4. If login accepted, but no records, Z is returned. Hang up.
if (response == (byte)'Z')
{
MessageBox.Show("No reports to retrieve");
break;
}
//5. If record(s) available, Y is returned, followed by dos filename and 32 char subj.
//less than one second since all text is supposed to immediately follow the Y
retrieveFile = FormT.Receive(800).Substring(0, 12); //12 char in dos filename
FormT.ClearRxBuff();
//6. Pause for 1 second. (already mostly handled);
FormT.Pause(200);
//7. Receive file using Xmodem
FormT.DownloadXmodem(clearhouse.ResponsePath + retrieveFile);
//8. Pause for 5 seconds.
FormT.Pause(5000);
//9. Repeat all steps including login until a Z is returned.
}
}
catch (Exception ex) {
MessageBox.Show(ex.Message);
//FormT.Close();//Also closes connection
retVal = false;
}
finally{
FormT.CloseConnection();
}
return(retVal);
}
///<summary>Retrieves any waiting reports from this clearinghouse. Returns true if the communications were successful, and false if they failed.</summary>
public static bool Retrieve(Clearinghouse clearhouse){
bool retVal=true;
FormTerminal FormT=new FormTerminal();
try{
FormT.Show();
FormT.OpenConnection(clearhouse.ModemPort);
FormT.Dial("17065713158");
//2. Wait for connect, then pause 3 seconds
FormT.WaitFor("CONNECT 9600",50000);
FormT.Pause(3000);
FormT.ClearRxBuff();
//1. Send submitter login record
string submitterLogin=
"******"//1,6 /SLRON=Submitter login
+FormT.Sout(clearhouse.LoginID,12,12)//7,12 Submitter ID
+FormT.Sout(clearhouse.Password,8,8)//19,8 submitter password
+" "//27,3 use 3 spaces
//Possible issue with Trans ID
+"12345678"//30,8. they did not explain this field very well in documentation
+"* "//38,15 " * "=All available. spacing ok?
+"X"//53,1 X=Xmodem, or Y for transmission protocol
+"MDD "//54,4 use 'MDD '
+"VND"//58,3 Vendor ID is yet to be assigned by BCBS
+"00";//61,2 Software version not important
byte response=(byte)'Y';
string retrieveFile="";
while(response==(byte)'Y'){
FormT.ClearRxBuff();
FormT.Send(submitterLogin);
response=0;
while(response!=(byte)'N'
&& response!=(byte)'Y'
&& response!=(byte)'Z')
{
response=FormT.GetOneByte(20000);
FormT.ClearRxBuff();
Application.DoEvents();
}
//2. If not accepted, N is returned
//3. and must receive transmission acknowledgement
if(response==(byte)'N'){
MessageBox.Show(FormT.Receive(10000));
break;
}
//4. If login accepted, but no records, Z is returned. Hang up.
if(response==(byte)'Z'){
MessageBox.Show("No reports to retrieve");
break;
}
//5. If record(s) available, Y is returned, followed by dos filename and 32 char subj.
//less than one second since all text is supposed to immediately follow the Y
retrieveFile=FormT.Receive(800).Substring(0,12);//12 char in dos filename
FormT.ClearRxBuff();
//6. Pause for 1 second. (already mostly handled);
FormT.Pause(200);
//7. Receive file using Xmodem
//path must include trailing slash for now.
FormT.DownloadXmodem(clearhouse.ResponsePath+retrieveFile);
//8. Pause for 5 seconds.
FormT.Pause(5000);
//9. Repeat all steps including login until a Z is returned.
}
}
catch(Exception ex){
MessageBox.Show(ex.Message);
//FormT.Close();//Also closes connection
retVal=false;
}
finally{
FormT.CloseConnection();
}
return retVal;
}
///<summary>Returns true if the communications were successful, and false if they failed. If they failed, a rollback will happen automatically by deleting the previously created X12 file. The batchnum is supplied for the possible rollback.</summary>
public static bool Launch(Clearinghouse clearhouse, int batchNum)
{
bool retVal = true;
FormTerminal FormT = new FormTerminal();
try{
FormT.Show();
FormT.OpenConnection(clearhouse.ModemPort);
//1. Dial
FormT.Dial("17065713158");
//2. Wait for connect, then pause 3 seconds
FormT.WaitFor("CONNECT 9600", 50000);
FormT.Pause(3000);
FormT.ClearRxBuff();
//3. Send Submitter login record
string submitterLogin =
//position,length indicated for each
"/SLRON" //1,6 /SLRON=Submitter login
+ FormT.Sout(clearhouse.LoginID, 12, 12) //7,12 Submitter ID
+ FormT.Sout(clearhouse.Password, 8, 8) //19,8 submitter password
+ "NAT" //27,3 use NAT
//30,8 suggested 8-BYTE CRC of the file for unique ID. No spaces.
//But I used the batch number instead
+ batchNum.ToString().PadLeft(8, '0')
+ "ANSI837D 1 " //38,15 "ANSI837D 1 "=Dental claims
+ "X" //53,1 X=Xmodem, or Y for transmission protocol
+ "ANSI" //54,4 use ANSI
+ "BCS" //58,3 BCS=BlueCrossBlueShield
+ "00"; //61,2 use 00 for filler
FormT.Send(submitterLogin);
//4. Receive Y, indicating login accepted
if (FormT.WaitFor("Y", "N", 20000) == "Y")
{
//5. Wait 1 second.
FormT.Pause(1000);
}
else
{
//6. If login rejected, receive an N,
//followed by Transmission acknowledgement explaining
throw new Exception(FormT.Receive(5000));
}
//7. Send file using X-modem or Z-modem
FormT.UploadXmodem(clearhouse.ExportPath + "claims" + batchNum.ToString() + ".txt");
//8. After transmitting, pause for 1 second.
FormT.Pause(1000);
FormT.ClearRxBuff();
//9. Send submitter logout record
string submitterLogout =
"/SLROFF" //1,7 /SLROFF=Submitter logout
+ FormT.Sout(clearhouse.LoginID, 12, 12) //8,12 Submitter ID
+ batchNum.ToString().PadLeft(8, '0') //20,8 matches field in submitter Login
+ "!" //28,1 use ! to retrieve transmission acknowledgement record
+ "\r\n";
FormT.Send(submitterLogout);
//10. Prepare to receive the Transmission acknowledgement. This is a receipt.
FormT.Receive(5000);//this is displayed in the progress box so user can see.
}
catch (Exception ex) {
MessageBox.Show(ex.Message);
X12.Rollback(clearhouse, batchNum);
retVal = false;
}
finally{
FormT.CloseConnection();
}
return(retVal);
}
///<summary>Returns true if the communications were successful, and false if they failed. If they failed, a rollback will happen automatically by deleting the previously created X12 file. The batchnum is supplied for the possible rollback.</summary>
public static bool Launch(Clearinghouse clearhouse,int batchNum){
bool retVal=true;
FormTerminal FormT=new FormTerminal();
try{
FormT.Show();
FormT.OpenConnection(clearhouse.ModemPort);
//1. Dial
FormT.Dial("17065713158");
//2. Wait for connect, then pause 3 seconds
FormT.WaitFor("CONNECT 9600",50000);
FormT.Pause(3000);
FormT.ClearRxBuff();
//3. Send Submitter login record
string submitterLogin=
//position,length indicated for each
"/SLRON"//1,6 /SLRON=Submitter login
+FormT.Sout(clearhouse.LoginID,12,12)//7,12 Submitter ID
+FormT.Sout(clearhouse.Password,8,8)//19,8 submitter password
+"NAT"//27,3 use NAT
//30,8 suggested 8-BYTE CRC of the file for unique ID. No spaces.
//But I used the batch number instead
+batchNum.ToString().PadLeft(8,'0')
+"ANSI837D 1 "//38,15 "ANSI837D 1 "=Dental claims
+"X"//53,1 X=Xmodem, or Y for transmission protocol
+"ANSI"//54,4 use ANSI
+"BCS"//58,3 BCS=BlueCrossBlueShield
+"00";//61,2 use 00 for filler
FormT.Send(submitterLogin);
//4. Receive Y, indicating login accepted
if(FormT.WaitFor("Y","N",20000)=="Y"){
//5. Wait 1 second.
FormT.Pause(1000);
}
else{
//6. If login rejected, receive an N,
//followed by Transmission acknowledgement explaining
throw new Exception(FormT.Receive(5000));
}
//7. Send file using X-modem or Z-modem
//slash not handled properly if missing:
FormT.UploadXmodem(clearhouse.ExportPath+"claims"+batchNum.ToString()+".txt");
//8. After transmitting, pause for 1 second.
FormT.Pause(1000);
FormT.ClearRxBuff();
//9. Send submitter logout record
string submitterLogout=
"/SLROFF"//1,7 /SLROFF=Submitter logout
+FormT.Sout(clearhouse.LoginID,12,12)//8,12 Submitter ID
+batchNum.ToString().PadLeft(8,'0')//20,8 matches field in submitter Login
+"!"//28,1 use ! to retrieve transmission acknowledgement record
+"\r\n";
FormT.Send(submitterLogout);
//10. Prepare to receive the Transmission acknowledgement. This is a receipt.
FormT.Receive(5000);//this is displayed in the progress box so user can see.
}
catch(Exception ex){
MessageBox.Show(ex.Message);
x837Controller.Rollback(clearhouse,batchNum);
retVal=false;
}
finally{
FormT.CloseConnection();
}
return retVal;
}