Hirdetés

Keresés

Új hozzászólás Aktív témák

  • Jim Tonic

    nagyúr

    válasz fatal` #6461 üzenetére

    Elküldtem ma reggel privátban.

    szerk.:
    Ha már megírtam, bemásolom, hogy néz ki ez Progressben, abból még úgy sem volt itt kódrészlet.
    define variable i1 as integer no-undo. /* roviden def var i1 as int */
    define variable i2 as integer no-undo.
    define variable i3 as integer no-undo.
    define variable i4 as integer no-undo.

    /* ideiglenes tabla */
    define workfile wf_lista
    field variacio as character.

    do i1 = 1 to 7:
    do i2 = 1 to 7:
    do i3 = 1 to 7:
    do i4 = 1 to 7:
    create wf_lista.
    wf_lista.variacio = string(i1) + string(i2) + string(i3) + string(i4).
    end.
    end.
    end.
    end.

    /* kimentes CSV-be */
    output to value('c:\lista.csv').

    for each wf_lista:
    export delimiter ';'
    wf_lista.variacio.
    end.

    output close.

    A workfile lényegében egy adattábla. Annyiban kevesebb, mint egy temp-table (hash table), hogy nem indexelhető. Illetve, ha jól tudom, a workfile mindenképpen a RAM-ban tárolódik, míg a hash táblánál paraméterezhető, hogy mekkora méretnél kerüljön át a merevlemezre.

Új hozzászólás Aktív témák