NURCCP3 ;HIRMFO/RM-STANDARD CARE PLAN, PRINT (sort to get problems) ;3/9/92
Source file <NURCCP3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETPROB | ; GO THROUGH EACH LEVEL OF CHILDREN FOR LIST OF PARENTS IN
; NURCSECT ARRAY UNTIL ALL PROBLEMS REACHED. PROBLEMS ARE SET INTO ; ^TMP($J,"PDOC" |
|
| GETSEL | ; RETURNS CHC=NUMBER OF CHOICES IN ^TMP($J,"CPCH"
; ARRAY THAT WERE CHILDREN OF NURCSECT. |
|
| SETPROB | ; CONTINUATION OF FOR LOOP TO SET PROBLEM ARRAY OR CHC ARRAY
|
|
| HIER | ; SET THE PATH DOWN TO THIS NODE FOR THE PRINT AND PROCESS THE CHILDREN
|
|
| G5 | ; CONTINUATION OF LINE GETSEL+5
|
|
| MEDSECT | ; PICK MEDICAL SECTIONS, THEN DETERMINE IF WILL ONLY PRINT
; MEDICAL DX, MEDICAL DX/PROBLEMS ONLY, OR SELECTED MEDICAL DX/PROBLEMS |
