Search results

The error line is in red If Left(TextLine, 3) = "A07" Then 'Reads base fare, Total fare and 5 Tax's BFC = Trim(Mid(TextLine, 6, 3)) & ": " BaseFare = Mid(TextLine, 9, 12) If Trim(Mid(TextLine, 39, 12)) = "" Then EQAmt = 0...

was trying to populate the tblPAXFareValue and i get an error "Object Variable or with block variable not set" and one quick question are we creating tables for each line ? If so do i have to create a a table for the A04 line which holds the sectors, in other words the route of the passengers...

just noticed, I need data from line A07 as it has the fares for each passenger. Should that go into a new table like tbleFares or any of th existing ?

ok so far, tblPax PaxID - Autonumber Passengers - ShortText PaxType - ShortText PaxSeq - ShorText FIleID - Number tblFiles FIleID - AutoNumber FIleName - Short Text PNR - Short Text tblPAXFareValue PFVID - AutoNumber FileID - Short Text PaxSeq -...

so here is what i should be doing :) create the following tables tblFile with fields FileID, FileNamea and PNR tblPax with fields Passenger, FileID and PaxSeq tblPAXFareValue with what fields ???

Okie doki will try that out then

Sounds like a better idea. How can we try this out ? The A04 is related to pax as it is the travel rout for each passenger. That will always be the same for each passenger.

Yes, that is correct those come per file depending on the number of passengers. For this file there are two passengers so 01 and 02 only applies. The A08 line is the Fare basis line and the A09 is the Fare construction section which we are not using at the moment. From the account side...

that sequence is per passenger.Like for example if there are 3 passengers in line A02 then at the end of each line it would be 01, 02 , 03 respectively. Now these passengers have a different fares when one of them is a child or an infant. So the fare part is mentioned in line A07. now for each...

Was having a similar problem in my post (http://www.access-programmers.co.uk/forums/showthread.php?p=1398708&posted=1#post1398708) how can i add to existing record.

so when using the rs.edit how do i go about it. RS.Edit RS![Sector] = AirSector RS.Update does not seem to be working at it gives me an error "Obkect invalid or not set"

1) Is A02 always 2 lines/records? No, there can be more than 2 2) Is there some identifier shared between the A07 and A02 line? like PNR? or some other not yet processed piece of information? Yes. In the Orginal file A02 has 01 A02SAJIDA/BIBIMRS 331208349014657274650901...

don't seem to be getting it. here is what is working so far If Left(TextLine, 3) = Trim("A02") Then 'First A02(PAX) line Pax = Trim(Mid(TextLine, 4, 30)) tkt = ALC & Trim(Mid(TextLine, 49, 10)) PaxType = Trim(Mid(TextLine, 67, 6))...

i need to add a different data from another place in the file but in the same record in the next column and not as new record. tired one and gives me an error like object invalid or not setThe record from A02 is added and updated. haven't closed the record as i need to add more data in the same...

well got that figured after a while.

After a while :) now need to change the way data is added to the table, i need to add each pax and tkt number as a new record. so my amended code is as belowIf Left(TextLine, 3) = Trim("A02") Then 'First A02(PAX) line Pax = Trim(Mid(TextLine, 4, 30)) RS.AddNew...

Thats rite froth, could be worse lol

Well got laid with work. Well got things sorted out. Couldn't actually build the the complete database. But completed a simpler version. Its fine now.

ok figured it out. whew ! :) No how can i format the date which is a string to a date format more or less like convert string to date dim D as integer , M as string, Y as integer MirDate = 19OCT14 D = Left(MirDate, 2) M = trim(Mid(Mirdate, 3,3)) Y = left(MirDate, 2) MDFormated =...

How come this is not happening for other variables like the TotalFare and TicketNumbers they are long and double respectively.