PX1P94 ;PB - Cleanup Unresolved entries in Problem (#9000011) file ; 07/13/00
Source file <PX1P94.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| START | ; Entry point
 | 
|
| GETLEXCD(ICD9CODE) | ; Retrieve Lexicon Code for passed ICD9 code
 | 
|
| GETICD(IEN) | ; Retrieve ICD9 code
 |