source: FOIAVistA/tag/r/PCE_PATIENT_CARE_ENCOUNTER-AUTN-EFDP-PX-VSIT--PXRM/PXAADOC.m@ 628

Last change on this file since 628 was 628, checked in by George Lilly, 14 years ago

initial load of FOIAVistA 6/30/08 version

File size: 1.9 KB
Line 
1PXAADOC ;ISA/Zoltan,KWP - Documentation for PXAA APIs. ;Jun 21, 1999
2 ;;1.0;PCE PATIENT CARE ENCOUNTER;**77**;Aug 12, 1996
3 ;+
4 ;+This routine documents the PXAA routines
5 ;+The routines are generated from the PCE utility PXZGEN1 using thedata dictionary to get all the fields available for the PCE files.
6 ;+
7 ;+The GETIENS API:
8 ;+Description:
9 ;+ The GETIENS API retrieves the Internal Entry Numbers for the appropriate file
10 ;+for a visit by using the Visit IEN and the AD cross reference of the
11 ;+appropriate file. The IENS are returned as an array in the second parameter
12 ;+passed by reference.
13 ;+Input:
14 ;+ VSITIEN -Visit Internal Entry Number
15 ;+ ARRAY -Array of Internal Entry Numbers for this file associated with the Visit
16 ;+ Passed by reference
17 ;+Output:
18 ;+ 0 -No data for the specified VSITIEN
19 ;+ 1 -Data returned
20 ;+Example:
21 ;+MNT,VBB>W $$GETIENS^PXAAVCPT(15623,.THEIENS)
22 ;+1
23 ;+MNT,VBB>ZW THEIENS
24 ;+THEIENS(3677)=
25 ;+
26 ;+The LOADFLDS API:
27 ;+Description:
28 ;+ The LOADFLDS API loads all data into an array from the appropriate file's
29 ;+IEN. If the field contains no data the array entry still exist but is null.
30 ;+ Input:
31 ;+ IEN -Internal Entry Number
32 ;+ ARRAY -Array of the data, passed by reference
33 ;+Output:
34 ;+ 0 -No data for the specified IEN
35 ;+ 1 -Data Returned
36 ;+Example:
37 ;+MNT,VBB>W $$LOADFLDS^PXAAVCPT(3677,.THEDATA)
38 ;+1
39 ;+MNT,VBB>ZW THEDATA
40 ;+THEDATA(.01)=90706
41 ;+THEDATA(.02)=7170336
42 ;+THEDATA(.03)=15623
43 ;+THEDATA(.04)=1433
44 ;+THEDATA(.05)=
45 ;+THEDATA(.07)=
46 ;+THEDATA(.16)=1
47 ;+THEDATA(1201)=
48 ;+THEDATA(1202)=
49 ;+THEDATA(1204)=9
50 ;+THEDATA(80101)=1
51 ;+THEDATA(80102)=9-A 100820;9-E 100820;
52 ;+THEDATA(80201)=
53 ;+THEDATA(81101)=
54 ;+THEDATA(81201)=
55 ;+THEDATA(81202)=4
56 ;+
57 ;+The Other API's are API's for the individual fields
58 ;+See the routines for the labels
59 ;+Example:
60 ;+The ENCOUNTER PROVIDER for the V CPT file
61 ;+MNT,VBB>W $$ENCOPROV^PXAAVCPT(3677)
62 ;+9
Note: See TracBrowser for help on using the repository browser.