subhash

• Aug 5th, 2005

 

accept date into ws-date,this must be declared in procedure division. 
 
where ws-date is variable delared in ws-section which is used to report genaration progarm

praleo

• Jul 12th, 2006

 

ACCEPT WS-ACCEPT-DATE   FROM DATE.    

ACCEPT WS-ACCEPT-TIME   FROM TIME.

declare ws-accept-date and ws-accept-time in working-storage section     

mhiremath

 Profile Answers by mhiremath 

• May 15th, 2008

 

Declare Working storage variable
01  DISP-DATE  PIC X(16).

In procedure Division ... use the following code to move current date to disp-date. This will give you current date, month, day, hh,mm,ss ...

MOVE FUNCTION CURRENT-DATE (1:16) TO DISP-DATE

Thank you,
Milind