Summary Table
Categories |
Total Count |
PII |
0 |
URL |
0 |
DNS |
0 |
EKL |
0 |
IP |
0 |
PORT |
0 |
VsID |
0 |
CF |
0 |
AI |
0 |
VPD |
0 |
PL |
0 |
Other |
0 |
File Content
<?xml version="1.0" encoding="UTF-8"?>
<Export generator="Cache" version="25">
<Routine name="EDIGW" type="INC"><![CDATA[
#; IK304 values
#define UnrecognizedSegmentID 1
#define SEGhasDataElemErr 8
#; IK403 values
#define RequiredDataElemMissing 1
#define DataElemTooShort 4
#define DataElemTooLong 5
#define InvalidCodeValue 7
#; Rules
#define NM102isPerson 1
#; rubber stamp
#define RubberStamp999 1
#; SQL Global
#define sqlGl ^EDIGWsql
#; Hang times
#define sqlHang 1
#define sqlHangMAX 60
#define retryHang 2
#; Debug
#define DEBUG(%who,%msg) Do ##class(EDIGW.Utility).DEBUG(%who,%msg)
#define DebugBPL $Get(^EDIGWdebug("BPL"),0)
#define DebugFileProcess $Get(^EDIGWdebug("FileProcess"),0)
#define DebugFileService $Get(^EDIGWdebug("FileService"),0)
#define DebugOperationSQL $Get(^EDIGWdebug("OperationSQL"),0)
#define DebugRules $Get(^EDIGWdebug("Rules"),0)
#define DebugUtility $Get(^EDIGWdebug("Utility"),0)
]]></Routine>
</Export>