ECXSCXN ;ALB/JAP Clinic Extract ;Mar 18, 2021@15:55:41
Source file <ECXSCXN.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BEG | ;entry point from option
|
|
| START | ;entry point from taskmgr
|
|
| ENCNTR(ECSD1,ECED) | ;search file #409.68 for encounter data
|
|
| FILE | ;record setup for file #727.827
|
|
| SETUP | ;set required input for ECXTRAC
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| ^PX(839.7 - [#839.7] | Classic Fileman Calls |