Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch Seite 107

COMOPT-Steuerung
Operandenformat
REPLACE-PSEUDOTEXT={YES
REP-PSEUDO
RESET-PERFORM-EXITS={YES
RES-PERF
ROUND-FLOAT-RESULTS-DECIMAL={YES/NO}
ROUND-FLOAT
SEPARATE-TESTPOINTS={YES/NO
SEP-TESTP
In COBOL2000-BC nicht verfügbar!
SET-FUNCTION-ERROR-DEFAULT={YES/NO
S-F-E-D
U41113-J-Z125-6
Funktion
/NO}
entscheidet, wie COPY-Elemente in einzeln ersetzbare
Textwörter zerlegt werden. Bei Angabe von NO wirken die
Trennsymbole Doppelpunkt, Klammer auf, Klammer zu
und Pseudotext-Begrenzer nicht als Trennzeichen für Text-
wörter und sind keine eigenständigen Textwörter. Das
bewirkt insbesondere, dass innerhalb von Klammern in
Maskenzeichenfolgen keine Ersetzungen stattfinden. Bei
Angabe von NO ist eine Verwendung der REPLACE-
Anweisung nicht möglich. Die Möglichkeiten in der
REPLACING-Klausel sind auf die Ersetzung eines einzel-
nen Textwortes durch ein Textwort oder einen Bezeichner
beschränkt. Hexadezimale und nationale Literale werden
nicht als einzelne Textwörter erkannt. COPY-Elemente
dürfen selbst keine COPY-Anweisungen enthalten.
REPLACE-PSEUDOTEXT=NO wird bei Free-Format nicht
unterstützt.
SDF-Option: --
/NO}
legt fest, ob die Steuerungsmechanismen für alle
PERFORM-Anweisungen
- bei EXIT PROGRAM entsprechend ANS85 zurückge-
setzt werden (Defaultwert oder Angabe YES) oder
- beim Verlassen des Unterprogramm aktiv bleiben
(Angabe NO).
SDF-Option: --
legt fest, ob Gleitpunktdatenfelder vor der Übertragung in
Festpunktdatenfelder auf die 7. (COMP-1) bzw. 15. Dezi-
malstelle (COMP-2) gerundet werden sollen. Die Option ist
nur wirksam, wenn das Empfangsfeld mit weniger als
19 Dezimalziffern definiert ist.
SDF-Option: --
}
bestimmt, ob zum Testen mit AID für jeden Paragrafen- und
Kapitelanfang in der PROCEDURE DIVISION eine eigene
Adresse generiert werden soll.
SDF-Option:
TEST-SUPPORT = AID(...)
PREPARE-FOR-JUMPS =
}
bewirkt, dass die Gültigkeit von Funktionsargumenten
überprüft wird und im Fehlerfall der jeweiligen Funktion der
Fehler-Returnwert zugewiesen wird.
SDF-Option:
RUNTIME-OPTIONS = PARAMETERS(...)
FUNCTION-ERR-RETURN =
COMOPT-Operanden
107