 Output Date in American Format       - PDATAx, LDATAx, MDATAx
 Output Date in European Format       - PDATEx, LDATEx, MDATEx
 Output Date in Dual Format           - PDATSx, LDATSx, MDATSx, SDATSx
 Output Day of Week                   - PWDAYx, LWDAYx, MWDAYx, SWDAYx
 Explanation of Switchable Output
:
PDATA1, LDATA1 - Prints long form of date in American format.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MDATA1 - Stores long form of date to memory in American format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (18 bytes maximum).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATA1, console output; LDATA1, printer output.

Output example:          "March 2, 1988"


PDATA2, LDATA2 - Prints intermediate form of date in American format.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MDATA2 - Stores intermediate form of date to memory in American format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (9 bytes).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATA2, console output; LDATA2, printer output.

Output example:          "02 Mar 88"


PDATA3, LDATA3 - Prints short form of date in American format.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MDATA3 - Stores short form of date to memory in American format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (8 bytes).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATA3, console output; LDATA3, printer output.

Output example:          "03/02/88"


PDATA4, LDATA4 - Prints very short form of date in American format.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MDATA4 - Stores very short form of date to memory in American format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (8 bytes maximum).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATA4, console output; LDATA4, printer output.

Output example:          "3/2/88"

:
PDATE1, LDATE1 - Prints long form of date in European format.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MDATE1 - Stores long form of date to memory in European format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (17 bytes maximum).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATE1, console output; LDATE1, printer output.

Output example:          "2 March 1988"


PDATE2, LDATE2 - Prints intermediate form of date in European format.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MDATE2 - Stores intermediate form of date to memory in European format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (9 bytes).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATE2, console output; LDATE2, printer output.

Output example:          "02 Mar 88"


PDATE3, LDATE3 - Prints short form of date in European format.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MDATE3 - Stores short form of date to memory in European format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (8 bytes).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATE3, console output; LDATE3, printer output.

Output example:          "02.03.88"


PDATE4, LDATE4 - Prints very short form of date in European format.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MDATE4 - Stores very short form of date to memory in European format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (8 bytes maximum).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATE4, console output; LDATE4, printer output.

Output example:          "2.3.88"

:
PDATS1, LDATS1, SDATS1 - Prints long form of date in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         A = date format flag (0=American, FFh=European).
  EXIT:  None.
  USES:  None.

MDATS1 - Stores long form of date to memory in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (18 bytes maximum),
         A = date format flag (0=American, FFh=European).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATS1, console output; LDATS1, printer output; SDATS1 switchable 
output.

Output examples:         "March 2, 1988"
                         "2 March 1988"


PDATS2, LDATS2, SDATS2 - Prints intermediate form of date in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         A = date format flag (0=American, FFh=European).
  EXIT:  None.
  USES:  None.

MDATS2 - Stores intermediate form  of  date to memory in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (9 bytes),
         A = date format flag (0=American, FFh=European).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATS2, console output; LDATS2, printer output; SDATS2, switchable 
output.

Output examples:         "Mar 02 88"
                         "02 Mar 88"


PDATS3, LDATS3, SDATS3 - Prints short form of date in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         A = date format flag (0=American, FFh=European).
  EXIT:  None.
  USES:  None.

MDATS3 - Stores short form of date to memory in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (8 bytes),
         A = date format flag (0=American, FFh=European).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATS3, console output; LDATS3, printer output; SDATS3, switchable 
output.

Output examples:         "03/02/88"
                         "02.03.88"


PDATS4, LDATS4, SDATS4 - Prints very short form of date in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         A = date format flag (0=American, FFh=European).
  EXIT:  None.
  USES:  None.

MDATS4 - Stores very short form of date to memory in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (8 bytes maximum),
         A = date format flag (0=American, FFh=European).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATS4, console output; LDATS4, printer output; SDATS4, switchable 
output.

Output examples:         "3/2/88"
                         "2.3.88"

PDATS5, LDATS5, SDATS5 - Prints padded short form of date in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         A = date format flag (0=American, FFh=European).
  EXIT:  None.
  USES:  None.

MDATS5 - Stores padded short form of date to memory in dual format.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (8 bytes maximum),
         A = date format flag (0=American, FFh=European).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PDATS5, console output; LDATS5, printer output; SDATS5, switchable 
output.

Output examples:         " 3/ 2/88"
                         " 2. 3.88"
:
PWDAY1, LWDAY1, SWDAY1 - Prints long form of day of week.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MWDAY1 - Stores long form of day of week to memory.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (9 bytes maximum).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PWDAY1, console output; LWDAY1, printer output; SWDAY1, switchable 
output.

Output example:          "Wednesday"

PWDAY2, LWDAY2, SWDAY2 - Prints short form of day of week.

  ENTER: HL = address of date as BCD yy mm dd.
  EXIT:  None.
  USES:  None.

MWDAY2 - Stores short form of day of week to memory.

  ENTER: HL = address of date as BCD yy mm dd,
         DE = address of memory buffer (3 bytes).
  EXIT:  DE = address of byte after output.
  USES:  DE

Usage: PWDAY2, console output; LWDAY2, printer output; SWDAY2, switchable 
output.

Output example:          "Wed"
::ZSLIBS
