IBDF17 ;ALB/CJM - ENCOUNTER FORM - COPY A CPT CHECK-OFF SHEET INTO A FORM ;24SEP93
Source file <IBDF17.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
COPY(SHEET,LIST) | ;copies the CPT codes/headers from the sheet to the list
|
|
COPYGRP(HDR,NODE,LIST) | ;copies the header contained in NODE to the selection list (LIST)
|
|
COPYPROC(PROC,LIST,GROUP) | ;copies the procedure contained to the selection list and group
|
|
SUBCOLS(LIST) | ;finds the column containing the CPT code and the text description
|
|
SLCTSHT() | ;allows the user to select a CPT check-off sheet
|
|
FIND(FORM,BLK,LIST) | ;finds the block & list for CPT codes
|
|
CHOOSE(BLOCKS) | ;ask the user to choose
|
|
ASK |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^IBE(357.3 - [#357.3] | Classic Fileman Calls |
^IBE(357.4 - [#357.4] | Classic Fileman Calls |