PXKMAIN ;ISL/JVS,PKR,ISA/Zoltan - Main Routine for Data Capture ;03/12/2020
Source file <PXKMAIN.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1 | ;+Main entry point to read ^TMP("PXK", Global
|
|
| VST(VISITIEN,PXKDUZ,LOCK) | ;--Check for visit node and get one created or quit.
|
|
| NEW | ;--New variables and set main variables
|
|
| PRVTYPE | ;---DO PROVIDER TYPE--PXKMAIN2
|
|
| SET | ;--SET VARIABLES NECESSARY
|
|
| SOURCE | ||
| VISIT | ||
| ORDER | ;--$ORDER Through the ^TMP("PXK", global setting variables
|
|
| CATEG | ||
| SEQUE | ||
| SUBSCR | ||
| AFTER | ||
| BEFORE | ||
| MULT | ; Add multiples to PXKAFT, PXKBEF, PXKAV, PXKBV arrays
|
|
| CHKAUD | ; Check and turn on Auditing
|
|
| EXIT | ;--EXIT
|
|
| EVENT | ;--ENTRY POINT TO POST EXECUTE PCE'S EVENT
|
|
| CQDEL | ;Classification question deletion check
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^AUPNVIMM - [#9000010.11] | TURNON^DIAUTL |