Επεξήγηση Filler σε ένα πρόγραμμα COBOL

Στη γλώσσα προγραμματισμού COBOL , να ορίσετε όλες τις μεταβλητές και τα πεδία δεδομένων σε ένα τμήμα του προγράμματός σας που ονομάζεται το τμήμα δεδομένων . Εδώ , θα δημιουργήσει τα αρχεία για τα αρχεία στο δίσκο , εκτύπωση σχεδιαγράμματα , πάγκοι και αποθήκευση εργασίας για τους υπολογισμούς . Μπορείτε να ορίσετε τα περισσότερα πεδία δεδομένων , δίνοντάς τους μοναδικά ονόματα , αλλά η λέξη-κλειδί ΠΛΉΡΩΣΗΣ σας επιτρέπει να αναιρέσει χώρο μνήμης , χωρίς την ανάγκη για ένα όνομα . FILLER
Η

FILLER είναι δεσμευμένη λέξη , που σημαίνει ότι δεν μπορείτε να χρησιμοποιήσετε τη λέξη για την ονομασία των πεδίων ή εγγραφών εκτός από τον καθορισμό μεμονωμένων στοιχείων μνήμης . Μπορείτε να χρησιμοποιήσετε FILLER αμέσως μετά από μια σειρά επίπεδο και πριν από μια ρήτρα ΕΙΚΟΝΑ που καθορίζει το μέγεθος ενός πεδίου και τον τύπο δεδομένων . COBOL περιορίζει τη χρήση του υλικού πλήρωσης στο τμήμα Data ? Αυτό δεν ισχύει για τις Αναγνώριση , Περιβάλλοντος ή Διαδικασία τμήματα εικόνων
Εγγραφή Διατάξεις
Η

Μία από τις πιο κοινές χρήσεις . για FILLER είναι για τους ορισμούς εγγραφή δεδομένων. Εάν χρησιμοποιείτε ένα αρχείο δεδομένων με μήκος ρεκόρ των 150 χαρακτήρων και δεν χρειάζεται να επισημαίνουν κάθε τομέα σε αυτό , μπορείτε να ορίσετε τα αχρείαστα χαρακτήρες ως πληρωτικό , όπως στο ακόλουθο κώδικα :

01 πελάτη record.05 FILLER PIC X ( 10 ) .05 όνομα-πελάτη PIC X ( 30 ) .05 πελάτη διεύθυνση PIC X ( 30 ) .05 πελάτη πόλης PIC X ( 30 ) .05 FILLER PIC X ( 50 ) .

Αυτό σας επιτρέπει να διαβάσετε ένα αρχείο 150 - χαρακτήρων και να εντοπίσει τα πεδία που θέλετε - το όνομα του πελάτη , τη διεύθυνση και την πόλη - . αγνοώντας το υπόλοιπο της εγγραφής

Η υποσυμβολοσειρά εξαγωγή
Η

Μπορείτε να χρησιμοποιήσετε τη λέξη-κλειδί ΠΛΉΡΩΣΗΣ να βοηθήσει στην εξαγωγή των συμβολοσειρών από μια μεγαλύτερη σειρά . Για παράδειγμα , για να εξαγάγετε τα πέντε πρώτα ψηφία μιας ταχυδρομικός κώδικας , μπορείτε να ορίσετε τις ακόλουθες δηλώσεις στο Τμήμα Εργασίας - Αποθήκευση :

01 σε ολόκληρο το zip - code.05 πρωτοβάθμιας zip PIC X ( 5 ) .05 FILLER PIC X ( 5 ) .

στο Τμήμα διαδικασίας , μπορείτε να μετακινήσετε ένα κωδικό ZIP- plus - 4 σε ολόκληρα - zip - code , στη συνέχεια να προχωρήσουμε πρωτοβάθμιας zip σε ένα πεδίο προορισμού . Με αυτό τον τρόπο , ρίχνετε τα πάντα μετά τα πέντε πρώτα ψηφία .
Εικόνων FILLER και VALUE
Η

Σε ένα αρχείο , ένα πεδίο ΠΛΉΡΩΣΗΣ χώρο μνήμης αποθεματικά και δέχεται κάθε είδους δεδομένα θα σας μεταφέρει εκεί . Μπορείτε επίσης να ορίσετε ένα πεδίο ΠΛΉΡΩΣΗΣ να έχουν αξία . Προγραμματιστές χρησιμοποιούν συχνά αυτή την τεχνική για τη δημιουργία κλάσεων έκθεση , όπως στο ακόλουθο παράδειγμα :

01 print - line.05 FILLER PIC X ( 10 ) ΑΞΙΑ SPACES.05 FILLER PIC X ( 15 ) VALUE " ΕΤΟΥΣ ΕΚΘΕΣΗ " .05 FILLER PIC X ( 20 ) ΑΞΙΑ SPACES.05 FILLER PIC X ( 5 ) VALUE" pAGE " .05 σελίδα αριθμό PIC ZZZ9 .

Σημειώνεται ότι η έκθεση τίτλους σελίδων κεφαλίδας και η απόσταση είναι όλα γίνονται με στόμιο πλήρωσης , εκτός από ένα όνομα τομέα που εμφανίζει τον αριθμό της σελίδας .
Η
εικόνων