33 résultats trouvés

par cimmelé
mar. 30 mars 2010, 22:12:40
Forum : langages
Sujet : Free RPG
Réponses : 3
Vues : 17208

To be free or not ?

Bonjour, :D Outre le côté inéluctable de ces évolutions , le free apporte énormément de nouveautés et de facilités dans la rédaction des programmes et permet d'utiliser les fonctions de manipulation de dates, chaines de caractères, tableaux sans modération. Suppression des Klist en pouvant spécifier...
par cimmelé
mar. 28 juil. 2009, 10:26:42
Forum : langages
Sujet : Colonne auto incrémentée type Compteur
Réponses : 2
Vues : 12002

(sans texte)

en cherchant bien ...

la réponse est dans AF400 (Nouveautés syntaxiques SQL en V5R30) avec l'ordre CREATE SEQUENCE qui permet de créer un nouveau type d'objet pour SQL (en fait une Data Area) permettant de mémoriser à l'extérieur d'une table, une suite numérique.
par cimmelé
mar. 28 juil. 2009, 08:46:13
Forum : langages
Sujet : Colonne auto incrémentée type Compteur
Réponses : 2
Vues : 12002

Colonne auto incrémentée type Compteur

Bonjour,

Comment peut-on disposer d'une colonne auto incrémentée lors d'un Insert dans une table :?:

Merci d'avance,
par cimmelé
mer. 17 juin 2009, 08:52:01
Forum : langages
Sujet : SQL en format libre avec variables
Réponses : 8
Vues : 31056

(sans texte)

Bonjour,

Le nom de la table et la bibliothèque peuvent être stockés dans des variables du programme RPG et utilisés de la manières suivante :

SELECT COLUMN_NAME FROM SYSCOLUMNS WHERE TABLE_NAME = :NomTable AND TABLE_SCHEMA= :NomBib

Cordialement,
par cimmelé
lun. 06 avr. 2009, 17:55:38
Forum : langages
Sujet : Erreur dans une donnée décimale (ENORME)
Réponses : 6
Vues : 22008

(sans texte)

:oops: SOLUTION (après ces échanges + 1 téléphone ) C'était forcément ENORME ! Ainsi va la vie et les changements dans nos environnements de travail, où en 5250 on a toujours une liste de bibliothèques valide pour tester ou debugger... Dans un contexte requêteur (Squirrel, Navigator) si on omet de q...
par cimmelé
lun. 06 avr. 2009, 14:51:25
Forum : langages
Sujet : Erreur dans une donnée décimale (ENORME)
Réponses : 6
Vues : 22008

(sans texte)

une dernière précision :

Je vois en debug sur le programme RPG les variables de la DS alimentées ! et pas sur Squirrel, ni sur Navigator...
par cimmelé
lun. 06 avr. 2009, 14:30:48
Forum : langages
Sujet : Erreur dans une donnée décimale (ENORME)
Réponses : 6
Vues : 22008

(sans texte)

:? La problématique a changé, j'ai résolu mon problème en passant toutes les variables du programme appelant et de la fonction en Condensé. Le programme appelant étant en fait une procédure cataloguée, je me heurte maintenant (et depuis le début) au fait que le contenu de la colonne Résultat obtenue...
par cimmelé
lun. 06 avr. 2009, 10:52:22
Forum : langages
Sujet : Erreur dans une donnée décimale (ENORME)
Réponses : 6
Vues : 22008

Erreur dans une donnée décimale (ENORME)

Bonjour, Est ce que quelqu'un peut m'aider sur le problème suivant : :?: Stockage du résultat d'un count(*) dans un programme de service avec le prototype et les variables suivantes DRtvLigneBP pi 4 0 D pNoBP 8a D àLigneTotal s 4 0 select count(*) into :àLigneTotal from bpdetl1 where bdbon = :pNoBP ...
par cimmelé
mer. 26 nov. 2008, 22:30:18
Forum : Système
Sujet : Messages dans QSYSOPR
Réponses : 4
Vues : 21973

(sans texte)

voici un petit CLP qui vient lire une msgq Dans la commande Rcvmsg, on récupère des tas d'infos sur les variables messages. PGM DCL VAR(&MSGID1) TYPE(*CHAR) LEN(7) DCL VAR(&MSGID2) TYPE(*CHAR) LEN(7) DCL VAR(&TEXTE) TYPE(*CHAR) LEN(132) ALCOBJ OBJ((LIBSYS/QUPS *MSGQ *EXCL)) MONMSG CPF0000 EXEC(GOTO ...
par cimmelé
mar. 25 mars 2008, 09:29:18
Forum : langages
Sujet : Equivalent RETURN dans un CL
Réponses : 2
Vues : 14900

(sans texte)

Il existe une commande RETURN permettant de rendre le contrôle au programme appelant.

En revanche, je n'ai pas l'expérience d'un RETURN avec un fichier ouvert dans le programme et de savoir si le fichier reste ouvert.

à suivre...
par cimmelé
lun. 05 nov. 2007, 16:49:19
Forum : Client Access
Sujet : Emulateur 5250 / Client Messagerie sur MAC OS
Réponses : 3
Vues : 22409

Emulateur 5250 / Client Messagerie sur MAC OS

Bonjour,

Avez-vous déjà réalisé les déploiements suivants sur MAC OS ?

1) un émulateur 5250 (solution choisie ?)

2) Un client Messagerie connecté à un serveur Lotus Notes

Merci par avance de votre retour,
par cimmelé
ven. 19 oct. 2007, 13:57:01
Forum : Système
Sujet : Répertoire par défaut de l'utilisateur dans l'IFS
Réponses : 2
Vues : 13734

(sans texte)

:oops:

merci Philippe,

Attention tout de même, si l'on spécifie un autre chemin que '/', il faut cependant que le répertoire existe, sinon '/' est pris par défaut... et là on peut chercher longtemps (à moins d'avoir lu l'aide de la commande CHGUSRPRF; ce qui n'était pas exactement mon cas).
par cimmelé
ven. 19 oct. 2007, 10:19:25
Forum : Système
Sujet : Répertoire par défaut de l'utilisateur dans l'IFS
Réponses : 2
Vues : 13734

Répertoire par défaut de l'utilisateur dans l'IFS

Comment est déterminé le répertoire par défaut de la commande WRKLNK

Sur certains profils de notre System I, le répertoire utilisé est :

/HOME/utilisateur

Merci par avance
par cimmelé
mar. 02 oct. 2007, 21:47:34
Forum : langages
Sujet : Exemple code RPG pour rafraîchir automatiquement un écran
Réponses : 0
Vues : 12672

Exemple code RPG pour rafraîchir automatiquement un écran

Pour rafraîchir automatiquement un écran et permettre une entrée au clavier (pour interrompre le programme) Dans le CLP /* 60 est l'intervalle de rafraichissement */ OVRDSPF FILE(VSU021AD) WAITRCD(60) Dans le DSPF (au niveau du fichier écran) /* 34 est l'indicateur qui conditionne l'affichage du SFL...
par cimmelé
ven. 11 mai 2007, 16:51:36
Forum : langages
Sujet : Trigger
Réponses : 1
Vues : 12586

Trigger

Bonjour,

:roll: J'aimerais pouvoir retrouver dans un programme RPG utilisé comme trigger, le nom du programme ayant effectué la transaction BD et déclenché l'appel au trigger...

Est ce que cette possibilité existe ?

Merci