public string ddiol(string file, string fld, string attribute)
{
string arg = "$P(D EN^DDIOL($$GET1^DID(\"9000010.23\",\".02\",\"\",\"LABEL\")),U,1)";
string rtn = VistaUtils.getVariableValue(cxn, arg);
return(rtn);
}
internal bool hasMoreProstheticClaimData(string claimId)
{
string arg = "$D(^RMPR(660," + claimId + ",0))";
string response = VistaUtils.getVariableValue(cxn, arg);
return(response == "1");
}
public string getFieldAttribute(string file, string fld, string attribute)
{
string arg = "$P($$GET1^DID(\"" + file + "\",\"" + fld + "\",\"\",\"" + attribute + "\"),U,1)";
string rtn = VistaUtils.getVariableValue(cxn, arg);
return(rtn);
}
public FileHeader getFileHeader(string globalName)
{
string arg = "$G(" + globalName + "0))";
string response = VistaUtils.getVariableValue(cxn, arg);
return(toFileHeader(response));
}
public string getRpcName(string rpcIEN)
{
string arg = "$P($G(^XWB(8994," + rpcIEN + ",0)),U,1)";
string response = VistaUtils.getVariableValue(cxn, arg);
return(response);
}
public RemoteApplicationRecord getRecord(AbstractConnection cxn, KeyValuePair <string, string> param)
{
string ien = "";
string arg = "";
if (param.Key == "IEN")
{
ien = param.Value;
}
else if (param.Key == "NAME")
{
arg = "$O(^XWB(8994.5,\"B\",\"" + param.Value + "\",0))";
ien = VistaUtils.getVariableValue(cxn, arg);
}
else if (param.Key == "APPLICATIONCODE")
{
arg = "$O(^XWB(8994.5,\"ACODE\",\"" + param.Value + "\",0))";
ien = VistaUtils.getVariableValue(cxn, arg);
}
else
{
throw new ArgumentException("Invalid field name");
}
if (ien == "")
{
return(null);
}
arg = "$G(^XWB(8994.5," + ien + ",0))";
string response = VistaUtils.getVariableValue(cxn, arg);
return(toRecord(cxn, ien, response));
}
internal void addMoreProstheticClaimData(ProstheticClaim claim)
{
if (!hasMoreProstheticClaimData(claim.ItemId))
{
return;
}
string arg = "$P($G(^RMPR(660," + claim.ItemId + ",1)),U,4)" + "_U_" +
"$P($G(^RMPR(660," + claim.ItemId + ",0)),U,16)" + "_U_" +
"$P($G(^RMPR(660," + claim.ItemId + ",10)),U,9)";
string response = VistaUtils.getVariableValue(cxn, arg);
string[] flds = response.Split(new char[] { '^' });
claim.Cost = flds[1];
claim.ConsultId = flds[2];
arg = "$P($G(^RMPR(661.1," + flds[0] + ",0)),U,2)";
response = VistaUtils.getVariableValue(cxn, arg);
claim.ItemName = response;
}
public string getVariableValue(string arg)
{
return(VistaUtils.getVariableValue(cxn, arg));
}
internal string getXtmpToken(string token)
{
string arg = "$G(^XTMP(\"" + token + "\",1))";
return(VistaUtils.getVariableValue(Cxn, arg));
}
