Re: ILE CEE API's

[Dave Mahadevan <mahadevan@xxxxxxxx>]

Weatherly, Howard wrote:
> 
> Has anyone used the CEEDAYS or the CEEDATE API's or in fact the QWCCVTDT API
> ?
> I am beginning to think that I either can not comprehend the manual or I
> just should not
> be writing programs because I can not get any of these to work.
> 
> We are on R3V2 and if anyone has some sample COBOL code, I would love to see
> it.

I can tell you in RPG, you need to to CALLB(D) to CEEDAYS to pass the
operation descriptor.

Something like this:

 ******CEE procedure
feedback******************************************************************  
D FC              DS                 
INZ                                                        
D FC_SEV                  1      2B
0                                      severity              
D FC_MSGNO                3      4B
0                                      message number        
D FC_FLAGS                5     
5                                         flags                 
D FC_FACID                6     
8                                         facility ID           
D FC_ISI                  9     12B
0                                      isi                   

**********************************************************************************************
  
D DATETIME       
DS                                                                             
DTIME_LILI                       9B 0
INZ                                  Lillian               
DTIME_SECS                       9B 0
INZ                                  seconds               
DTIME_GREGO                       Z  
INZ                                  Gregorian time        
D DAY_NO                         9B 0
INZ                                  Day number            
DDATE_ISO                         D  
DATFMT(*ISO)                         out date cyyrmody 
D DATE_S_F1       S            
30                                         Date String           
D PICT_S_F1       S            
30                                         Picture string        
  
                                                                                
                 
C                   MOVEL     'YYYY-MM-DD'  PICT_S_F1     
C                   MOVEL     DATE_ISO      DATE_S_F1     
C                   CALLB(D)  'CEEDAYS'                   
C                   PARM                    DATE_S_F1     
C                   PARM                    PICT_S_F1     
C                   PARM                    TIME_LILI     
C                   PARM                    FC            

---
Thank You.

Regards

Dave Mahadevan.. mailto:mahadevan@fuse.net
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the Midrange System Mailing List!  To submit a new message,   *
* send your mail to "MIDRANGE-L@midrange.com".  To unsubscribe from     *
* this list send email to MAJORDOMO@midrange.com and specify            *
* 'unsubscribe MIDRANGE-L' in the body of your message.  Questions      *
* should be directed to the list owner / operator: david@midrange.com   *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *