MDRPCOR ; HOIFO/DP - Object RPCs (TMDRecordId) ; [01-10-2003 09:14]
Source file <MDRPCOR.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 7 | (,DD)^%DT (FIND,LIST)^DIC ($$GET1,FILE)^DID (FILE,HELP,UPDATE,VAL)^DIE CLEAN^DILF ($$EXTERNAL,$$ROOT,$$VFILE)^DILFD $$GET1^DIQ |
| Clinical Procedures | 2 | COL^MDDEVCL ($$DUPS,BADRPC,ERROR,LOCK,UNLOCK)^MDRPCU |
| Kernel | 1 | $$UP^XLFSTR |
| Registration | 1 | ($$DOB,$$SSN)^DPTLK1 |
| Text Integration Utility | 1 | LNGCP^TIUCP |
| Toolkit | 1 | $$GET^XPAR |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHANGES | ; [Procedure] Returns number of changes to save
|
|
| CHKVER | ; [Procedure]
|
|
| CLEARFDA | ; [Procedure] Discards changes in the FDA
|
|
| DELREC | ; [Procedure] Delete a fileman record
|
|
| DT | ; [Procedure] Convert date/time via %DT
|
|
| EXISTS | ; [Procedure] Verify that a record exists
|
|
| FILENAME | ; [Procedure] Return a filename
|
|
| GETCODES | ; [Procedure] Returns set of codes
|
|
| GETDATA | ; [Procedure] Returns data for a field
|
|
| GETHELP | ; [Procedure] Returns fileman help
|
|
| GETIDS | ; [Procedure] Returns list of required ID's
|
|
| GETLABEL | ; [Procedure] Get field label/title
|
|
| GETLST | ; [Procedure] Get list of records
|
|
| LOCK | ; [Procedure] Lock a record
|
|
| LOOKUP | ; [Procedure] Lookup on a DD
|
|
| NEWIEN | ; [Procedure] Return next available IEN
|
|
| NEWREC | ; [Procedure] Create a new record
|
|
| PTLKUP | ; [Procedure] Patient lookup handled separately for security
|
|
| PTRLKUP | ; [Procedure] Lookup a pointer field
|
|
| RENAME | ; [Procedure] Rename a record
|
|
| RPC(RESULTS,OPTION,DD,IENS,FLD,DATA) | ; [Procedure] RPC call tag
|
|
| SAVEFDA | ; [Procedure] Save changes to the VistA database
|
|
| SETFDA | ; [Procedure] Validate data and store in FDA
|
|
| UNLOCK | ; [Procedure] Unlock a record
|
|
| VALIDATE | ; [Procedure] Validate data for a field
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | DT+3 |
| DD^%DT | DT+5 |
| FIND^DIC | LOOKUP+2, PTLKUP+1, PTRLKUP+10 |
| LIST^DIC | GETLST+3 |
| $$GET1^DID | FILENAME+1, GETCODES+1, GETCODES+4, GETCODES+9, GETDATA+1, GETDATA+5, GETIDS+5, GETLABEL+1, GETLABEL+2, GETLST+8 , PTRLKUP+1, VALIDATE+6 |
| FILE^DID | GETIDS+1 |
| FILE^DIE | DELREC+3, RENAME+6, SAVEFDA+16 |
| HELP^DIE | GETHELP+1, GETHELP+2 |
| UPDATE^DIE | NEWREC+8, SAVEFDA+11 |
| VAL^DIE | DELREC+1, NEWREC+2, NEWREC+6, RENAME+4, SETFDA+1, VALIDATE+16 |
| CLEAN^DILF | RPC+5 |
| $$EXTERNAL^DILFD | GETDATA+9 |
| $$ROOT^DILFD | EXISTS+1, NEWIEN+1 |
| $$VFILE^DILFD | FILENAME+1 |
| $$GET1^DIQ | GETDATA+3, GETDATA+6, GETDATA+10, PTLKUP+7, PTLKUP+8 |
| $$DOB^DPTLK1 | PTLKUP+9 |
| $$SSN^DPTLK1 | PTLKUP+10 |
| COL^MDDEVCL | SAVEFDA+23 |
| $$DUPS^MDRPCU | RENAME+2, VALIDATE+3 |
| BADRPC^MDRPCU | RPC+4 |
| ERROR^MDRPCU | DELREC+2, DELREC+4, GETCODES+2, NEWREC+3, NEWREC+7, RENAME+5, SAVEFDA+13, SAVEFDA+18, SETFDA+2, VALIDATE+17 |
| LOCK^MDRPCU | LOCK+1 |
| UNLOCK^MDRPCU | UNLOCK+1 |
| LNGCP^TIUCP | PTRLKUP+4 |
| $$UP^XLFSTR | PTRLKUP+3 |
| $$GET^XPAR | SAVEFDA+23 |
| RPC Name | Call Tags |
|---|---|
| MD TMDRECORDID | RPC |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | FIND^DIC, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("DIHELP" | GETHELP+2, GETHELP+3, GETHELP+6 |
| ^TMP("DILIST" | GETLST+4, GETLST+5, GETLST+7, GETLST+8, LOOKUP+3, LOOKUP+4, PTLKUP+2, PTLKUP+4, PTLKUP+5, PTLKUP+6 , PTRLKUP+11, PTRLKUP+12 |
| ^TMP("MDFDA" | CHANGES+2, CHANGES+4, CHANGES+6, CLEARFDA+1, CLEARFDA+6!, GETDATA+2, GETDATA+7, RENAME+8!, SAVEFDA+2, SAVEFDA+7 , SAVEFDA+8!, SAVEFDA+14*, SAVEFDA+19*, SETFDA+1, VALIDATE+7, VALIDATE+16 |
| ^TMP("MDSAVE" | SAVEFDA+1!, SAVEFDA+7*, SAVEFDA+9, SAVEFDA+11, SAVEFDA+14, SAVEFDA+16, SAVEFDA+19, SAVEFDA+20!, VALIDATE+14 |
| ^TMP($J | DELREC+2, DELREC+4, GETCODES+2, GETDATA+2*, GETDATA+3, GETHELP+6*, LOOKUP+5, NEWREC+3, NEWREC+7, PTLKUP+11 , RENAME+5, RPC+2, SAVEFDA+13, SAVEFDA+18, SETFDA+2, VALIDATE+17 |
| Name | Field # of Occurrence |
|---|---|
| ^( | GETDATA+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| $T(@OPTION | RPC+3 |