DD3N912 - TranPrint - Build Record Seq - Data Structure
/*****************************************************************************
 *    Source File:  bd3n912
 *
 *    Description:  TranPrint - Build Record Sequences - BSFN Source File
 *
 *        History:
 *          Date        Programmer  SAR# - Description
 *          ----------  ----------  -------------------------------------------
 *   Author 5/09/2000   GE6618987 4107972 - Created 
 *
 * Copyright (c) Data Systems International Inc. 2000
 *
 * This unpublished material is proprietary to Data Systems International Inc..
 * All rights reserved.  The methods and techniques described herein are
 * considered trade secrets and/or confidential.  Reproduction or
 * distribution, in whole or in part, is forbidden except by express
 * written permission of Data Systems International Inc.
 ****************************************************************************/
/**************************************************************************
 * Notes:
 *
 * This BSFN can be called directly.  It can also be called indirectly through 
 * the ND3N901.  The ND3N901 will not call this function if cdcLINKActionCode = 1.  
 * 
 *  This BSFN combines strings of Field Names and Data Values to create a 
 * UFD1 field of up to 250 characters.  If a group of fields can be repesented 
 * with one record, then it will have a TNID value of "0" (zero).  If multiple 
 * records are required then they will be numbered as "001", "002",... "L".  
 * The last record will get an TNID value of "L" to indicate that this is the 
 * Last record for this group of records.  
 *
 *cdcLINKActionCode = 0 (Default)
 *This will combine the Fields and Values into as many records as
 *it will take to keep the UFD1 size under 250 characters.  The BSFN
 *will handle creating the sequence numbers.  The default 
 *Starting Sequence Number will be "0". 
 *
 *cdcLINKActionCode = 1
 *This will combine the Fields and Values UP TO 250 characters.  
 *One record is written using the Sequnce Number provided.  
 *User provides ALL validation before BSFN is called.  
 *
 *cdcLINKActionCode = 2
 *Does NOT send a "L" record.  If you have too many Fields and Values 
 *to fit in one call to this BSFN, Use multiple calls with an 
 *cdcLINKActionCode = 2 on all but the last call.  The next Starting 
 *Sequence Number will be returned for use in the next call.  
 *This will combine the Fields and Values into as many records as
 *it will take to keep the UFD1 size under 250 characters.  The BSFN
 *will handle creating the sequence numbers.  The default 
 *Starting Sequence Number will be "0". 
 *
 **************************************************************************/
| Parameter Name | Data Item | Data Type | Req/Opt | I/O/Both | 
|---|---|---|---|---|
| cdcLINKActionCode_EV01 | EV01 | char | OPT | NONE | 
An option that specifies the type of processing for an event.  | ||||
| cActionCode_ACTION | ACTION | char | OPT | NONE | 
A code that indicates the activity you want to perform. Valid codes are:
   A Add new record
   C Change existing record
   D Delete existing 
  | ||||
| jdDateUpdated_UPMJ | UPMJ | JDEDATE | OPT | NONE | 
The date that specifies the last update to the file record.  | ||||
| mnTimeUpdated_TDAY | TDAY | MATH_NUMERIC | OPT | NONE | 
The computer clock in hours:minutes:seconds.  | ||||
| szUserId_USER | USER | char | OPT | NONE | 
The code that identifies a user profile.  | ||||
| szWorkStationId_JOBN | JOBN | char | OPT | NONE | 
The code that identifies the work station ID that executed a particular job.  | ||||
| mnJobNumber_JOBS | JOBS | MATH_NUMERIC | OPT | NONE | 
The job number (work station ID) which executed the particular job.  | ||||
| szProgramId_PID | PID | char | OPT | NONE | 
The number that identifies the batch or interactive program (batch or interactive object). For example, the number of the Sales Order Entry 
  | ||||
| szVersion_VERS | VERS | char | OPT | NONE | 
A user-defined set of specifications that control how applications and reports run. You use versions to group and save a set of user-defined 
  | ||||
| cSuppressErrMsg_EV01 | EV01 | char | OPT | NONE | 
An option that specifies the type of processing for an event.  | ||||
| cErrorCode_ERRC | ERRC | char | OPT | NONE | 
This error code indicates if any errors occurred during the creation of the Trip Document Detail (F4914) records by the Delivery Document 
  | ||||
| szErrorMessageKey_EKEY | EKEY | char | OPT | NONE | 
A 4-digit number assigned to all errors.
When this number is used in the error message facility (F7 from any form), you may enter a specific 
  | ||||
