
{
{    The purpose of this request is to format a compact date into a user
{  specified format.
{
{        PMP$FORMAT_COMPACT_DATE (DATE_TIME, FORMAT, DATE, STATUS)
{
{  DATE_TIME: (input) The compact date and time from which the date is
{         extracted and formatted.
{
{  FORMAT: (input) This parameter specifies the format in which the date
{        will be returned.  Valid specifications are:
{          osc$month_date : month DD, YYYY
{            example: November 13, 1978
{          osc$mdy_date : MM/DD/YY
{            example: 11/13/78
{          osc$iso_date : YYYY-MM-DD
{            example: 1978-13-11
{          osc$ordinal_date : YYYYDDD
{            example: 1978317
{          osc$dmy_date: DD/MM/YY
{            example: 13/11/78
{          osc$default_date : an installation specified format from the above.
{
{  DATE: (output) This parameter specifies the formatted date.
{
{  STATUS: (output) This parameter specifies the request status.
{       CONDITION: pme$invalid_date_format, pme$invalid_day,
{                  pme$invalid_month, pme$invalid_year.
{       IDENTIFIER: pmc$program_management_id.
{
