Global: ^ORAM(103

FileMan FileNo	FileMan Filename	Package
103	ORAM FLOWSHEET	Order Entry Results Reporting

Package	Total	Routines
Order Entry Results Reporting	5	ORAM1 ORAM2 ORAMTTR ORAMX ORP351

Package	Total	FileMan Files
Order Entry Results Reporting	1	OE/RR LIST(#100.21)[102]
Registration	1	PATIENT(#2)[.01]
Scheduling	1	HOSPITAL LOCATION(#44)[101]

Fields, Total: 31

Field #	Name	Loc	Type	Details
.01	PATIENT	0;1	POINTER TO PATIENT FILE (#2)	PATIENT(#2) INPUT TRANSFORM: `S DINUM=X` LAST EDITED: `MAY 22, 2003` DESCRIPTION: `Patient DFN from file 2` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `103^B` `1)= S ^ORAM(103,"B",$E(X,1,30),DA)=""` `2)= K ^ORAM(103,"B",$E(X,1,30),DA)`
1	GOAL INR	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAY 20, 2003` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: `Stores the INR GOAL RANGE set by the user in the ANTICOAGULATOR. Contains a free text range, like: 2.0-3.0`
2	INDICATION	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>50!($L(X)<1) X` LAST EDITED: `JUL 28, 2004` HELP-PROMPT: `Answer must be 1-50 characters in length.` DESCRIPTION: `Stores indication set in the Anticoagulator and ICD9 code for the indication. Example: A Flutter=427.32`
3	NEXT LAB	0;4	DATE	INPUT TRANSFORM: `S %DT="ETX" D ^%DT S X=Y K:X<1 X` LAST EDITED: `MAY 13, 2009` HELP-PROMPT: `(No range limit on date)` DESCRIPTION: `Fileman date of the next scheduled INR draw.` CROSS-REFERENCE: `103^L` `1)= S ^ORAM(103,"L",$E(X,1,30),DA)=""` `2)= K ^ORAM(103,"L",$E(X,1,30),DA)` `3)= DO NOT DELETE ` `This REGULAR FileMan cross-reference on NEXT LAB will optimize both look-up and sorting by next lab date...`
4	START DATE	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 08, 2004` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: `Date patient was started in Anticoagulation clinic; in free text format (request from the field); contains whatever the operator entered. example: 09/26/08 example: unknown`
5	STOP DATE	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `AUG 14, 2003` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: `Date patient was stopped OR expected to be stopped from needing followup in Anticoagulation clinic; in free text format (request from the field); contains whatever the operator entered. example: 09/26/08 example:` `indefinite`
6	DURATION	0;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>40!($L(X)<1) X` LAST EDITED: `JUL 28, 2004` HELP-PROMPT: `Answer must be 1-40 characters in length.` DESCRIPTION: `Expected length of time patient will be followed in Anticoagulation clinic. Example: 6 months`
7	SPECIAL INSTRUCTIONS	1;0	WORD-PROCESSING #103.07	DESCRIPTION: `Word processing set of special instrections inputted into the Anticoagulator. Visible in the Anticoagulator and in the Header of the flow sheet on the REPORTS tab.` LAST EDITED: `NOV 13, 2003`
8	RISK FACTORS	2;0	WORD-PROCESSING #103.08	DESCRIPTION: `Word processing set of risk factors inputted into the Anticoagulator. Visible in the Anticoagulator and in the Header of the flow sheet on the REPORTS tab.` LAST EDITED: `MAY 20, 2003`
9	SIGNED AGREEMENT	0;8	SET	'Y' FOR yes; 'N' FOR no; LAST EDITED: `MAY 13, 2009` HELP-PROMPT: `Does the patient has a signed agreement for treatment?` DESCRIPTION: `Stores if patient has a signed agreement Y=yes; N or ""=No.`
10	ORIENTATION	0;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `MAY 13, 2009` HELP-PROMPT: `Answer must be 1-8 characters in length.` DESCRIPTION: `Free text entry for date of orientation classs.`
11	FS DATE	3;0	DATE Multiple #103.011	103.011
15	COMPLEXITY	0;10	SET	'0' FOR STANDARD PT; '1' FOR COMPLEX PT; '2' FOR INACTIVE PT; LAST EDITED: `AUG 15, 2003` DESCRIPTION: `INDICATES IF PATIENT IS CURRENTLY COMPLEX, STANDARD OR INACTIVE`
25	MSG-PHONE	0;11	SET	'0' FOR NOT ASKED; '1' FOR NO MSGS; '2' FOR OK MSG; LAST EDITED: `JUN 12, 2003` DESCRIPTION: `PT PRIVACY ISSUE; indicates if pt approved leaving of msg on phone answering machine.`
35	MSG WITH	4;0	WORD-PROCESSING #103.035	DESCRIPTION: `If patient allows leaving of anticoagulation messages with others at his/her phone number, this indicates WHO is allowed to receive the messages.` LAST EDITED: `JUN 12, 2003` DESCRIPTION: `NAMES OF PEOPLE WHO MAY ANSWER PT PHONE IN WHICH IT IS OK TO LEAVE ANTICOAGULATION INFORMATION WITH.`
45	AM MEDS	0;12	SET	'0' FOR PM MEDS; '1' FOR AM MEDS; '2' FOR UNKNOWN; LAST EDITED: `JUN 12, 2003`
55	SAVE STATUS	0;13	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `MAY 13, 2009` HELP-PROMPT: `Answer must be 1-8 characters in length.` DESCRIPTION: `Indicates if this entry is complete ("SAVE") or incomplete ("TEMPSAVE").`
60	FEE BASIS	0;14	SET	'0' FOR NO; '1' FOR PRIMARY; '2' FOR SECONDARY; LAST EDITED: `AUG 21, 2003` DESCRIPTION: `**Not in use for export version; here for legacy systems***` `RECORDS IF FEE BASIS IS AUTHORIZED AND IF PRIMARY OR SECONDARY STATUS`
65	FEE BASIS EXPIRATION	0;15	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 21, 2003` DESCRIPTION: `**Not in use for export version; here for legacy systems***` `DATE WHICH FEE BASIS QUALIFICATION EXPIRES AND NEEDS TO BE REASSESSED.`
70	FEE BASIS EVALUATED BY	0;16	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `AUG 21, 2003` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: `**Not in use for export version; here for legacy systems***` `PERSON WHO EVALUATED PATIENT FOR FEE BASIS`
75	OUTSIDE LAB	0;17	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `SEP 29, 2008` DESCRIPTION: `***Note in use for exported version*****************` `expiration date for outside lab agreement.`
80	Reminder Date	0;18	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 28, 2004` DESCRIPTION: `If reminder is set; this is the first date it will begin to appear when the Anticoagulator is accessed. It is only viewable in the Anticoagulator.`
85	REMINDER	5;0	WORD-PROCESSING #103.085	DESCRIPTION: `Free text item to remind person who is accessing the Anticoagulator on a specific patient that something needs to be done. Will only appear at or after the reminder date (field 80). example: "CBC due"` LAST EDITED: `JUL 26, 2004`
90	LOCK	0;19	SET	'0' FOR OPEN; '1' FOR LOCKED; LAST EDITED: `AUG 23, 2004` DESCRIPTION: `IF 1; CHART IS IN USE BY SOMEONE ELSE.`
91	NEXT DAY CALLBACK	0;20	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `OCT 02, 2009` DESCRIPTION: `This Boolean field indicates whether the Clinician should wait until the day after the next INR Draw to call the patient.`
95	RESTRICT LAB DRAWS	6;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>5!($L(X)<1) X` LAST EDITED: `APR 27, 2006` HELP-PROMPT: `Answer must be 1-5 characters in length.` DESCRIPTION: `Indicates days the patient does not want lab drawn. Represented by a string, example: 135 means Mon,Wed,Friday`
101	CLINIC	6;2	POINTER TO HOSPITAL LOCATION FILE (#44)	HOSPITAL LOCATION(#44) INPUT TRANSFORM: `S DIC("S")="I $$GOODLOC^ORAMSET(Y)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `MAR 23, 2009` HELP-PROMPT: `Enter the Clinic which is following the patient.` DESCRIPTION: `Clinic which is currently following the patient.` `Clinic determines many of the parameters which will determine the behavior of the Anticoagulation Management Application (e.g., Team List membership, Letterhead values, Visit locations for PCE, etc.). If clinic is` `missing, it will be assigned when the user files the first flowsheet entry.` SCREEN: `S DIC("S")="I $$GOODLOC^ORAMSET(Y)"` EXPLANATION: `Only active clinics may be selected.` CROSS-REFERENCE: `103^CL` `1)= S ^ORAM(103,"CL",$E(X,1,30),DA)=""` `2)= K ^ORAM(103,"CL",$E(X,1,30),DA)` `3)= DO NOT DELETE! ` `This REGULAR whole-file cross-reference by Clinic location allows look-up and sorting of patients who are being followed by any particular clinic.`
102	CMPLX	6;3	POINTER TO OE/RR LIST FILE (#100.21)	OE/RR LIST(#100.21) LAST EDITED: `SEP 20, 2008` DESCRIPTION: `THIS FIELD IS NOT IN USE AT THIS TIME.`
110	OUTSIDE HCT	6;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `SEP 20, 2008` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: `Outside HCT lab value, entered by the pharmacist through the GUI, is stored here in the following format: value \| DATE date is not in fileman format example: 21.6\|9/19/2008`
111	ELIGIBLE FOR LMWH BRIDGING	6;5	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `MAY 01, 2009` HELP-PROMPT: `Indicate whether patient is eligible for LMWH Bridging.` DESCRIPTION: `Please indicate whether the patient is eligible for perioperative Low Molecular Weight Heparin bridging.`
112	BRIDGING COMMENTS	7;0	WORD-PROCESSING #103.0112	LAST EDITED: `MAY 01, 2009` HELP-PROMPT: `Enter comments pertaining to LMWH Bridging.` DESCRIPTION: `Enter any relevant information pertaining to the LMWH Bridging to be used for this patient.`

Customize PDF page

Package: Order Entry Results Reporting

Global: ^ORAM(103

Information

Description

Accessed By FileMan Db Calls, Total: 5

Pointer To FileMan Files, Total: 3

Fields, Total: 31