Web-Based Electronic Commerce: Delphi to IC Verify (Request File)

4A. Delphi to IC Verify (Request File)

IC Verify runs as a simple DOS program which accepts command line input.

Write the Request File

The request file can include multiple requests for high volume stores.

function TWebVerify.quotedField(value:string):string;
begin
  result:='"'+value+'"';
end;

procedure TWebVerify.WriteRequestFile;
begin
  with TStringList.create do try
    text:=quotedField(transactionType)+','
             +quotedField(fClerk)+','
             +quotedField(Comment)+','
             +quotedField(fCardNo)+','
             +quotedField(ExpirationDate)+','
             +quotedField(Amount)+','
             +quotedField(fReferenceInfo);
    saveToFile(DataDir+cRequestFile);
  finally
    free;
    end;
end;