VFP CHR (9) не выводит TAB, как ожидалось - PullRequest
Новая
       25

VFP CHR (9) не выводит TAB, как ожидалось

0 голосов
/ 15 октября 2019

Мне нужно создать файл с разделителями табуляции из курсора. Обычно я просто использую COPY TO, но в этом случае мне нужна строка заголовка, которую COPY TO не создает.

Я думал, что смогу использовать? | ?? вместе с CHR (9), но он не помещает TAB в файл. Я открыл файл с помощью блокнота ++ и слова с включенными специальными символами. Я ожидал увидеть стрелку вправо для TAB, но не там. Файл выглядел больше как формат фиксированной ширины

Вот мой код 

LOCAL lcWBSIncFile, lcEACIncHeader
lcEACIncHeader = "EarnedValue" + CRLF +;
    "ContrName" + CHR(9) + ;
    "StruName" + CHR(9) + ;
    "WbsNum" + CHR(9) + ;
    "EndDate" + CHR(9) + ;
    "UnitName" + CHR(9) + ;
    "UnitScale" + CHR(9) + ;
    "LRE"

lcWBSIncFile = RTRIM(vpcProgram) + "_" + dtoc(vpdStatusDate,1) + "_" + TTOC(DATETIME(),1) + "_WBS_EAC.inc"

SET ALTERNATE TO ( lcWBSIncFile )
SET ALTER ON
SET CONSOLE OFF

? lcEACIncHeader
SELECT _csrEACUpdateWBSFinal
SCAN
    ? contrname + CHR(9)
    ?? struname + CHR(9)
    ?? wbsnum+ CHR(9)
    ?? enddate + CHR(9)
    ?? unitname + CHR(9)
    ?? unitscale + CHR(9)
    ?? ALLT(STR(lre,24,2 ))
ENDSCAN
SET ALTERNATE TO
SET ALTERNATE OFF

COPY TO (имя файла) TYPE DELIMITED WITH TAB работает нормально, я просто не получаю заголовок.

1 Ответ

0 голосов
/ 15 октября 2019

? |?? не работал, но FPUTS () сделал. Не уверен почему.

...