Publicité
+ Répondre à la discussion
Affichage des résultats 1 à 10 sur 10
  1. #1
    Rédacteur
    Avatar de Arnaud F.
    Homme Profil pro Arnaud Feltz
    Développeur COBOL
    Inscrit en
    août 2005
    Messages
    5 183
    Détails du profil
    Informations personnelles :
    Nom : Homme Arnaud Feltz
    Âge : 27
    Localisation : France

    Informations professionnelles :
    Activité : Développeur COBOL
    Secteur : Finance

    Informations forums :
    Inscription : août 2005
    Messages : 5 183
    Points : 8 579
    Points
    8 579

    Par défaut [JCL] Transformer un 9(xx) COMP-3 en S9(xx) COMP-3

    Bonjour,

    je souhaiterais transformer la zone d'un fichier qu'est décrite en 9(13) COMP-3 pour la passer en S9(13) COMP-3.

    Est-ce possible?

    Merci
    C'est par l'adresse que vaut le bûcheron, bien plus que par la force. Homère

    Installation de Code::Blocks sous Debian à partir de Nightly Builds

  2. #2
    Expert Confirmé
    Homme Profil pro Hédhili Jaïdane
    Consultant/Formateur/Développeur AS/400, iSeries, System i et Cobol
    Inscrit en
    juin 2007
    Messages
    1 872
    Détails du profil
    Informations personnelles :
    Nom : Homme Hédhili Jaïdane
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Consultant/Formateur/Développeur AS/400, iSeries, System i et Cobol
    Secteur : Conseil

    Informations forums :
    Inscription : juin 2007
    Messages : 1 872
    Points : 3 404
    Points
    3 404

    Par défaut

    Bonjour.

    Je ne vois pas ce qui peut s'y opposer. Et puis la passer où et à qui, et c'est quoi ton OS ?

    On peut mouvementer la zone 9(13) COMP-3 dans la zone S9(13) COMP-3 et on pourrait même la prendre telle quelle, ton système saura interpréter le F terminal en C si la zone finale cible est du packé signé.

  3. #3
    Expert Confirmé Sénior
    Profil pro
    Inscrit en
    décembre 2007
    Messages
    3 151
    Détails du profil
    Informations personnelles :
    Localisation : France, Val d'Oise (Île de France)

    Informations forums :
    Inscription : décembre 2007
    Messages : 3 151
    Points : 10 330
    Points
    10 330

    Par défaut

    pour paraphraser Hédhili Jaïdane, voici le code complet :

    Code :
    1
    2
    3
    4
    5
    6
    77 NOMBRE-NON-SIGNE PIC 9(13) COMP-3.
    77 NOMBRE-SIGNE     PIC S9(13) COMP-3.
    (.../...)
    MOVE NOMBRE-NON-SIGNE TO NOMBRE-SIGNE 
    .
    La conversion est implicite. Je l'ai fait des milliers de fois. C'est bien pratique.
    Les 4 règles d'airain du développement informatique sont, d'après Michael C. Kasten :
    1)on ne peut pas établir un chiffrage tant qu'on a pas finalisé la conception
    2)on ne peut pas finaliser la conception tant qu'on a pas complètement compris toutes les exigences
    3)le temps de comprendre toutes les exigences, le projet est terminé
    4)le temps de terminer le projet, les exigences ont changé
    Et le serment de non-allégiance :
    Je promets de n’exclure aucune idée sur la base de sa source mais de donner toute la considération nécessaire aux idées de toutes les écoles ou lignes de pensées afin de trouver celle qui est la mieux adaptée à une situation donnée.

  4. #4
    Rédacteur
    Avatar de Arnaud F.
    Homme Profil pro Arnaud Feltz
    Développeur COBOL
    Inscrit en
    août 2005
    Messages
    5 183
    Détails du profil
    Informations personnelles :
    Nom : Homme Arnaud Feltz
    Âge : 27
    Localisation : France

    Informations professionnelles :
    Activité : Développeur COBOL
    Secteur : Finance

    Informations forums :
    Inscription : août 2005
    Messages : 5 183
    Points : 8 579
    Points
    8 579

    Par défaut

    Désolé ma demande initiale n'était pas claire et j'ai réussi à trouver la source de mon problème...
    C'est par l'adresse que vaut le bûcheron, bien plus que par la force. Homère

    Installation de Code::Blocks sous Debian à partir de Nightly Builds

  5. #5
    Membre habitué
    Homme Profil pro Julien Guiffroy
    Ingénieur d'étude Mainframe
    Inscrit en
    septembre 2012
    Messages
    61
    Détails du profil
    Informations personnelles :
    Nom : Homme Julien Guiffroy
    Âge : 28
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Ingénieur d'étude Mainframe
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : septembre 2012
    Messages : 61
    Points : 114
    Points
    114

    Par défaut

    Si le nombre "non signé" est égal à -1, est-ce que le move non-signé to signé renverra -1 quand même ?

    Question peut être stupide mais un nombre "non" signé est-il la valeur absolue du nombre (donc positif) ?

  6. #6
    Membre du Club
    Homme Profil pro Jean
    Développeur Grands Systèmes IBM
    Inscrit en
    août 2008
    Messages
    42
    Détails du profil
    Informations personnelles :
    Nom : Homme Jean
    Âge : 61
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Développeur Grands Systèmes IBM

    Informations forums :
    Inscription : août 2008
    Messages : 42
    Points : 48
    Points
    48

    Par défaut

    Bonsoir,
    Physiquement dans un COMP-3 ou PACKED DECIMAL il y a toujours l'emplacement du signe que l'on mette S ou pas dans la déclaration.

    En résumé, un COMP-3 est toujours signé !

    @+
    PS:
    Ce serait sympa d'indiquer la solution du problème

  7. #7
    Expert Confirmé
    Homme Profil pro Hédhili Jaïdane
    Consultant/Formateur/Développeur AS/400, iSeries, System i et Cobol
    Inscrit en
    juin 2007
    Messages
    1 872
    Détails du profil
    Informations personnelles :
    Nom : Homme Hédhili Jaïdane
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Consultant/Formateur/Développeur AS/400, iSeries, System i et Cobol
    Secteur : Conseil

    Informations forums :
    Inscription : juin 2007
    Messages : 1 872
    Points : 3 404
    Points
    3 404

    Par défaut

    Citation Envoyé par Skylyn Voir le message
    Si le nombre "non signé" est égal à -1, est-ce que le move non-signé to signé renverra -1 quand même ?

    Question peut être stupide mais un nombre "non" signé est-il la valeur absolue du nombre (donc positif) ?
    Inutile de chercher midi à quatorze heures ni de calculer la racine carré de -1 dans R.

    Un nombre non signé ne pourra pas contenir un nombre négatif. Il est tout simplement considéré (ou assimilé) comme un nombre positif.
    1 est représenté en interne en F1 ou en 1F selon qu'il soit en display ou en comp-3.
    +1 est représenté en interne en F1 (ou C1 pour certains OS) ou en 1F (ou 1C pour certains OS) selon qu'il soit en display ou en comp-3.
    -1 est représenté en interne en D1 ou en 1D selon qu'il soit en display ou en comp-3.

  8. #8
    Expert Confirmé
    Homme Profil pro Hédhili Jaïdane
    Consultant/Formateur/Développeur AS/400, iSeries, System i et Cobol
    Inscrit en
    juin 2007
    Messages
    1 872
    Détails du profil
    Informations personnelles :
    Nom : Homme Hédhili Jaïdane
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Consultant/Formateur/Développeur AS/400, iSeries, System i et Cobol
    Secteur : Conseil

    Informations forums :
    Inscription : juin 2007
    Messages : 1 872
    Points : 3 404
    Points
    3 404

    Par défaut

    Citation Envoyé par Jean GVE Voir le message
    Bonsoir,
    Physiquement dans un COMP-3 ou PACKED DECIMAL il y a toujours l'emplacement du signe que l'on mette S ou pas dans la déclaration.

    En résumé, un COMP-3 est toujours signé !

    @+
    PS:
    Ce serait sympa d'indiquer la solution du problème
    L'emplacement oui mais pas toujours l'indication du signe négatif. On ne pourra jamais mettre un nombre négatif dans une zone nombre non signée. C'est la même chose pour l'usage display. Le signe ne prend jamais de place sauf avec sign separate (leading ou trailing)

  9. #9
    Membre habitué
    Homme Profil pro Julien Guiffroy
    Ingénieur d'étude Mainframe
    Inscrit en
    septembre 2012
    Messages
    61
    Détails du profil
    Informations personnelles :
    Nom : Homme Julien Guiffroy
    Âge : 28
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Ingénieur d'étude Mainframe
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : septembre 2012
    Messages : 61
    Points : 114
    Points
    114

    Par défaut

    Citation Envoyé par Hédhili Jaïdane Voir le message
    Inutile de chercher midi à quatorze heures ni de calculer la racine carré de -1 dans R.
    Nul besoin d'être médisant... je posais juste une question simple!

    De plus, si je veux être ironique :

    Inutile de chercher midi à quatorze heure car dans R la racine carrée de -1 tu peux toujours la chercher...

    Je me disais juste que, par rapport au sujet, quelle est la différence entre un S9(3) COMP-3 et un 9(3) COMP-3 s'il n'y a aucune différence ?

    Pourquoi le nombre non signé devrait avoir un emplacement pour le signe s'il ne l'est pas ?

  10. #10
    Expert Confirmé Sénior
    Profil pro
    Inscrit en
    décembre 2007
    Messages
    3 151
    Détails du profil
    Informations personnelles :
    Localisation : France, Val d'Oise (Île de France)

    Informations forums :
    Inscription : décembre 2007
    Messages : 3 151
    Points : 10 330
    Points
    10 330

    Par défaut

    Citation Envoyé par Skylyn Voir le message
    (.../...)
    Pourquoi le nombre non signé devrait avoir un emplacement pour le signe s'il ne l'est pas ?
    Parceque c'est comme ça que c'est défini. Le "signe" est à C pour "+", D pour "-", et F pour "non signé". Donc, ton COMP-3 non signé a un F à la fin. Je suppose que c'est pour optimiser d'éventuelles opérations avec des éléments qui eux, sont signés(comme par exemple le MOVE que j'ai donné en exemple).
    Les 4 règles d'airain du développement informatique sont, d'après Michael C. Kasten :
    1)on ne peut pas établir un chiffrage tant qu'on a pas finalisé la conception
    2)on ne peut pas finaliser la conception tant qu'on a pas complètement compris toutes les exigences
    3)le temps de comprendre toutes les exigences, le projet est terminé
    4)le temps de terminer le projet, les exigences ont changé
    Et le serment de non-allégiance :
    Je promets de n’exclure aucune idée sur la base de sa source mais de donner toute la considération nécessaire aux idées de toutes les écoles ou lignes de pensées afin de trouver celle qui est la mieux adaptée à une situation donnée.

+ Répondre à la discussion
Cette discussion est résolue.

Liens sociaux

Règles de messages

  • Vous ne pouvez pas créer de nouvelles discussions
  • Vous ne pouvez pas envoyer des réponses
  • Vous ne pouvez pas envoyer des pièces jointes
  • Vous ne pouvez pas modifier vos messages
  •