©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
SCAPMC20 ;ALB/REW - Team APIs:APPTTM ; 20 Mar 1996
Source file <SCAPMC20.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 2 | (ERR,INIT)^SCAPMCU1 $$GETPCTM^SCAPMCU2 |
| VA Fileman | 1 | (FILE,UPDATE)^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACOUTPT(DFN,SCFIELDA,SCERR) | ;add/edit a record in OUTPATIENT PROFILE #404.41
; input: ; DFN = pointer to PATIENT file (#2) ; SCFIELDA= array of additional fields to be added ; SCERR = array NAME to store error messages. ; [ex. ^TMP("ORXX",$J)] |
|
| APTTMQ | ||
| MAKEMANY(DFNA,SCOLDASS,SCBADASS,SCNEWASS) | ;Not supported for use by PCMM Only
; DFNA - DFN ARRAY ; SCOLDASS - Subset of DFNA that were previously assigned ; SCBADASS - Subset of DFNA that could not be assigned ; SCNEWASS - Subset of DFNA that were newly assigned ; Return: total^new^old^bad ; Note: No input error checking!! |
|
| PTPCNOTM(SCOUTA,SCDATE) | ;Not Supported For Use by PCMM Only
; SCOUTA - Output array of DFNs that are PC but no Team Now |
|
| OKDATA() | ;setup/check variables
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | OKDATA+4, PTPCNOTM+6 |
| ^SCPT(404.41 - [#404.41] | ACOUTPT+17, PTPCNOTM+4 |
| ^TMP("SCMC" | PTPCNOTM+5 |
| Name | Line Occurrences |
|---|---|
| $$ACOUTPT | MAKEMANY+12 |
| $$OKDATA | ACOUTPT+16 |
| APTTMQ | ACOUTPT+16 |
| Name | Field # of Occurrence |
|---|---|
| ^( | PTPCNOTM+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | ACOUTPT~, ACOUTPT+17, ACOUTPT+22, ACOUTPT+25, ACOUTPT+26, ACOUTPT+32, APTTMQ, OKDATA+4, OKDATA+5, MAKEMANY+7~ , MAKEMANY+9*, MAKEMANY+10*, MAKEMANY+12, MAKEMANY+14, MAKEMANY+18, MAKEMANY+21, PTPCNOTM+2~, PTPCNOTM+3*, PTPCNOTM+4*, PTPCNOTM+5 , PTPCNOTM+6 |
| DFNA | MAKEMANY~, MAKEMANY+10 |
| SC | ACOUTPT+15~ |
| SC( | ACOUTPT+22*, ACOUTPT+26*, ACOUTPT+30* |
| SCBADASS | MAKEMANY~, MAKEMANY+14 |
| SCBADCNT | MAKEMANY+7~, MAKEMANY+8*, MAKEMANY+15*, MAKEMANY+23 |
| SCBADOUT | MAKEMANY+7~ |
| SCDATE | PTPCNOTM~, PTPCNOTM+6 |
| SCERR | ACOUTPT~, ACOUTPT+23, ACOUTPT+31, ACOUTPT+32, APTTMQ, OKDATA+6 |
| SCESEQ | ACOUTPT+15~, OKDATA+6 |
| SCEXIST | ACOUTPT+14~, ACOUTPT+17*, ACOUTPT+18, ACOUTPT+34*, APTTMQ |
| SCFIELDA | ACOUTPT~, ACOUTPT+19, ACOUTPT+21, ACOUTPT+22, ACOUTPT+27, ACOUTPT+29, ACOUTPT+30 |
| SCFLD | ACOUTPT+15~, ACOUTPT+20*, ACOUTPT+21*, ACOUTPT+22, ACOUTPT+28*, ACOUTPT+29*, ACOUTPT+30 |
| SCIEN | ACOUTPT+15~, ACOUTPT+32! |
| SCIEN(1 | ACOUTPT+25*, ACOUTPT+32 |
| SCNEWASS | MAKEMANY~, MAKEMANY+18 |
| SCNEWCND | MAKEMANY+7~ |
| >> SCNEWCNT | MAKEMANY+8*, MAKEMANY+19*, MAKEMANY+23 |
| SCOK | OKDATA+1~, OKDATA+2*, OKDATA+3, OKDATA+4*, OKDATA+7 |
| SCOLDASS | MAKEMANY~, MAKEMANY+21 |
| SCOLDCNT | MAKEMANY+7~, MAKEMANY+8*, MAKEMANY+22*, MAKEMANY+23 |
| SCOUTA | PTPCNOTM~, PTPCNOTM+6 |
| SCOUTFLD | MAKEMANY+7~ |
| SCOUTFLD( | MAKEMANY+11* |
| SCPARM | ACOUTPT+15~, OKDATA+6 |
| SCPARM("PATIENT" | OKDATA+5* |
| SCPC | PTPCNOTM+2~, PTPCNOTM+4* |
| SCX | MAKEMANY+7~, MAKEMANY+12*, MAKEMANY+13, MAKEMANY+17 |
| U | APTTMQ, MAKEMANY+17, MAKEMANY+23, PTPCNOTM+6 |