«GOTO(<xxxx>)»
/totalreport «zSUM(5)=0»«GOTO(# TOTALREPORT-Weiter)» #,5 «F+»«LIB(Subtotal│,#)» «X(TitelSub)» «SUM(5)\N,000t0» ... ... # TOTALREPORT-Weiter ... ... ... /
# Verkaufdokumente abarbeiten nach: Typ - Status - Shortcut - Datum «nzAUF-ACTIVE6(±A,2,30,S,«MEA(3)»)» «LIST(AUF-ACTIVE6,INDEX,START,/ab_list)» /ab_list «z~AUF-SCUT=S»«LIST(STOP)»«GOTO(# ENDE AB_LIST)» # # BAI-NR1 - AB-NR «z~AUF-FREI8\I»«GOTO(# ENDE-BAI-NR1)» «WRITE(1:APPEND ..\tx\bai-nr1.txt)» «WRITE(1: «AUF-FREI8»│«AUF-NR»)» «WRITE(1:CLOSE)» # ENDE-BAI-NR1 # # BAI-NR2 - AB-NR «z~AUF-FREI9\I»«GOTO(# ENDE-BAI-NR2)» «WRITE(1:APPEND ..\tx\bai-nr2.txt)» «WRITE(1: «AUF-FREI9»│«AUF-NR»)» «WRITE(1:CLOSE)» # ENDE-BAI-NR2 # # # ENDE AB_LIST /
![]() |
AchtungAchten Sie
sorgfältig darauf, dass bei der Anwendung von GOTO Befehlen keine
Endlos-Loops entstehen!
|