Forum
Keyword
× Discuss on Template programming, jBASE programming, Enquiries, No-File enquiry, Enquiry routines, Version, Version routines, Menus, Abbriviations, Creating local reference fields, Fast path enquiries, Creating charts and graphs, Generating Reports, Deal slips, Straight through processing, Multi Company and Multi Book setup, Tabbed screens, Composite Screens, T24 API, etc...

CALL EB.CHECK.DATE(XXX)

  • GvA
  • GvA's Avatar Topic Author
  • Offline
  • Platinum Member
  • Platinum Member
  • Posts: 499
  • Thank you received: 9

GvA created the topic: CALL EB.CHECK.DATE(XXX)

Hi,

Have any one come accross this routine 'EB.CHECK.DATE(XXX)'?

What this actually used for?
_________________
M A L A I
#859

Please Log in or Create an account to join the conversation.

  • Posts: 23
  • Thank you received: 0

vkarthik replied the topic:

This routine is used to find out the year if only the two digits are passed as arguments. This is used for archiving purpose. This will work only for the 20 years basis. Meaning from today to 20 years if you pass any two digit the it will give you the correct year. if you pass any digit early then it will consider as later.

For E.g
TODAY = 2005
INCOMING = 95
OUTGOING WILL BE 1995

INCOMING = 84
OUTGOING WILL BE 2084
#860

Please Log in or Create an account to join the conversation.

  • GvA
  • GvA's Avatar Topic Author
  • Offline
  • Platinum Member
  • Platinum Member
  • Posts: 499
  • Thank you received: 9

GvA replied the topic:

Thanks Karthik

Here are some more info.

This routine was developed to solve Y2K program.

For Example

T.VAR = '051114'
CALL EB.CHECK.DATE(T.VAR) will give you 20051114

T.VAR = '951114'
CALL EB.CHECK.DATE(T.VAR) will give your 19951114

The displacement value used here is 20 years.
_________________
M A L A I
#861

Please Log in or Create an account to join the conversation.

Time to create page: 0.112 seconds