I have this line of code:

FULL_DATA_LINE/A100 = PARKING_STREET_A30 | ',' | PARKING_CITY_A20 | ',' | PARKING_COUNTY_A3 | ',' | PARKING_ZIP_A5 | ',' | PARKING_ZIP_4_A4 | ',' | MAKE_NAME_A4 | ',' | MODEL_YEAR_A4 | ',' | TX_VIN_A19 | ',' | FUEL_CATEGORY_A2 | HEXBYT(32, 'A1');

. . . on this output type:

ON TABLE HOLD AS FUELTYPE FORMAT DFIX DELIMITER , HEADER NO

It's exactly 100 characters. That last character at the end of the string is not appearing in my file. Needless to say I started with a simple

| ' '

but that didn't work either. I can put an 'X' there and it prints. When I put a blank there it does me the favor of removing it.

Unfortunately I'm programming to a formal spec that asks for a blank on the end of the line. Any recommendations?

This message has been edited. Last edited by: <Emily McAllister>,

what about using the HEXBYT function?

... | HEXBYT(32,'A1');  

confusingly, the HEXBYT function uses the ASCII value of the character.

oops, nevermind.... I didn't scroll all the way to the right.... I didn't see that you already did that.

John, since you're already computing the commas, perhaps there's no need for the DFIX output format. Maybe just ALPHA will work for you:

SET HOLDLIST=PRINTONLY
DEFINE FILE CAR
PARKING_STREET_A30/A30  = 'A23456789012345678901234567890';
PARKING_CITY_A20/A20    = 'B2345678901234567890';
PARKING_COUNTY_A3/A3    = 'C23';
PARKING_ZIP_A5/A5       = 'D2345';
PARKING_ZIP_4_A4/A4     = 'E234';
MAKE_NAME_A4/A4         = 'F234';
MODEL_YEAR_A4/A4        = 'G234';
TX_VIN_A19/A19          = 'H234567890123456789';
FUEL_CATEGORY_A2/A2     = 'I2';
END

FILEDEF FUELTYPE DISK baseapp/fuletype.txt

TABLE FILE CAR
PRINT
COUNTRY NOPRINT
COMPUTE FULL_DATA_LINE/A100 = PARKING_STREET_A30 | ',' | PARKING_CITY_A20 | ',' | PARKING_COUNTY_A3 | ',' | PARKING_ZIP_A5 | ',' | PARKING_ZIP_4_A4 | ',' | MAKE_NAME_A4 | ',' | MODEL_YEAR_A4 | ',' | TX_VIN_A19 | ',' | FUEL_CATEGORY_A2 | ' ';

ON TABLE SAVE AS FUELTYPE
END

And that worked? It kept your last space?

Yes it does.

This is the file: fuletype.txt

I'm having quite a day. I did this and I'm getting no CR/LF on the end of the line. It goes about 100 characters farther to the right.

I'm also getting a text field interpreted as a numeric field in a Recap in EXL2K format. It's the day when things don't work!

And then some joker is going to pull out a Worker Placement game tonight. Ain't gonna play.

This message has been edited. Last edited by: John_Edwards,

Did you try the code I posted? Seems to work for me.

Sorry for your troubles. What's a Worker Placement game? I don't like games and this doesn't sound enticing.

Got it.

Two fields:

  FULL_DATA_LINE/A100 = PARKING_STREET_A30 | ',' | PARKING_CITY_A20 | ',' | PARKING_COUNTY_A3 | ',' | PARKING_ZIP_A5 | ',' | PARKING_ZIP_4_A4 | ',' | MAKE_NAME_A4 | ',' | MODEL_YEAR_A4 | ',' | TX_VIN_A19 | ',' | FUEL_CATEGORY_A2;
  BLANK_SPACE/A1 MISSING ON = MISSING;

Printed both of them and set a specific blank space delimiter:

TABLE FILE VEHICLES
BY FULL_DATA_LINE
BY BLANK_SPACE 
.
.
.
ON TABLE HOLD AS FUELTYPE FORMAT DFIX DELIMITER ' ' HEADER NO

Once I figured out I could set a blank character as the delimiter I realized I could put another field after it, an empty one, to get that last blank space put on the line by the Delimiter option. I should rename that second field to MISSING_SPACE.

Note that I removed the final space on the FULL_DATA_LINE field -- it was being incorrectly ignored but I don't want an upgrade to WebFOCUS to fix that and start sending two spaces. So I pulled it.

At this point I have the entire line as specified with no additional blank spaces at the end of it.


I closed out one of my three weirdo bugs today! Thanks for the help!

quote:

Originally posted by Francis Mariani:
Did you try the code I posted? Seems to work for me.

Sorry for your troubles. What's a Worker Placement game? I don't like games and this doesn't sound enticing.

I did try it, but the CR/LF was off to the far right for my output. Windows 2012 Server, I-Way V8.

Worker Placement is a game mechanic where other people can stop you from doing what you want to. It's incredibly frustrating after a day of working hard bugs. I don't get assigned easy bugs anymore.