1.Functional Description
1.1Purpose
The purpose of this business function is to validate and get specification definition from
Specifications Definitions Master File (F3702).
1.2Setup Notes and Prerequisites
1.3Special Logic
2.Technical Specifications
2.4Processing
VA evt_cFetchFlag= "0"
cErrorCode ="0"
szErrorMessageID=" "
If szSpecificationID ? "*"
Open F3702
szSpecificationRevisionLev=QSQREV
szCostCenter=QSMCU
IfFetch is success
szDescriptionLine1'efQSDSC1
jdEffectiveFromDate'efQSEFFF
jdEffectiveThruDate'efQSEFFT
szSpecificationCode1'efQSQSC1
szSpecificationCode2'efQSQSC2
szSpecificationCode3'efQSQSC3
szSpecificationCode4'efQSQSC4
szSpecificationCode5'efQSQSC5
VA evt_cFetchFlag= "1"
End If
IfVA evt_cFetchFlag = "0"andszSpecificationRevisionLev = " ,*"
andSzCostCenter ? "*"
Select F3702 with:szSpecificationID=QSQSPC
szCostCenter=QSMCU
FetchNext F3702:szDescriptionLine1'efQSDSC1
End If
End If
IfVA evt_cFetchFlag = "0"andszCostCenter = " ,*"
andszSpecificationRevisionLev ? "*"
Select F3702 with:szSpecificationID=QSQSPC
szSpecificationRevisionLev=QSQREV
FetchNext F3702:szDescriptionLine1'efQSDSC1
End If
End If
IfVA evt_cFetchFlag = "0"andszCostCenter= " ,*"
andszSpecificationRevisionLev= " ,*"
Select F3702 with:szSpecificationID=QSQSPC
FetchNext F3702:szDescriptionLine1'efQSDSC1
IfFetch is success
VA evt_cFetchFlag = "2"
End If
End If
Close F3702
szErrorMessageID="038S"
"038S"'f0Error Value
szSpecificationID'f0Parameter
End If
End If
D3700090 - F3702 Verify and Get Specification Definition
Parameter Name | Data Item | Data Type | Req/Opt | I/O/Both |
---|---|---|---|---|
szSpecificationID | QSPC | char | OPT | NONE |
The unique identification for a set of tests which need to be performed together. For example:
F-156 - FDA Specification 156
SP34 -
| ||||
szSpecificationRevisionLev | QREV | char | OPT | NONE |
An alphanumeric character that represents the number of times a specification has changed. To avoid overlapping revisions, the system
| ||||
szCostCenter | MCU | char | OPT | NONE |
An alphanumeric code that identifies a separate entity within a business for which you want to track costs. For example, a business unit
| ||||
szDescriptionLine1 | DSC1 | char | OPT | NONE |
Brief information about an item; a remark or an explanation. | ||||
jdEffectiveFromDate | EFFF | JDEDATE | OPT | NONE |
A date that indicates one of the following:
o When a component part goes into effect on a bill of material
o When a routing step goes into
| ||||
jdEffectiveThruDate | EFFT | JDEDATE | OPT | NONE |
A date that indicates one of the following:
o When a component part is no longer in effect on a bill of material
o When a routing step is no
| ||||
szSpecificationCode1 | QSC1 | char | OPT | NONE |
One of five reporting codes that can be assigned to each specification defined. Use these codes to categorize specifications into different
| ||||
szSpecificationCode2 | QSC2 | char | OPT | NONE |
One of five reporting codes that can be assigned to each specification defined. Use these codes to categorize specifications into different
| ||||
szSpecificationCode3 | QSC3 | char | OPT | NONE |
One of five reporting codes that can be assigned to each specification defined. Use these codes to categorize specifications into different
| ||||
szSpecificationCode4 | QSC4 | char | OPT | NONE |
One of five reporting codes that can be assigned to each specification defined. Use these codes to categorize specifications into different
| ||||
szSpecificationCode5 | QSC5 | char | OPT | NONE |
One of five reporting codes that can be assigned to each specification defined. Use these codes to categorize specifications into different
| ||||
cErrorCode | ERR | char | OPT | NONE |
The Data Field Error Code field is simply a generic data field to pass an error condition flag. This field is one of the fields that make up the
| ||||
cSuppressErrorMessageFlag | EV01 | char | OPT | NONE |
An option that specifies the type of processing for an event. | ||||
szErrorMessageID | DTA1 | char | OPT | NONE |
A 256 byte field used to hold miscellaneous data. | ||||
cStatus9 | STAW | char | OPT | NONE |
A user-defined code (00/WS) that indicates the approval status. | ||||
mnUniqueKeyIDInternal | UKID | MATH_NUMERIC | OPT | NONE |
This field is a unique number used to identify a record in a file. | ||||
cActionCode2 | ACTN | char | OPT | NONE |
A code that specifies the action that is performed. Valid values are: A Add C Change | ||||
mnQualityTableSequenceNumber | QTSN | MATH_NUMERIC | OPT | NONE |
A control number that uniquely identifies master table records in the Quality Management system. The system automatically generates this
|
None |
None |