Exempelkoden nedan ska anges i kommandoläget i Redigeringsfönstret och inte i dialogrutan Fil-I/O.
I nedanstående exempel läses en rad i taget med data in från en extern fil. Efter varje rad kan du välja att börja om och läsa från början av filen igen. Det här är alltså ett exempel på hur du kan använda kommandot FIL/TILL_BÖRJAN.
C1=KOMMENTAR/INMATN,Skriv den fil som data ska läsas från
,(skriv den fullständiga sökvägen)
V1=FIL/FINNS,C1.INPUT
OM/V1<>0
UTFÖR/
FILPEK=FIL/ÖPPNA,C1.INPUT,LÄSA
C2=KOMMENTAR/JANEJ,Vill du läsa från början?
OM/C2.INPUT == "JA"
FIL/TILL_BÖRJAN,FILPEK
SLUT_OM/
V2=FIL/LÄSRAD,FILPEK,{RAD}
KOMMENTAR/OPER,"Den aktuella raden är: " + RAD
TILLS/V2=="EOF"
SLUT_OM/
FIL/STÄNG,FILPEK
KOMMENTAR/OPER,Rutinen avslutas.
Kodförklaring
En del av den här koden liknar koden som förklaras i "Kodexempel för Läs tecken" och "Kodexempel för Läs rad".
Här förklaras endast den kod som är unik för det här exemplet.
C2=KOMMENTAR/JANEJ
Den här raden innebär att du tillfrågas om du vill börja om och läsa filen från början. Svaret (JA/NEJ) sparas i variabeln C2.INPUT.
IF/C2.INPUT == "JA"
Den här raden inleder ett IF / END IF-block. Villkoret som testas är om C2.INPUT har värdet JA. Om villkoret är sant körs de rader som följer efter IF-uttrycket. Om villkoret är falskt körs koden som följer efter END_IF-uttrycket.
FIL/TILL_BÖRJAN,FILPEK
Den här raden innebär att filpekaren flyttas tillbaka till början av datafilen.
SLUT_OM/
Den här raden avslutar OM/SLUT_OM-kodblocket.
Kommandon för kommandoläge efter kommentarer
Om du vill skriva in ytterligare PC-DMSI-kommandon efter det att du har infogat en PC-DMIS-kommentar, måste du först trycka på Retur två gånger efter KOMMENTAR-kommandot. Detta tolkas av PC-DMIS som att du inte längre vill lägga till text till kommentaren utan är redo att lägga till ett nytt kommando.