User bio
404 bio not found
Member since Dec 21, 2016
Posts:
Replies:
The class definition is large, but here you go:
Class Reference
Cache for UNIX 2018.1.2 |
Private Storage |
Patient Responsibility table
DEFAULTCONCURRENCY is the default value for the concurrency formal argument defined for %Open, %OpenId, %Delete and %DeleteId methods. It is not the default value of the %Concurrency property of persistent classes. If the value of the actual concurrency argument passed to any of the above methods is -1 then the formal argument value will be set to the value of the DEFAULTCONCURRENCY parameter value defined for the class.
NAMESPACE specifies the XML namespace to be used when projecting the class to XML. if NAMESPACE - "", the default namespace is used for the XML schema is used as the namespace for his class.
The XMLFORMAT parameter controls the generation of the XMLExport and XMLImport methods for XML enabled classes to include code for only literal or only encoded format. This allows the generated routines to be significantly smaller since usually both formats are not needed.
If XMLFORMAT="Literal", then only support for literal format import and export is generated.
If XMLFORMAT="Encoded", then only support for SOAP encoded format import and export is generated.
The default is to generate support for both literal and encoded format.
XMLIGNORENULL allows the programmer to override the default XML handling of empty strings for properties of type %String. By default (XMLIGNORENULL = 0), empty strings in the XML input are stored as $c(0) and $c(0) is written to XML as an empty tag. A missing tag in the XML input is always stored as "" and "" is always output to XML as no tag.
If XMLIGNORENULL is set = 1, then both missing tags in the XML and empty strings are input as "", and both "" and $c(0) are output as empty tags (i.e. <tag></tag>).
If XMLIGNORENULL is set = "inputonly", then both missing tags in the XML and empty strings are input as "". Output of "" and $c(0) are for XMLIGNORENULL = 0: $c(0) is output as an empty tag (i.e. <tag></tag>) and "" is output as no tag.
If XMLIGNORENULL = "runtime" (runtime is not case sensitive), then the behavior of XMLIGNORENULL is determined by the format parameter of XMLExport, XMLImport and %XML.Reader.OpenFile. The default behavior for XMLIGNORENULL="runtime is the same as XMLIGNORENULL=0. Adding "ignorenull" to the format argument changes the behavior to that of XMLIGNORENULL=1. "ignorenull" shoud be separated by a comma from literal/encoded part of the format. Example values for format are "", ",ignorenull", "literal,ignorenull" and "encoded,ignorenull". Note that "inputonly" is equivalent to using ,ignorenull for XMLExport and not for %XML.Reader.
This is the internal pointer to the Hospital Visit = VGRP_VID_VIN_GRP_ARCHIVED_ID.
Displays 'A'if there is an active approved FA application on file for the patient Displays 'Y' is there is a current FA application on file for the patient Displays 'N' if there is no current FA application on file for the patient 'Current' is defined as: the FA application/approval from-thru dates fall within the date of service of the appt/visit or today's date if only the patient registration is in context.
For HPA groups, displays Y/N indicating whether the patient's account has an active budget plan
Case number this instance is linked to
Enrollment contract linked to this instance
Reason why we did not collect the full amount from the patient
Current self pay balance of all statement producing FSCs
The date this insurance became effective
Date that an eligibility response was last received for this patient and insurance.
Eligibility request number made for this instance. This is used for the Pt Resp List action to view the EB segment for an elig response.
Security plus user that last marked an eligibility response as reviewed
Status from the last eligibility check that occurred for this patient and insurance
Displays Y if there is a current estimate on file for the patient. Displays N if there is no PLE estimates in file for the patient.
The date this insurance expired
FSC for Patient Responsibility data
BAR/HPA group in which the account summary came from for this instance
Patient ID - a unique row identifier for the Patient Responsibility record
Insurance Company DE from Dict 120
Flag which signifies that instance was deleted. The way to delete the instance is to wipe out the fields in the instance. For those instances that were deleted, the selector will display "Deleted" next to the instance type.
Type of instance: New, Verification, Payment, or Both
Balance of the last statement produced
Statement produced date
This field contains a reference to the patient object
a reference to the rowinfo data
Sched appointment number
Account status at the time of stmt production
Total amount that could be collected from patient
Total amount patient could be responsible for
Total verified amount that patient is responsible for
VM Visit Admission Number
Checks to see if the object identified by the ID id exists in the extent.Returns
%Boolean TRUE is it exists, FALSE if it does not.
[Previously private]
Does the value exist in a CaseNum index
Does the value exist in a Cin index
Does the value exist in a ColReason index
Deactivate Patient Responsibility records (Header, Detail, and Notes) for a given Patient ID, Fsc, Case/Appt/Visit.
Deactivate all Patient Responsibility records (Header, Detail, and Notes) for a given Patient ID.
Deactivate a Patient Responsibility record for a given Patient Responsibility Id. After executing this code, we call trigger DeactReact to deactivate the Detail and Notes records.
Delete Patient Responsibility records (Header, Detail, and Notes) for a given Patient ID, Fsc, Case/Appt/Visit.
Delete all Patient Responsibility records (header, detail, and Notes) for a given Patient ID.
Delete a Patient Responsibility record for a given Patient Responsibility Id. After executing this code, we call trigger Delete to deactivate the Detail and Notes records.
Does the value exist in a EffDate index
Does the value exist in a EligLastReceived index
Does the value exist in a EligReqNum index
Does the value exist in a EligReviewedBy index
Does the value exist in a EligStat index
Does the value exist in a ExpDate index
Does the value exist in a Fsc index
Return the value of the entry to be displayed when only supplied an Id
Return all valid Patient Responsibility records for a given ID/FSC/Case/SchedAppt/VisNum in a List format.
Return all valid Patient Responsibility records for a given Case/Visit/Appt in a List format. Do not search on Patient Id or Fsc.
Return all valid Patient Responsibility records for a given Patient ID/FSC/Case/SchedAppt/VisNum in a List format.
Return all valid Patient Responsibility records for a given Patient ID in a List format.
Does the value exist in a Grp index
Does the value exist in a InsComp index
Does the value exist in a InstanceDelFlag index
Does the value exist in a LastStmtProducedDate index
Reactivate Patient Responsibility records (Header, Detail, and Notes) for a given Patient ID, Fsc, Case/Appt/Visit.
Reactivate all Patient Responsibility records (Header, Detail, and Notes) for a given Patient ID.
Reactivate a Patient Responsibility record for a given Patient Responsibility Id. After executing this code, we call trigger DeactReact to reactivate the Detail and Notes records.
Does the value exist in a StmtAccountStat index
Selects Lvl As%String , Identifier As%String , Dt As%Date , Tm As%Time , Ini As%String , Property As%String , OldVal As%String , NewVal As%String , Id As%String
SQL Query :
SELECT
'Header' As Lvl,
'' As Identifier,
P.PatRespAudit->Event_Dt As Dt,
P.PatRespAudit->Event_Tm as Tm,
P.PatRespAudit->Event_Ini as Ini,
DBMS.AuditTxn_Caption('Registration.PatResp',Data_Property) as Property,
DBMS.AuditTxn_ClassLogicalToDisplay('Registration.PatResp',Data_Property,
Data_OldVal) as OldVal,
DBMS.AuditTxn_ClassLogicalToDisplay('Registration.PatResp',Data_Property,
Data_NewVal) as NewVal,
P.%ID
FROM
Registration.PatRespAuditTxn P
WHERE
P.PatRespAudit->PatResp = :Entry
UNION
SELECT
'Detail' As Lvl,
C.PatRespDetAudit->PatRespDet->PatResponsibilityType->Name As Identifier,
C.PatRespDetAudit->Event_Dt As Dt,
C.PatRespDetAudit->Event_Tm as Tm,
C.PatRespDetAudit->Event_Ini as Ini,
DBMS.AuditTxn_Caption('Registration.PatRespDet',Data_Property) as
Property,
DBMS.AuditTxn_ClassLogicalToDisplay('Registration.PatRespDet',
Data_Property,Data_OldVal) as OldVal,
DBMS.AuditTxn_ClassLogicalToDisplay('Registration.PatRespDet',
Data_Property,Data_NewVal) as NewVal,
C.%ID
FROM
Registration.PatRespDetAuditTxn C
WHERE
C.PatRespDetAudit->PatRespDet->PatResp = :Entry
ORDER BY
Dt Desc,
Tm Desc,
Lvl Desc
CALL Registration.PatResp_CombinedAuditTrail(Entry)
• index (ZSchedApptNum on SchedApptNum) [Type = bitmap];
Copyright © 1997-2020, InterSystems Corporation
I have a whole slew of indices on that table.
And the strange thing is that it's not choosing the index I want, but it's walking through the whole table.
|
Certifications & Credly badges:
Jonathan has no Certifications & Credly badges yet.
Global Masters badges:
Jonathan has no Global Masters badges yet.
Followers:
Jonathan has no followers yet.
Following:
Jonathan has not followed anybody yet.
I came to the root of the issue - the system wasn't properly indexing this table. The rebuild-index command (we have the core cache methods wrapped in an application) were crashing and not properly creating the index.
Thanks to everyone for your help/advice!