F1760CheckUploadOrBilled

F1760 Check Upload or Billed

Minor Business Rule

Object Name: N1701740

Parent DLL: CCRIN

Location: Client/Server

Language: NER

1.Functional Description

1.1Purpose
The purpose of this business function is to determine if any time entry records have been uploaded to the F0911Z1 or the F06116Z1 or have been billed
yet.

It is used to determine if certain fields should be enabled or disabled on the Billing Information form in Call Entry.

This business function will be called from Call Entry (P17501).

1.2Setup Notes and Prerequisites

1.3Special Logic
Table Indexes were added to F1760 that include the Date Billed and Table Basis Date.  Having these table indexes in place we can do the Table I/O calls
and just look for a success.

2.Technical Specifications
2.4Processing
//
//     Initialize Fields
//
VA evt_cStopSearching_EV01 = ""
VA evt_jdBlankDateBilled_DTBIL = " "
VA evt_jdBlankDateTableBasis_TBDT = " "
BF cBilledFlag_EV01 = "0"
BF cUploadedFlag_EV01 = "0"
//
If BF cMode_EV01 is not equal to "4"
   //
   //     Select with Date Billed not equal to blank.
   //
   F1760.Select
      BF mnCallNumber_DOCO =  TK Document (Order No, Invoice, etc.)
      BF cSubledgerType_SBLT =  TK Subledger Type
      VA evt_jdBlankDateBilled_DTBIL != TK Date - Billed
   F1760.Fetch Next
      VA evt_jdDateBilled_DTBIL <- TK Date - Billed
      VA evt_jdTableBasisDate_TBDT <- TK Date - Table Basis (Julian)
   //
   //     If File I/O status = Success - a record has been billed
   //
   If SV File_IO_Status is equal to CO SUCCESS
      BF cBilledFlag_EV01 = "1"
      If BF cMode_EV01 is equal to "1"
         VA evt_cStopSearching_EV01 = "1"
      End If
   End If
End If
If VA evt_cStopSearching_EV01 is not equal to "1"
And BF cMode_EV01 is not equal to "3"
   //
   //     Select with Date Uploaded not equal to blank.
   //
   F1760.Select
      BF mnCallNumber_DOCO =  TK Document (Order No, Invoice, etc.)
      BF cSubledgerType_SBLT =  TK Subledger Type
      VA evt_jdBlankDateTableBasis_TBDT != TK Date - Table Basis (Julian)
   F1760.Fetch Next
      VA evt_jdTableBasisDate_TBDT <- TK Date - Table Basis (Julian)
   //
   //     If File I/O status = Success - a record has been uploaded
   //
   If SV File_IO_Status is equal to CO SUCCESS
      BF cUploadedFlag_EV01 = "1"
   End If
End If

Data Structure

D1701740 - F1760 Check Upload or Billed

Parameter Name Data Item Data Type Req/Opt I/O/Both

mnCallNumber_DOCO DOCO MATH_NUMERIC REQ INPUT

A number that identifies an original document. This document can be a voucher, a sales order, an invoice, unapplied cash, a journal entry,
and so on.

cSubledgerType_SBLT SBLT char REQ INPUT

A user defined code (00/ST) that is used with the Subledger field to identify the subledger type and how the system performs subledger
editing. On the User Defined Codes form, the second line of the description controls how the system performs editing. This is either hard-coded
or user defined. Valid values include: A Alphanumeric field, do not edit   N Numeric field, right justify and zero fill   C Alphanumeric field, right
justify and blank fill

cUploadedFlag_EV01 EV01 char OPT OUTPUT

An option that specifies the type of processing for an event.

cBilledFlag_EV01 EV01 char OPT OUTPUT

An option that specifies the type of processing for an event.

cSuppressErrorMessage_SUPPS SUPPS char OPT INPUT

Special Input Parameters:

1 = Suppress Error Messages
^

szErrorMessageID_DTAI DTAI char OPT OUTPUT

A code that identifies and defines a unit of information. It is an alphanumeric code up to 8 characters long that does not allow blanks or
special characters such as %, &, or +. You create new data items using system codes 55-59. You cannot change the alias.

cMode_EV01 EV01 char REQ INPUT

Special Input Parameters:

1 = Search for billed and uploaded record.  Stop when either one is found or no more F1760 records
are found.

2 = Search for billed and uploaded record.  Stop only after both the billed and uploaded flags are
set to "1" or no more F1760 records are found.

3 = Search for only billed records.  Stop when a record is found that has been billed or no more
F1760 records are found.

4 = Search for only uploaded records.  Stop when a record is found that has been upload or no more
F1760 records are found.
^

Related Functions

None

Related Tables

None

Parameter Name	Data Item	Data Type	Req/Opt	I/O/Both
mnCallNumber_DOCO	DOCO	MATH_NUMERIC	REQ	INPUT
A number that identifies an original document. This document can be a voucher, a sales order, an invoice, unapplied cash, a journal entry, and so on.
cSubledgerType_SBLT	SBLT	char	REQ	INPUT
A user defined code (00/ST) that is used with the Subledger field to identify the subledger type and how the system performs subledger editing. On the User Defined Codes form, the second line of the description controls how the system performs editing. This is either hard-coded or user defined. Valid values include: A Alphanumeric field, do not edit N Numeric field, right justify and zero fill C Alphanumeric field, right justify and blank fill
cUploadedFlag_EV01	EV01	char	OPT	OUTPUT
An option that specifies the type of processing for an event.
cBilledFlag_EV01	EV01	char	OPT	OUTPUT
An option that specifies the type of processing for an event.
cSuppressErrorMessage_SUPPS	SUPPS	char	OPT	INPUT
Special Input Parameters: 1 = Suppress Error Messages ^
szErrorMessageID_DTAI	DTAI	char	OPT	OUTPUT
A code that identifies and defines a unit of information. It is an alphanumeric code up to 8 characters long that does not allow blanks or special characters such as %, &, or +. You create new data items using system codes 55-59. You cannot change the alias.
cMode_EV01	EV01	char	REQ	INPUT
Special Input Parameters: 1 = Search for billed and uploaded record. Stop when either one is found or no more F1760 records are found. 2 = Search for billed and uploaded record. Stop only after both the billed and uploaded flags are set to "1" or no more F1760 records are found. 3 = Search for only billed records. Stop when a record is found that has been billed or no more F1760 records are found. 4 = Search for only uploaded records. Stop when a record is found that has been upload or no more F1760 records are found. ^