Marc's Place

XRWND - Naar begin van bestand/verander van sleutel

xcall xrwnd (kanaal[, sleutelnummer])
Common velden vóór aanroep
Parameters te vullen bij aanroep
kanaal (d3)
Het kanaalnummer waarop een relatief of ISAM bestand geopend moet zijn.
sleutelnummer (d*)
Het nummer van de sleutel in het bestand waarop gepositioneerd moet worden.
Alleen van belang indien het bestand, geopend op kanaal, een ISAM bestand is.
Parameters gevuld bij terugkeer
Common velden gevuld bij terugkeer
Foutcode van de eventueel opgetreden fout.
Een regelnummer in het programma waar de eventueel opgetreden fout is ontstaan.

mhmde = 1
xcall xism3 (ch_stat, statis)
while .not.mherc begin

    totaal = totaal + omzet

    mhmde = 1
    xcall xism3 (ch_stat, statis)


xcall xrwnd (ch_stat, 1)

mhmde = 1
xcall xism3 (ch_stat, statis)

In dit voorbeeld wordt eerst een totaal opgebouwd, waarna het bestand opnieuw van voren af aan wordt gelezen via sleutel 1.

© 1997- Marc Vos (and others)   -   Privacy Statement   -    Contact Me

On this website, Google Analytics is used to track visitor statistics. These are anonymised data about the number of visitors, which pages they visit on this site, from which regions they visit, which web browsers they use, etc.. You will also see non-personalised ads via Google AdSense. Cookies from Paddle or Paypal are placed when you click on a 'Buy now!' or 'Donate!' button, and possible cookies from Disqus when you use that system to comment on one or more blogposts.
Privacy Statement