IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)

Codes sources Cobol10 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

Liste des 10 ressources de cette catégorie

    COBOL - Flat to Indexed : transformation d'un fichier séquentiel en fichier séquentiel indexé

    Téléchargé 12 fois-
    1
    0
    Transformation d'un fichier séquentiel en fichier séquentiel indexé dédié au compilateur COBOL associé.

    Deux sources sont mises à disposition :
    - L'une avec seulement la transformation "normal" vers "indexé"
    - L'autre avec un tri interne COBOL

    Ce code est très utile sous Windows ou Linux pour obtenir des formats de fichiers nativement disponibles sur z/OS ou System i.
    Licence : BSD - Publié le 19/03/2014 - Taille 2 Ko - Auteur : Metalman +

    COBOL - Tri Interne

    Téléchargé 10 fois-
    0
    0
    Il s'agit d'un tri interne au COBOL détaillé.
    Le fichier d'exemple associé au code est fourni.
    Licence : BSD - Publié le 19/03/2014 - Taille 1394 octet - Auteur : Metalman +

    Tester No De Sécurité Sociale

    Téléchargé 10 fois-
    0
    0
    Ci joint module pour tester la Clef No de Sécurité Sociale y compris pour la Corse
    En Entrée le No SS sur 15 caractères
    En Sortie La Cle theorique (calculée uniquement si le No est Numérique)
    Un code erreur à 1 si la clef est incorrect ou le No SS est non numérique après transformation pour la Corse
    Licence : Non renseignée - Publié le 14/08/2015 - Éditeur : marcob +

    JCL/COBOL - Exemple de Compilation COBOL sous z/OS (Enterprise COBOL)

    Téléchargé 3 fois-
    2
    0
    Ceci est un exemple complet de compilation sur z/OS (MVS) d'un petit programme COBOL.
    Le compilateur utilisé est Enterprise COBOL (IGYCRCTL).
    Licence : BSD - Publié le 19/03/2014 - Auteur : Metalman +

    Remplacer chaine par une chaine de longueur différente

    Téléchargé 3 fois-
    0
    0
    INSPECT REPLACING en Cobol ne permet de remplacer dans une chaîne de caractères une chaîne spécifique que par une chaîne de même longueur.
    Ainsi vous pouvez donner l'ordre
    INSPECT w-ZONE replacing "TOTO" by "ZOZO", mais vous avez une erreur si vous donner l'ordre
    INSPECT w-ZONE replacing "TOTO" by "T"
    le code qui suit donne une méthode pour le faire par une astuce et sans trop se fatiguer dans l'exemple donné on remplace " 000000;" par ";"
    voila la portion de code qui le fait l'astuce vient de l'utilisation de deux séparateurs (qui ne doivent pas figurer dans le texte de base) dont la longueur totale représente avec la chaîne remplaçante un longueur égale à la chaîne à remplacer.


    Le code a téléchar ... Voir la suite
    Licence : Non renseignée - Publié le 07/12/2019 - Auteur : marc.bichara +

    Tester No de Sirete

    Téléchargé 1 fois-
    0
    0
    Permet de tester un No de Sirete par l'algorithme de Luhn
    Paramètres d'Entrée No de Sirete, et indicateur d'erreur
    En sortie indicateur d'erreur = 1 si le Sirete n'est pas bon, à 0 si le Sirete est bon
    Il marche sur tout type de compilateur cobol , aucune spécificité d'un quelconque constructeur étant employé
    Licence : Non renseignée - Publié le 07/12/2019 - Auteur : marc.bichara +

    Node.cobol

    0
    0
    Node.cobol est un pont entre Node.js et COBOL qui vous permettent d'exécuter du code Node.js depuis du code COBOL.
    Vous pouvez par exemple exécuter un serveur Web à partir de code COBOL.
    Licence : MIT - Publié le 24/08/2016 - Éditeur : Ionică Bizău +

    Node-cobol

    0
    0
    Node-cobol est un pont entre Node.js et COBOL qui vous permettent d'exécuter du code COBOL depuis du code Node.js.
    Vous avez par exemple la possibilité de rendre disponible votre application COBOL directement sur le Web (un Web service, par exemple).
    Licence : MIT - Publié le 24/08/2016 - Éditeur : Ionică Bizău +