Πώς να επεξεργαστείτε μια ρήτρα Εικόνα σε COBOL 85

85 COBOL είναι μια γλώσσα προγραμματισμού για τις επιχειρήσεις , τη χρηματοδότηση και τις διοικητικές εφαρμογές . Αναφορά εκτύπωσης είναι ένα σημαντικό μέρος των πληροφοριακών συστημάτων των επιχειρήσεων . COBOL επιτρέπει τη σωστή μορφοποίηση της εξόδου στον εκτυπωτή χρησιμοποιώντας ρήτρες επεξεργασμένη εικόνα . Επεξεργασία εικόνων είναι ρήτρες που ΦΩΤΟΓΡΑΦΙΑ μορφή των δεδομένων που προορίζονται για έξοδο στην οθόνη ή εκτυπωτή . COBOL παρέχει ειδικά σύμβολα επεξεργασίας εικόνας για να μορφοποιήσετε τα στοιχεία δεδομένων . Τα σύμβολα επεξεργαστείτε αλλάξετε τα δεδομένα που εισάγονται στο στοιχείο επεξεργασία . Οδηγίες
Η 1

αναγνωρίσει " 99.999 " στη ρήτρα PICTURE του προγράμματος σας για την απλή εισαγωγή . Ξεκινήστε την είσοδο των προγραμμάτων και η αξία των δεδομένων " 12345 " . Εκτυπώστε το επεξεργασμένο αποτέλεσμα " 12.345 " . 2

κηρύξει " 999.99 " στη ρήτρα PICTURE του προγράμματος σας για την ειδική εισαγωγή . Ξεκινήστε την είσοδο των προγραμμάτων και η αξία των δεδομένων " 1234,5 " . Εκτυπώστε το επεξεργασμένο αποτέλεσμα " 234.50 "
εικόνων 3

κρίνει . " - $ 999.99 " στη ρήτρα PICTURE του προγράμματος σας για την σταθερή τοποθέτηση . Ξεκινήστε την είσοδο των προγραμμάτων και η αξία των δεδομένων " 123.456 " . Εκτυπώστε το επεξεργασμένο αποτέλεσμα " $ 123.45 " .
Η 4

αναγνωρίσει " u , uuu , uu9.99 " στη ρήτρα PICTURE του προγράμματος σας για το πλωτό εισαγωγής . Ξεκινήστε την είσοδο των προγραμμάτων και η αξία των δεδομένων " 1234.56 " . Εκτυπώστε το επεξεργασμένο αποτέλεσμα " USD1 , 234.56 " .
5

αναγνωρίσει " * , *** . ** + " Στη ρήτρα PICTURE του προγράμματος σας για την αντικατάσταση με αστερίσκους . Ξεκινήστε την είσοδο των προγραμμάτων και η αξία των δεδομένων " -123,45 " . Εκτυπώστε το επεξεργασμένο αποτέλεσμα " ** 123.45 - " .
Η 6

κηρύξει " $ Z , ZZZ , ZZZ.ZZCR " στη ρήτρα PICTURE του προγράμματος σας για την αντικατάσταση με κενά . Ξεκινήστε την είσοδο των προγραμμάτων και η αξία των δεδομένων " 12345,67 " . Εκτυπώστε το επεξεργασμένο αποτέλεσμα " $ 12,345.67 " .
Η
εικόνων