73. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 4/12/2018 10:18:30 AM Central Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

73.1 Files compared

#	Location	File	Last Modified
1	MSSRe Build 4.zip\Applications\OncoTrax-E40	ONC_Request.cpp	Tue Apr 10 19:43:38 2018 UTC
2	MSSRe Build 4.zip\Applications\OncoTrax-E40	ONC_Request.cpp	Wed Apr 11 17:41:56 2018 UTC

73.2 Comparison summary

Description	Between Files 1 and 2
Description	Text Blocks	Lines
Unchanged	2	344
Changed	1	2
Inserted	0	0
Removed	0	0

73.3 Comparison options

Whitespace
Character case	Differences in character case are significant
Line endings	Differences in line endings (`CR` and `LF` characters) are ignored
CR/LF characters	Not shown in the comparison detail

73.4 Active regular expressions

No regular expressions were active.

73.5 Comparison detail

	1	/******* ****** ****** ****** ****** ****** ****** ******** /
	2	/* Packag e: ON C – Oncolo gy * /
	3	/* Date C reated: Ju l 26,2004 * /
	4	/* Site N ame: Hi nes OIFO * /
	5	/* Developers : Sergey Gav rilov PII ) */
	6	/* Descri ption: Im plementati on of the base reque st process ing class for * /
	7	/* On cology Web -service * /
	8	/******* ****** ****** ****** ****** ****** ****** ******** /
	9
	10	#include " stdafx.h"
	11	#include " OncologyCG I.h"
	12	#include " ONC_Reques ts.h"
	13
	14	/******* ****** ****** ****** ****** ****** ****** ******** /
	15	/* 'GET VERSI ON' REQUES T * /
	16	/******* ****** ****** ****** ****** ****** ****** ******** /
	17
	18	void TONCR eqGetVersi on::execut e()
	19	{
	20	St rTag("CS-A PIVER", CS tage_get_v ersion());
	21	St rTag("ED-M ETAVER", E DITSVersio n.c_str()) ;
	22	St rTag("VERS ION", ONCV ERSION);
	23	}
	24
	25	bool TONCR eqGetVersi on::parseT agStart(TO NCParser* Parser, co nst TONCTa gCode TagC ode, const XML_Char **atts)
	26	{
	27	bo ol prc = T ONCRequest ::parseTag Start(Pars er, TagCod e, atts);
	28
	29	// --- Get th e version of the def ault EDITS metafile
	30	if ( TagCode == getCode () )
	31	{
	32	TONC ReqED* req = new TON CReqED(Tag Code);
	33	try
	34	{
	35	req->p arseTagSta rt(Parser, TagCode, atts);
	36	EDITSV ersion = r eq->getMet afileVersi on();
	37	delete req;
	38	}
	39	catc h(...)
	40	{
	41	delete req;
	42	throw;
	43	}
	44	retu rn true;
	45	}
	46
	47	re turn prc;
	48	}
	49
	50	/******* ****** ****** ****** ****** ****** ****** ******** /
	51	/* GENERIC REQUEST */
	52	/******* ****** ****** ****** ****** ****** ****** ******** /
	53
	54	TONCReques t::TONCReq uest(const TONCTagCo de aCode)
	55	{
	56	Co de = aCode ;
	57	Fa ult = NULL ;
	58	Ve rsion = 0;
	59	}
	60
	61	//***** DE STRUCTOR
	62
	63	TONCReques t::~TONCRe quest()
	64	{
	65	de lete Fault ;
	66	}
	67
	68	//***** CR EATES THE REQUEST OB JECT CORRE SPONDING T O THE REQU EST TAG CO DE
	69
	70	TONCReques t* TONCReq uest::crea teRequest( TONCParser Parser, const TONC TagCode Ta gCode, con st XML_Cha r *atts)
	71	{
	72	sw itch(TagCo de)
	73	{
	74	ca se CS_CALC ULATE:
	75	retu rn new TON CReqCSCalc ulate(TagC ode);
	76	ca se CS_GET_ SCHEMA:
	77	retu rn new TON CReqCSGetS chema(TagC ode);
	78	ca se CS_GET_ TABLES:
	79	retu rn new TON CReqCSGetT ables(TagC ode);
	80	ca se ED_RUN_ BATCH:
	81	retu rn new TON CReqEDRunB atch(TagCo de);
	82	ca se ED_GET_ EDITINFO:
	83	retu rn new TON CReqEDGetE ditInfo(Ta gCode);
	84	ca se GET_VER SION:
	85	retu rn new TON CReqGetVer sion(TagCo de);
	86	de fault:
	87	brea k;
	88	};
	89	re turn NULL;
	90	}
	91
	92	//***** PR OCESSES TH E REQUEST
	93
	94	void TONCR equest::ex ecute()
	95	{
	96	th row TONCFa ult(EC_INV ALID_REQUE ST);
	97	}
	98
	99	//***** EN CLOSES THE RESPONSE IN THE COR RESPONDING TAGS
	100
	101	void TONCR equest::ex ecuteReque st()
	102	{
	103	re sponseTag( 1);
	104	tr y
	105	{
	106	exec ute();
	107	}
	108	ca tch(...)
	109	{
	110	resp onseTag(0) ;
	111	thro w;
	112	}
	113	re sponseTag( 0);
	114	}
	115
	116	//***** RE TURNS THE VALUE OF T HE 'VER' A TTRIBUTE
	117
	118	double TON CRequest:: getVersion Attr(const XML_Char **atts)
	119	{
	120	do uble ver = 0.0;
	121	fo r( int i=0 ; atts[i]; i+=2 )
	122	if( !_stricmp( atts[i], " ver") )
	123	{
	124	ver = atof(atts[ i+1]);
	125	break;
	126	}
	127	re turn ver;
	128	}
	129
	130	//***** PR OCESSES TH E CLOSING TAG
	131
	132	bool TONCR equest::pa rseTagEnd( TONCParser * Parser, const TONC TagCode Ta gCode)
	133	{
	134	re turn (TagC ode == get Code());
	135	}
	136
	137	//***** PR OCESSES TH E OPENING TAG
	138
	139	bool TONCR equest::pa rseTagStar t(TONCPars er* Parser , const TO NCTagCode TagCode, c onst XML_C har **atts )
	140	{
	141	if ( TagCode == getCode () )
	142	{
	143	Vers ion = getV ersionAttr (atts);
	144	retu rn true;
	145	}
	146	re turn false ;
	147	}
	148
	149	//***** AD DS THE ERR OR INFO TO THE RESPO NSE
	150
	151	void TONCR equest::pr ocessError s()
	152	{
	153	if ( Fault != NULL )
	154	Faul t->output( );
	155	}
	156
	157	//***** RE NDERS THE ROOT TAG O F THE RESP ONSE
	158
	159	void TONCR equest::re sponseTag( bool open_ tag)
	160	{
	161	if ( open_tag )
	162	prin tf("<RESPO NSE xmlns= \"%s\">\n" , getNames pace());
	163	el se
	164	puts ("</RESPON SE>");
	165	}
	166
	167	//***** ST ORES THE P OINTER TO THE ERROR DSCRIPTOR IN THE COR RESPONDING PROPERTY
	168
	169	void TONCR equest::se tFault(TON CFault* aF ault)
	170	{
	171	de lete Fault ;
	172	Fa ult = aFau lt;
	173	}