©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
PSODI ;BHM/AGV - API FOR FILEMAN CALLS ;04/19/06 10:30 am
Source file <PSODI.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | ^DIC FIELD^DID $$GET1^DIQ EN^DIQ1 |
| Package | Total | Caller Graph |
|---|---|---|
| Clinical Reminders | 1 | PXRMSTA2 |
| Outpatient Pharmacy | 1 | PSOATRF |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FILE3 | ;ACCESS FILE LIST FOR GET1
|
|
| GET1(PSOFILE,PSOIEN,PSOFIELD,PSOFLAGS,PSOWORD) | ;RETRIEVE FIELD DATA
|
|
| FILE1 | ;ACCESS FILE LIST FOR DIQ AND DIC
|
|
| VALID2(PSTFILE,PSTFIELD) | ||
| DIQ(PSOFILE,DIC,DR,DA,DIQ) | ;PROCESS FIELDS
|
|
| DIC(PSOFILE,DIC,X) | ;
|
|
| STATUS(PSOFILE,PSOFIELD,LIST) | ;PROCESS FIELDS
|
|
| FILE2 | ;ACCESS FILE LIST FOR STATUS
|
|
| VALID1(PSTFILE,PSTDIC) | ;TEST FOR VALID DATA INPUT INTO PSOFILE AND DIC
|
|
| VALID3(PSTFILE) |
| Name | Line Occurrences |
|---|---|
| $$VALID1 | DIQ+6, DIC+6 |
| $$VALID2 | STATUS+7 |
| $$VALID3 | GET1+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | DIQ~ |
| DIC | DIQ~, DIQ+6, DIC~, DIC+6 |
| DIC(0 | DIC+8* |
| DIERR | GET1+7~, GET1+16 |
| DIHELP | GET1+7~ |
| DIMSG | GET1+7~ |
| DIQ | DIQ~ |
| DIROUT | GET1+7~ |
| DIRUT | GET1+7~ |
| DR | DIQ~ |
| DTOUT | GET1+7~ |
| DUOUT | GET1+7~ |
| LIST | STATUS~, STATUS+5, STATUS+9 |
| >> PSODIY | DIQ+4*, DIQ+5*, DIQ+7*, STATUS+6*, STATUS+8*, DIC+4*, DIC+5*, DIC+7*, DIC+8* |
| PSOFIELD | GET1~, GET1+10*, GET1+15, STATUS~, STATUS+5, STATUS+7, STATUS+9 |
| PSOFILE | DIQ~, DIQ+5, DIQ+6, GET1~, GET1+8, GET1+13, GET1+15, STATUS~, STATUS+5, STATUS+7 , STATUS+9, DIC~, DIC+5, DIC+6 |
| PSOFLAGS | GET1~, GET1+11*, GET1+15 |
| PSOIEN | GET1~, GET1+9*, GET1+15 |
| PSORET | GET1+7~, GET1+8*, GET1+14*, GET1+15*, GET1+16*, GET1+17 |
| PSOTEST | DIQ+6~*, DIQ+7, GET1+13~*, GET1+14, STATUS+7~*, STATUS+8, DIC+6~*, DIC+7 |
| PSOWORD | GET1~, GET1+12*, GET1+15 |
| PSTDIC | VALID1~, VALID1+4, VALID1+5, VALID1+6 |
| PSTFIELD | VALID2~, VALID2+4 |
| PSTFILE | VALID1~, VALID1+3, VALID2~, VALID2+3, VALID3~, VALID3+3 |
| PSVALID | VALID1+1~*, VALID1+2, VALID1+5*, VALID1+6*, VALID1+7, VALID2+1~*, VALID2+2, VALID2+4*, VALID2+5, VALID3+1~* , VALID3+2, VALID3+3*, VALID3+4 |
| PSVLOOP | VALID1+1~, VALID1+2*, VALID2+1~, VALID2+2*, VALID3+1~, VALID3+2* |
| PSVTEST | VALID1+1~, VALID1+2*, VALID1+3, VALID1+5, VALID1+6, VALID2+1~, VALID2+2*, VALID2+3, VALID2+4, VALID3+1~ , VALID3+2*, VALID3+3 |
| X | DIC~ |
| Name | Field # of Occurrence |
|---|---|
| $T(FILE1+PSVLOOP | VALID1+2 |
| $T(FILE2+PSVLOOP | VALID2+2 |
| $T(FILE3+PSVLOOP | VALID3+2 |