| nDebugLevel_INT01 | INT01 | integer | OPT | NONE | 
Number of Days in Future to Query for Responses Due.  | ||||
| szDateTimeFromDevice_DVDT | DVDT | char | OPT | NONE | 
| szFormatName_FMAT | FMAT | char | OPT | NONE | 
The RPG format name the system uses in the logical file or open query statement.  | ||||
| mnPrinterNumber_PFN0 | PFN0 | MATH_NUMERIC | OPT | NONE | 
Printer- future numeric 0  | ||||
| szInputData_UFD1 | UFD1 | char | OPT | NONE | 
| mnBlockCount_BLCT | BLCT | MATH_NUMERIC | OPT | NONE | 
Block Count  | ||||
| szSequence_TNID | TNID | char | OPT | NONE | 
| szDeviceName_DVNM | DVNM | char | OPT | NONE | 
| szCostCenterAlt_MMCU | MMCU | char | OPT | NONE | 
A code that represents a high-level business unit. Use this code to refer to a branch or plant that might have departments or jobs, which 
  | ||||
| szStartingSeq_TNID | TNID | char | OPT | NONE | 
| szEndingSeq_TNID | TNID | char | OPT | NONE | 
| mnRandomNumber_FSTI | FSTI | MATH_NUMERIC | OPT | NONE | 
| szFieldName01 | GS2A | char | OPT | NONE | 
| szDataValue01 | GS5A | char | OPT | NONE | 
| szFieldName02 | GS2A | char | OPT | NONE | 
| szDataValue02 | GS5A | char | OPT | NONE | 
| szFieldName03 | GS2A | char | OPT | NONE | 
| szDataValue03 | GS5A | char | OPT | NONE | 
| szFieldName04 | GS2A | char | OPT | NONE | 
| szDataValue04 | GS5A | char | OPT | NONE | 
| szFieldName05 | GS2A | char | OPT | NONE | 
| szDataValue05 | GS5A | char | OPT | NONE | 
| szFieldName06 | GS2A | char | OPT | NONE | 
| szDataValue06 | GS5A | char | OPT | NONE | 
| szFieldName07 | GS2A | char | OPT | NONE | 
| szDataValue07 | GS5A | char | OPT | NONE | 
| szFieldName08 | GS2A | char | OPT | NONE | 
| szDataValue08 | GS5A | char | OPT | NONE | 
| szFieldName09 | GS2A | char | OPT | NONE | 
| szDataValue09 | GS5A | char | OPT | NONE | 
| szFieldName10 | GS2A | char | OPT | NONE | 
| szDataValue10 | GS5A | char | OPT | NONE | 
| szFieldName11 | GS2A | char | OPT | NONE | 
| szDataValue11 | GS5A | char | OPT | NONE | 
| szFieldName12 | GS2A | char | OPT | NONE | 
| szDataValue12 | GS5A | char | OPT | NONE | 
| szFieldName13 | GS2A | char | OPT | NONE | 
| szDataValue13 | GS5A | char | OPT | NONE | 
| szFieldName14 | GS2A | char | OPT | NONE | 
| szDataValue14 | GS5A | char | OPT | NONE | 
| szFieldName15 | GS2A | char | OPT | NONE | 
| szDataValue15 | GS5A | char | OPT | NONE | 
| szFieldName16 | GS2A | char | OPT | NONE | 
| szDataValue16 | GS5A | char | OPT | NONE | 
| szFieldName17 | GS2A | char | OPT | NONE | 
| szDataValue17 | GS5A | char | OPT | NONE | 
| szFieldName18 | GS2A | char | OPT | NONE | 
| szDataValue18 | GS5A | char | OPT | NONE | 
| szFieldName19 | GS2A | char | OPT | NONE | 
| szDataValue19 | GS5A | char | OPT | NONE | 
| szFieldName20 | GS2A | char | OPT | NONE | 
| szDataValue20 | GS5A | char | OPT | NONE | 
| szFieldName21 | GS2A | char | OPT | NONE | 
| szDataValue21 | GS5A | char | OPT | NONE | 
| szFieldName22 | GS2A | char | OPT | NONE | 
| szDataValue22 | GS5A | char | OPT | NONE | 
| szFieldName23 | GS2A | char | OPT | NONE | 
| szDataValue23 | GS5A | char | OPT | NONE | 
| szFieldName24 | GS2A | char | OPT | NONE | 
| szDataValue24 | GS5A | char | OPT | NONE | 
| szFieldName25 | GS2A | char | OPT | NONE | 
| szDataValue25 | GS5A | char | OPT | NONE | 
| None | 
| None |