FORUM MP | Cobol : fonction date en cobol 85 sous fujitsu

COMMUNAUTE MP

Identifiez vous ...

DOMAINE MP

Bavardages

Langages Généraux

Langages Web

Langages DotNet

Autres langages

Dev. Jeux Video

Sécurité

Sys. Exploitation

Graphismes

Logiciels

Réseaux

Bases de données

Méthodologies

Emplois High-tech

Aide juridique

Articles juridiques

FORUM

CHAT MP IRC

Votre pseudo ...

Serv: irc.irc-land.org

Chan: #MoteurProg

PARTICIPER

Plus de 3500 emplois.

Visiteur MP

fonction date en cobol 85 sous fujitsu
	Forum : COBOL Sous Catégorie : Aucune Type du sujet : Sujet Normale FAQ : FAQ COBOL
		SUIVI PAR MAIL INACTIF
		SUJET RESOLU
		SUJET ACTIF
		N'APPARTIENT PAS A LA FAQ

PAGE : [1]

FORUM COBOL
	Page précedente	Page suivante

capa
Nouveau membre

Inscrit : 25/10/2004
Messages : 1

#39792 Posté le 25/10/04 à 19:38

Bonsoir,

Je souhaiterai savoir si il existe une fonction permettant de récupérer la date du jour (sur un PC sous XP) dans un format AAAA/MM/JJ.

Smiley

je programme du cobol fujitsu sous powercobol 3
(version educ)

Merci pour vos réponses
camille

HAUT DE PAGE

Publicité

Inscrit : X
Messages : X

#Aucun

HAUT DE PAGE

bul
Membre du club

Inscrit : 26/01/2004
Messages : 951

#40395 Posté le 29/10/04 à 15:19

bonjour
accept zone from Date
( pas sûr du format reçu
: l'afficher pour voir ... )
cordialement.
__________________________
~ mon site ~ m'écrire ~
Laissez une adresse Mail où vous écrire, en évitant les spams
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

HAUT DE PAGE

jony89
Nouveau membre

Inscrit : 06/11/2004
Messages : 2

#41682 Posté le 06/11/04 à 17:45

bonjour normalement je pensy qu il sera récupéré sous le format suivant aa/mm/jj
voila mais je suis pas plus sur que ca

HAUT DE PAGE

bemol1
Nouveau membre

Inscrit : 19/12/2004
Messages : 3

#46909 Posté le 19/12/04 à 21:35

Pour récupérer le siecle? Komankonfé?

HAUT DE PAGE

jony24
Nouveau membre

Inscrit : 19/12/2004
Messages : 1

#46910 Posté le 19/12/04 à 21:40

le siecle tu doi le deffinir toi meme avec une clause value dans tes declaratio
en aillan au prealable defini les variables de la date dans un tableau par exemple

HAUT DE PAGE

bemol1
Nouveau membre

Inscrit : 19/12/2004
Messages : 3

#46913 Posté le 19/12/04 à 22:05

Ma t'en que t'i es tu fais ça

WSS.
01 WDATE.
02 WDATE-AA PIC XX.
02 WDATE-MM PIC XX.
02 WDATE-JJ PIC XX.
77 WDATE-AVEC-SIECLE

PROCEDURE DIV.
ACCEPT WDATE FROM DATE
STRING WDATE-JJ '/'
WDATE-MM '/ 20'
WDATE-AA '/'
DELIMITED BY SIZE INTO
WDATE-AVEC-SIECLE.
DISPLAY WDATE-AVEC-SIECLE UPON CONSOLE

Mais le siécle "en dur" dans le prog, c'est pas trés joli...

HAUT DE PAGE

HULK77
Modérateur :
- Cobol

Inscrit : 12/08/2004
Messages : 160

#54716 Posté le 02/03/05 à 09:54

Salut l'ami,

Si tu fait un ACCEPT il te donnera la date sous la forme AAMMJJ sans les slash !!! Si tu souhaite
avoir le siècle en plus, en MAINFRAME l'on utilise
courament la méthode suivante :
Après l'ACCEPT, rajouter un test sur l'année.
Si l'année < 50 MOVE 20 dans le siècle
sinon MOVE 19 dans le siècle.
Exemple : pour une date (AAMMJJ) de 980712
IF 98 < 50 MOVE 20 TO SIECLE
ELSE MOVE 19 TO SIECLE.

Pour une date (AAMMJJ) de 050227
IF 05 < 50 MOVE 20 TO SIECLE
ELSE MOVE 19 TO SIECLE.

A +
__________________________
Ma fabrique de chemises tourne à plein régime !!!

HAUT DE PAGE

lmlarge
Nouveau membre

Inscrit : 16/01/2006
Messages : 17

#85307 Posté le 16/01/06 à 11:43

fonction intreseques de cobol qui permet de recupere la date en ssaammjj....on est en 2006 lhalte au feu...les gars..je lis des questions de l'année 70...
l

HAUT DE PAGE

MMaz
Nouveau membre

Inscrit : 14/02/2008
Messages : 1

#149039 Posté le 14/02/08 à 05:11

Bonjour,
Quand j'utilise le driver Generic/Text Only dans un programme d'impression avec PowerCobol 3 le message suivant s'affiche:
JMP0320I-U INPUT/OUTPUT ERROR STM WRITE.FILE=(Print-File) 'Font'
Merci de m'indiquer ce que dois je faire pour ne plus recevoir ce message
Salutations

HAUT DE PAGE

HULK77
Modérateur :
- Cobol

Inscrit : 12/08/2004
Messages : 160

#149051 Posté le 14/02/08 à 12:30

Salut MMaz,

Ta question n'a rien à voir avec l'intitulé des mails précédent concernant
un problème de date.

D'après le peu d'information que tu nous fournit, j'opterai pour :

Une mauvaise déclaration de ton fichier d'édition, ou
Une mauvaise codification au moment d'écrire dans ton fichier d'édition ou
comme tu fait allusion à une 'Font' peut être à un appel d'une Fonte de police
non définie dans le programme.

Fournir plus de code sur ton programme à l'avenir, tu pourra !!!

HULK77
__________________________
Ma fabrique de chemises tourne à plein régime !!!

HAUT DE PAGE


	Page précédente	Page suivante
FORUM COBOL

PAGE : [1]

.: Site Web développé par Julien Pichot et l'équipe MPWG avec www.evolvia-web.com :.