Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Call Graph | Caller Graph | Entry Points | External References | Interaction Calls | Local Variables | All

Print Page as PDF

Routine: ACMCTRL2

Package: Case Management System

Routine: ACMCTRL2

Information

ACMCTRL2 ; IHS/TUCSON/TMJ - MASTER CONTROL #2 (HEADERS/FIELD POSITIONS) ;

Source Information

Source file <ACMCTRL2.m>

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
Case Management System	1	(,ACMPT)^ACMLCMS
VA Fileman	1	YN^DICN

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Case Management System	1	ACMEP

Entry Points

Name	Comments	DBIA/ICR reference
AP1	;;D APHEAD^ACMCTRL2
CMP1	;;S ACMLE(1)="W !!?1,ACMTL,?27,""ONSET DT"",?37,""ST"",?40,""COMMENTS""",ACMLE(2)="W !?1,""----------------------- -------- --""",ACMLE(3)="W ?40,""----------------------------------------""" F J=1:1:3 X ACMLE(J)
RF1	;;W !!?14,ACMTL,!?14,"------------------------------"
ET1	;;W !!?14,ACMTL,!?14,"------------------------------"
CT1	;;W !?14,"-------------------------------------------------" S ACMCT=""
MEAS1	;;W !!?14,ACMTL,?46,"VALUE",?60,"DATE",!?14,"------------------------------",?46,"------------------------------"
REG1	;;S ACMREG="" D REGHEAD^ACMCTRL2
DC1	;;S ACMLE(1)="W !!?14,""DIAGNOSTIC CRITERIA"",?50,""DATE ESTABLISHED""",ACMLE(2)="W !?14,""------------------------------""",ACMLE(3)="W ?50,""----------------""" F J=1:1:3 X ACMLE(J)
REGHEAD
DX1	;;W !!?14,ACMTL,?46,"ONSET DATE",?60,"SEVERITY",!?14,"------------------------------",?46,"------------",?60,"--------------------"
FM1	;;S ACMLE(1)="W !!?5,""FAMILY MEMBER"",?40,""CHART"",?51,""RELATION"",?65,""RELATED DX""",ACMLE(2)="W !?5,""-------------------------- --------""",ACMLE(3)="W ?51,""----------------"",?65,""----------""" F J=1:1:3 X ACMLE(J) S ACMFM=""
CH1	;;S ACMLE(1)="W !!?3,""ONSET DATE"",?18,""PLACE OF ONSET""",ACMLE(2)="W ?40,""CASE HISTORY""",ACMLE(3)="W !?3,""------------- --------------------""",ACMLE(4)="W ?40,""---------------------------""" F J=1:1:4 X ACMLE(J)
CR1	;;S ACMLE(1)="W !!?14,""LAST REVIEW"",?29,""NEXT REVIEW""",ACMLE(2)="W !?14,""------------ ------------""",DA=ACMRGDFN,ACMNT="" F J=1:1:2 X ACMLE(J)
APHEAD
SV1	;;S ACMLE(1)="W !!?14,""SERVICES NEEDED BY THIS CLIENT""",ACMLE(2)="W ?50,""AVAILABILITY STATUS""",ACMLE(3)="W !?14,""---------------------------------""",ACMLE(4)="W ?50,""-------------------""" F J=1:1:4 X ACMLE(J)
MD1	;;W !!?8,ACMTL,?60,"SIG",!?8,"--------------------------------------------------",?60,"--------------------"
PROB1	;;D ^ACMPROB R !!,"Type the <ENTER> key to continue",ACMX#1:300,!! S ACMPROB="" Q

External References

Interaction Calls

Local Variables

Info | Source | Call Graph | Caller Graph | Entry Points | External References | Interaction Calls | Local Variables | All